componentes em tempo de execussao
Galera criei um Form em tempo de execussao e um button.
Como faco para capturar o evento ´onclick´ desse botao por exemplo ?
Nao consigo criar uma Procedure ja que o Form e o botao ´nao existem´ ate o programa ser executado!
Quem se abilita?
Abracos a todos
Guto
Como faco para capturar o evento ´onclick´ desse botao por exemplo ?
Nao consigo criar uma Procedure ja que o Form e o botao ´nao existem´ ate o programa ser executado!
Quem se abilita?
Abracos a todos
Guto
Alguto
Curtidas 0
Respostas
Paulo_amorim
11/05/2004
Olá
O evento OnClick do botão é do tipo TNotifyEvent.
Entretanto os eventos são declarados como propriedade, o que faz com que vc possa aplicar algo neles.
Assim, vc pode criar uma procedure prórpria assim:
e quando vc criar esse botão, faça:
Assim vc define o OnClick dele...
Até+
O evento OnClick do botão é do tipo TNotifyEvent.
Entretanto os eventos são declarados como propriedade, o que faz com que vc possa aplicar algo neles.
Assim, vc pode criar uma procedure prórpria assim:
procedure CliqueBotao(Sender: TObject);
(...)
procedure MyUnit.CliqueBotao(Sender:TObject);
begin
{faz o que tem que fazer}
end;e quando vc criar esse botão, faça:
MyButton.Create.... MyButton.Parent.... MyButton.OnClick := CliqueBotao; // <-- Aqui vc define o OnCLick
Assim vc define o OnClick dele...
Até+
GOSTEI 0