Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Zum Wegwerfen zu schade ... bei ENTER zum naechsten Control. (https://www.delphipraxis.net/8944-zum-wegwerfen-zu-schade-bei-enter-zum-naechsten-control.html)

Assarbad 15. Sep 2003 18:25


Zum Wegwerfen zu schade ... bei ENTER zum naechsten Control.
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hier ein kleines Beispiel, wie man bei Druck von ENTER einfach zum naechsten Control im Form springt. Das Beispiel hab ich nur fuer jemanden in ca 3 Minuten geschrieben, weil er zuerst glaubte, es sei nur mit einem Hook machbar ;) ...

Wichtig ist der Eventhandler:
Delphi-Quellcode:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  case Key of
  VK_RETURN: // Entertaste
  Windows.SetFocus(GetNextDlgTabItem(self.Handle,
    self.ActiveControl.Handle, True));
  end;
end;
Den habe ich im Beispiel an alle EDITs gehangen ...

RavenIV 12. Jan 2005 17:16

Re: Zum Wegwerfen zu schade ... bei ENTER zum naechsten Cont
 
servus

aber leider springt deine lösung die felder nicht nach der eingestellten tabulator-reihenfolge an.
der sprung erfolgt in der reihenfolge, wie die elemente erstellt wurden.

ist aber trotzdem ein toller tip.

gruessle


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:26 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz