Einzelnen Beitrag anzeigen

Bünni

Registriert seit: 4. Mär 2019
67 Beiträge
 
#1

VirtualStringTree OnKeyPress wird ohne Focus auf VST ausgeführt

  Alt 11. Apr 2019, 13:46
Mein VirtualStringTree hat ein eigenes OnKeyPress wo ich VK_F4 und VK_Return abfrage.
Wenn ich VK-F4 drücke wird ein modales Formular geöffnet. Auf diesem Formular gibt es ein TEdit welches auf die Entertaste reagiert und in diesem Fall einen Button klick, welcher das Formular schließen soll

Delphi-Quellcode:
procedure TForm2.Edit1KeyPress(Sender: TObject);
begin
 if (Key = #13) then
  begin
   Key := #0;
   Button1Click(Self);
  end;
end;

procedure TForm2.Button1Click(Sender: TObject; var Key: Char);
begin
 // viele Konditionen und Dinge

 Close;
end;
Das funktioniert alles wie gewollt bis auf, dass sobald Form2 geschlossen ist sich VSTKeyUp meldet und denkt, ich hätte VK_ENTER gedrückt. Habe ich auch, aber in einem anderen modalen Fenster.
Wie unterbinde ich dieses Verhalten?
  Mit Zitat antworten Zitat