Einzelnen Beitrag anzeigen

Fukiszo
(Gast)

n/a Beiträge
 
#24

AW: Key wird nicht gelöscht, warum?

  Alt 31. Jan 2018, 15:58
Bei Key-Down/Up/Press greift immer der Delphi/Windows Standard ein = Knopf wird gedrückt. (Jedenfalls bei meinen Tests)

So hab ich's jetzt und es klappt prima, ob es richtig so ist weiß ich nicht aber das Resultat stimmt.
Ich les noch ein wenig bei Emarcadero, aber Beispiele dafür zu finden ist schwer.

Delphi-Quellcode:
procedure TForm1.aplctnvnts1ShortCut(var Msg: TWMKey; var Handled: Boolean);
begin
 if ((Form1.Focused) or (Button1.Focused)) then // nur eingreifen wenn Form oder Knopf aktiv ist
 if Msg.CharCode = Windows.VK_RETURN then // Taste Return abfangen
 begin
  ZeigeWas; // was soll passieren wenn Return gedrückt wird
  Handled := True; // zurück zum Delphi/Windows Tastatur-Handler
 end;
end;

Grüße


Edit:
Danke an alle für Eure Vorschläge und das nun alles bestens funktioniert.
Falls jemand mag/brauch/will, im Anhang überarbeitete version.

Vielen Dank + Thema abgeschlossen.
Angehängte Dateien
Dateityp: 7z pushTheButton.7z (5,6 KB, 1x aufgerufen)

Geändert von Fukiszo (31. Jan 2018 um 22:30 Uhr) Grund: Thema abgeschlossen
  Mit Zitat antworten Zitat