ToolBar

← →
Wolverin © (2002-06-27 16:17) [0]

Помогите пожалуста... Есть такая проблема...
Допустим у меня есть ToolBar пустой...
Я программно создаю кнопки.. А как событи я от созданных порограммно кнопока отработать?

← →
Volj © (2002-06-27 16:32) [1]

Описываешь процедуру
procedure TryLaLaClick(Sender: TObject);
begin
ShowMessage("TryLaLa");
end;
А затем
ToolButton1.OnClick := TryLaLaClick;
Читай описание процедурных типов :)

← →
Wolverin © (2002-06-27 16:46) [2]

А ToolButton.OnClick:=TryLaLa Где писать?

← →
Volj © (2002-06-27 16:59) [3]

После создания кнопки, очевидно :)

← →
Игорь Шевченко © (2002-06-27 17:00) [4]

Там, где ToolButton создается, очевидно

Только маленькая поправка.

TryLala должна быть методом объекта, например формы.

TForm1.TryLala (Sender : TObject);
...

← →
Volj © (2002-06-27 17:04) [5]

2Игорь:
Если не описать trylala в форме, то
ToolButton1.OnClick := TryLaLaClick;
скорее всего не скомпилится :) А вообще, судя по вопросу, это может быть ценным замечанием :)

C:\Soft\borland\Delphi5\Help\Examples\Menu2\pmnudmo.dpr
Программно создаются пункты меню и обрабатываются события.

ToolBar Найти похожие ветки