Games Delphi

  1. Home
  2. Delphi
  3. Games
  4. [] Tab yerine enter tuşu
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if (Key = #13) then
begin
Key := #0;
Perform(WM_NEXTDLGCTL, 0, 0);
end;
end;