onKeyUp

[MAXIUM]

¿Como logro esto?, no se que pametros enviar a KeyUp, yo solo quiero que se ejecute procedimiento.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
       Llamar a Edit1KeyUp para que ejecute su código;
end;

Código Delphi [-]
procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
      Hace algo;
end;

Ante mano, muchas gracias.