Chamar evento KeuDown

Delphi

03/06/2004

Galera como eu faço para chamar o evento OnKeyDown de uma outra procedure ou function qualquer?


Agradeço desde já


Gasper

Gasper

Curtidas 0

Respostas

Xanatos

Xanatos

03/06/2004

var
key: word;
begin
key:= 13; //enter
Edit1KeyDown(Edit1,key,[ssShift]);// o TshiftState a escolha;
end;

Falows!!!


GOSTEI 0
POSTAR