PDA

Visualizza la versione completa : delphi - evento OnReturnPressed


123delphi321
16-02-2004, 12:05
ciao a tutti,

volevo gestire l'evento OnReturnPressed di un campo Tedit

tale evento l'ho trovato nell'help del componente Tedit, ma non lo trovo tra gli eventi dell'oggetto?????

io volevo fare in modo che quando alla pressione di "enter" sul campo tedi1 venisse generato l'evento click di un button che sta sulla stessa form:

qundi sull'evento onReturnPressed

begin

TForm1.Button1Click;
end;



grazie

LeleFT
16-02-2004, 13:05
Adesso non ricordo quali siano gli eventi di un componente Tedit, ma sicuramente c' l'evento onKeyPressed (o similia). Puoi intercettare questo evento e controllare se il tasto premuto Enter (codice ASCII 13).


Ciao. :ciauz:

123delphi321
16-02-2004, 13:45
grazie,.....ho fatto cosi:


procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=chr(13) then Form1.Button1.Click ;
end;

ciao :ciauz:

alka
16-02-2004, 16:23
Originariamente inviato da 123delphi321
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=chr(13) then Form1.Button1.Click ;
end;

E' meglio se "assorbi" il tasto...



procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
Button1.Click;
Key := #0;
end;
end;


Ciao! :ciauz:

Loading