| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите, пожалуйста. Сам не могу сообразить, а очень нужно. [D6]
diokant © (2003-02-21 16:10:00)Подскажите, пожалуйста. Сам не могу сообразить, а очень нужно.
Я создаю динамически объект типа 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:57:00) [1]А разве это не тоже самое , проблема - то не в этом.
Calm (2003-02-21 16:23:00) [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:17:00) [3]Как сделать по человечески?
| |
