[Delphi] TEdit i event OnKeyPress

[Sianoo]

Witam,

Mam mały problemik dotyczący komponętu TEdit. Otóż, gdy daję do Edit event OnKeyPress i używam tego kodu:

 

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
 If Key = #13 then
begin
 	Button1Click(Sender);
end;
 Key := #0;
end;

 

...nie mogę wpisać tekstu do edit2.

 

Liczę na waszą pomoc. Z góry thx.

[xevil21]

A do czego jest ta linijka:

 

Key := #0;

 

Pozdrawiam!

[Sianoo]

A do czego jest ta linijka:<pre>Key := #0;</pre>

Pozdrawiam!

 

Małe niedopatrzenie Jestem dopiero początkującym i podobny kod znalazłem na innym forum. Dzięki za pomoc. Usunąłem linijkę i już wszystko ładnie działa