Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Вниз

Компоненты 


zool   (2002-01-24 20:27) [0]

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



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

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

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

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



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

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


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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.02 c
4-19037           Hair_Fly              2001-12-10 12:05  2002.02.07  
работая под юзером, запускать прогу с правами администратора.


3-18762           Olfi                  2002-01-12 10:34  2002.02.07  
Как округлить число в таблице(TQuery) после деления?


1-18888           Vaddya                2002-01-23 12:03  2002.02.07  
Создание ярлыка


1-18820           VladimirL             2002-01-23 18:56  2002.02.07  
Персонально для Delirium


6-18938           ZserG                 2001-11-18 02:23  2002.02.07  
Как вставить инструментальную панель в Explorer?