Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Компоненты


zool ©   (2002-01-24 20:27:00) 

Уважаемые програмисты. Слезно прошу о помощи! Я создал компонент на форме во время выполнения программы (компонент - button 1). Можна ли обрабатывать события on-click данного компонента. Если не сложно, то скиньте пример. С-п-а-с-и-б-о.


DMN   (2002-01-24 20:35:00) [1]

TMyForm=class(TForm)
//.............
procedure RunTimeClickHandler(Sender:TObject);
//.............
end;


//.................
RTButton := TButton.Create(Self);
RTButton.Parent := Self;
RTButton.OnClick := RunTimeClickHandler;


Юрий Зотов   (2002-01-24 20:33:00) [2]

type
TForm1 = class(TForm)
...
procedure MyClick(Sender: TObject); // написать ручками
...
end;

procedure TForm1.MyClick(Sender: TObject); // написать ручками
begin
... // Ваш код
end;

И теперь там, где Вы создаете Button1, напишите строку:
Button1.OnClick := MyClick;


Наверх

Титульная страница Поиск, карта сайта Написать письмо