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 TEdit soll keinen Ton mehr von sich geben und Tab abfangen (https://www.delphipraxis.net/738-tedit-soll-keinen-ton-mehr-von-sich-geben-und-tab-abfangen.html)

OregonGhost 30. Aug 2002 19:46


TEdit soll keinen Ton mehr von sich geben und Tab abfangen
 
Ich verwende ein TEdit zur Bearbeitung einer Datenmenge. Wenn man Enter drückt, soll sich das TEdit eine Zeile nach unten bewegen, wenn man Shift+Enter drückt eine Zeile hoch. Funktioniert auch, nur leider kommt aus den Lautsprechern jedesmal ein *DING* und genau das will ich weghaben. Wie mach ich das?

Außerdem soll man mit TAB und Shift-TAB nach rechts und links navigieren können, aber wie fange ich TAB ab? Wenn man TAB drückt, wird das nächste Steuerelement ausgewählt, aber ein KeyDown-Ereignis findet gar nicht erst statt...

Christian Seehase 30. Aug 2002 20:14

Moin OregonGhost,

schau Dir doch mal diesen Thread an, speziell das Posting von Paul jr.

lästiges beepen abstellen ??

Ich hab's jetzt eben nur mal kurz überflogen, aber damit müssten sich, glaube ich, Deine beiden Probleme lösen lassen.

CalganX 30. Aug 2002 20:26

Alle Beiträge ab dem wo Paul jr. *behauptet* er würde jetzt die komplette Funktion posten, die seiner Meinung nach keine Wünsche übriglasse, sind für mich nicht zu sehen... Hat jemand eine Lösung?

Chris

PS: Mich würde das auch nämlich mal interressieren... :mrgreen:

jbg 30. Aug 2002 20:44

Hast du dir auch die 2. Seite dazu angeschaut? Dort wird der Code wiederholt.

CalganX 31. Aug 2002 07:33

*??* Jetzt geht's... Gestern gab's da irgendwie keine 2. Seite...
Naja, auch egal...

Chris

OregonGhost 31. Aug 2002 08:55

Yo, das beantwortet schon mal meine Frage zum Thema ENTER, vielen Dank. Falls es einen interessiert, ich brauchte sogar nur so kurzen Code:
Code:
  case Key of
    VK_RETURN, VK_TAB: begin // ENTER oder TAB-Taste erkannt
      PeekMessage(Msg, 0, WM_CHAR, WM_CHAR, PM_REMOVE);
    end;
  end; // CASE Key OF
weil der Code im OnKeyDown des TEdit liegt.
Der Haken ist nur, TAB generiert nach wie vor kein OnKeyDown-Event, also kann ich das eigentlich auch nicht darin abfangen ;c( Was also tun?

toms 31. Aug 2002 09:44

http://www.swissdelphicenter.ch/de/showcode.php?id=591

OregonGhost 31. Aug 2002 15:38

YO, das war's - danke ;c)


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:19 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