Evento relacionado com o mouse
Estou com um problema, onde no meu formulario tem varios groups e edits, eu queria saber ses existe algum evento de mouse, que seja executado toda vez que eu clico independentemente de clicar no form ou num group, sem ter que utilizar por exemplo o evento click de cada objeto.
Desde já agradeço...
Desde já agradeço...
Fbaggio
Curtidas 0
Respostas
Smaug_84
24/10/2003
1º verifique se os parametros da procedure do seu evento são os mesmos.
Se forem declare uma procedure como abaixo:
type
TForm1 = class(TForm)
Button1: TButton;
procedure NomeDaProcedure[b:5cc1ebb822](Sender: TObject)[/b:5cc1ebb822] --->Parametros do evento;
private
{ Private declarations }
public
{ Public declarations }
end;
Depois, é só ir no object inspector e escolher a sua procedure para aquele evento.
Espero ter ajudado
Se forem declare uma procedure como abaixo:
type
TForm1 = class(TForm)
Button1: TButton;
procedure NomeDaProcedure[b:5cc1ebb822](Sender: TObject)[/b:5cc1ebb822] --->Parametros do evento;
private
{ Private declarations }
public
{ Public declarations }
end;
Depois, é só ir no object inspector e escolher a sua procedure para aquele evento.
Espero ter ajudado
GOSTEI 0