Всем добрый день. Занимаюсь самостоятельным изучением Delphi XE, столкнулся с таким вот событием.
procedure TForm3.Edit1KeyPress(Sender: TObject; var key: char);
begin
if key=#13 //Если нажата клавиша Enter
then Edit2.SetFocus; //То переместить курсор во второе поле
end;
Как бы что должна делать эта процедура я там написал, но при нажатии на Энтер просто слышен дыдын и курсор остается на месте, чего не так то? я же говорю если нажат Энтер(#13) то шуруй свой курсор в поле Edit2 (Edit2.SetFocus). Вроде бы и говорю с уважением, а оно воно что, не хочет чейт, как быть то?
При нажатии на клавишу Энтер курсор должен перейти в следующее поле, а оно никак (((
[syntax=Delphi]
key:=#0;
ActiveControl:=Edit2;
[/syntax]
key:=#0;
ActiveControl:=Edit2;
[/syntax]
[syntax=Delphi] [/syntax]