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

Вниз

Подскажите, пожалуйста. Сам не могу сообразить, а очень нужно.   Найти похожие ветки 

 
diokant   (2003-02-21 16:10) [0]

Подскажите, пожалуйста. Сам не могу сообразить, а очень нужно.
Я создаю динамически объект типа TNMFtp.

new(ConnectFTP1);
ConnectFTP1^:=TNMFtp.Create(nil);
ConnectFTP1^.Vendor := NMOS_AUTO;
ConnectFTP1^.Host := Adress_Net;
ConnectFTP1^.UserID := User_ID;
ConnectFTP1^.Password := Passw_ID;
ConnectFTP1^.Connect;
ConnectFTP1^.Mode(MODE_BYTE);
ConnectFTP1^.ChangeDir(S_Rab);
ConnectFTP1^.nList;

Нужно описать поведение объекта при возникновении события ONListItem. Оно возникает после вызова метода ConnectFTP1^.nList

Если статически - поместить на форму компонент NMFTP1 , то можно описать процедуру и добраться к переменной Listing в процедуре TfmMain1.NMFTP1ListItem(Listing: String);

Как описать процедуру для объекта, созданного динамически
Я пробовал ConnectFTP1^.OnListItem:=fmMainServ.NMFTP1ListItem; получается,
но меня это не устраивает.


 
diokant   (2003-02-21 16:17) [1]

Как сделать по человечески?


 
Calm ©   (2003-02-21 16:23) [2]


ConnectFTP1:=TNMFtp.Create(nil);
ConnectFTP1.Vendor := NMOS_AUTO;
ConnectFTP1.Host := Adress_Net;
ConnectFTP1.UserID := User_ID;
ConnectFTP1.Password := Passw_ID;
ConnectFTP1.Connect;
ConnectFTP1.Mode(MODE_BYTE);
ConnectFTP1.ChangeDir(S_Rab);
ConnectFTP1.nList;

?


 
diokant   (2003-02-21 16:57) [3]

А разве это не тоже самое , проблема - то не в этом.



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

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

Наверх




Память: 0.47 MB
Время: 0.02 c
14-44394
Дмитрий К.К.
2003-03-26 11:50
2003.04.14
Именинники 26 марта


1-44247
Tayfun
2003-04-02 13:08
2003.04.14
Как из сроки S вырезать символы


1-44264
Ops
2003-04-02 14:40
2003.04.14
Закрыть форму в OnShow.


14-44329
GDBoy
2003-03-30 21:04
2003.04.14
Скиноинтерфейс......


3-44079
Vick
2003-03-26 10:25
2003.04.14
Lookup поля в EhGrid