![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Библиотека + Компоненты [D7, MSSQL]
Kolt © (2004-08-30 06:08:00)Уважаемые господа, подскажите начинающему программеру. Вот я пишу библиотеку, в ней использую следующий код:
procedure Record_UserName (RLogin:String);
begin
MessageBox(0, 'Login', PAnsiChar('Login= '), 1);
DataModule_Users:= TDataModule_Users.CreateNew(DataModule_Users);
MessageBox(0, 'Login', PAnsiChar('Login= '), 1);
DataModule_Users.TableUsers.Insert;
DataModule_Users.TableUsers.Edit;
MessageBox(0, 'Login', PAnsiChar('Login= '), 1);
DataModule_Users.TableUsers.FieldByName('User').Value:=RLogin;
DataModule_Users.TableUsers.Post;
и приложение:
procedure Export_UserName (Login:String);
external 'connect.dll';
procedure Record_UserName (RLogin:String);
external 'connect.dll';
..............
procedure TForm1.Button1Click(Sender: TObject);
begin
// Export_UserName(Edit1.Text);
Record_UserName (Edit1.Text);
end;
Проблемма в том что всё это не хочет работать. Я чтобы не описывать в библиотеке компоненты для работы с БД в ручную я в библиотеку добавил компонент DataModule в него накидал таблицы.... Не ужто всё нужно будет описывать в ручную, а нельзя ли с помощью компонентов ???
Kolt (2004-08-30 15:13:00) [1]неужто никто не знает....