Entwickler-Ecke :: Thema anzeigen - tasten-eingaben in edit-box abfangen

Nagelbrett - Mo 19.05.03 16:08
Titel: tasten-eingaben in edit-box abfangen

hi, ich hab ein normales einzeiliges edit-feld und möchte gern, dass wenn jemand enter da drückt, die eingabe ausgewertet wird...

wenn ich jetzt im OnKeyDown mit if key = ... das ganze mache, dann funktioniert das zwar, aber es kommt immer ein "ding" (also der windows standard sound), weil man in einer einzeiligen editbox ja nicht enter drücken kann (bzw nicht eine zeile weiterspringen kann)

wie kann ich jetzt verhindern, dass er immer diesen sound spielt?
mit Key := 0; am ende der prozedur gehts leider nicht...
hab auch schon OnKeyPress probiert, aber da ist's das selbe

ErnestoChe - Mo 19.05.03 16:57

Hi,

dann mach so:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key = #13 then
  begin
    key:= #0;             //  <-------------------------------------------
    caption := edit1.Text;
  end;
end;

MFG

- Ernesto -

Nagelbrett - Di 20.05.03 12:24

ja stimmt, danke

das funktioniert :)

aber in KeyDown war Key leider kein Char sondern Word, naja, egal, habs jetz mit KeyPress gemacht

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!