Hi,
also mit sendmessage komme ich irgenwie nicht zurecht... habe mal versucht die tastenkombi ALT+D+B nachzubilden die den Editor beendet (ja ich weiß beenden geht auch anderst... aber mir geht es um die Tastenkombi, da ich bei der Anwenung für die ich es brauche nur so die benötigte funktion aktivieren kann, da ich an keine ControlID komme)
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
handle: thandle;
begin
Handle := FindWindow(
nil,PChar('
Unbenannt - Editor'));
SendMessage(
Handle, WM_KEYDOWN, VK_MENU, 0);
SendMessage(
Handle, WM_CHAR, word('
D'), 0);
SendMessage(
Handle, WM_CHAR, word('
B'), 0);
SendMessage(
Handle, WM_KEYUP, VK_MENU, 0);
end;
das führt bei mir aber leider zu keinem Ergebnis...
Sendkey funktioniert eigentlich super nur halt leider nicht wenn ich die exe ausserhalb der Delphi-
IDE
ausführe - und ich frage mich immmer noch wo ist hier der Unterschied ?
Delphi Compiliert den Code und führt doch dann die EXE aus... also müsste doch das Ergebnis dasselbe sein als wenn ich die EXE direkt ausführe (am verzweifeln)
Tschö
Ralf