Einzelnen Beitrag anzeigen

Daniel
(Co-Admin)

Registriert seit: 30. Mai 2002
Ort: Hamburg
13.920 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: TEdit, "Ping" nach Enter ausschalten

  Alt 6. Apr 2015, 18:40
Zwei Dinge:

(1)
Ich habe mir erlaubt, dem Titel einen sachlicheren Namen zu verpassen
und
(2)
Versuche doch mal, Dein Problem auf ein kleines Beispiel zu reduzieren. Nehme ich mir ein Form mit drei Edit-Feldern, setze die Eigenschaft "KeyPreview" des Formulars auf "true" und setze dann folgenden Code in das Ereignis "OnKeyPress" des Formulars:

Delphi-Quellcode:
if (Key = #13) then
begin
  Key := #0;
  SelectNext( ActiveControl, TRUE, TRUE );
end;
dann bin ich das "Ping" los und wähle - das ist natürlich optional - das nächste Control an. Solange es nur darum geht, den Ton loszuwerden, könnte dies ein möglicher Weg für Dich sein.
Daniel R. Wolf
mit Grüßen aus Hamburg

Geändert von Daniel ( 6. Apr 2015 um 18:48 Uhr)
  Mit Zitat antworten Zitat