Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.26;
Скачать: CL | DM;

Вниз

Библиотека + Компоненты   Найти похожие ветки 

 
Kolt ©   (2004-08-30 06:08) [0]

Уважаемые господа, подскажите начинающему программеру. Вот я пишу библиотеку, в ней использую следующий код:
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) [1]

неужто никто не знает....



Страницы: 1 вся ветка

Текущий архив: 2004.09.26;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.059 c
3-1093507041
Crazy_Student
2004-08-26 11:57
2004.09.26
Связка Delphi+Oracle


1-1095061628
Dimedrol
2004-09-13 11:47
2004.09.26
Не всегда удаляются каталоги


1-1094710146
denis24
2004-09-09 10:09
2004.09.26
Раскраска строк в listview


11-1080626196
Новичёк
2004-03-30 09:56
2004.09.26
Написание сервиса NT с помощью KOL.


1-1094655106
roma
2004-09-08 18:51
2004.09.26
WebBrowser