TEdit, "Ping" nach Enter ausschalten

[Daniel]

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.

[Luckie]

Und es ist immer eine schlecht Idee ein lokales Problem mit einer globalen Lösung zu versuchen zu lösen. Weil ich liieeeebe den Ping.

[Daniel]

Immer?
Im Kontext einer Kassen-Software könnte ich mir das sogar vorstellen. Eine der wenigen Ausnahmen - zugegeben.

[Luckie]

OK. Vielleicht. Aber dann könnte auch der Scanner stumm sein.