Mit einem Button eine Tastenkombi simulieren

[KridRed]

... das funktioniert bei Apps ohne ControlBar sehr gut.. aber wenn ich nun ne ControlBar drin hab, gehts nimmer. Ich hab mir mal die Unit sndkeys32 eingebunden, die diese Tastenkombinationen vereinfachen soll, aber irgendwie werd ich nicht schlau draus und bekomms nicht zu laufen.
Die Zeile  SendKeys('^P',true); soll die Kombi CTRL+P (drucken) simulieren, aber haut irgendwie nicht hin... hier mal mein bisheriger Testcode um ne Outlook Mail auszudrucken per CTRL+P (da ich den vorherigen Tip hier nicht nutzen kann.. wegen ControlBar )

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  target: HWND;
begin
  target := FindWindow('rctrl_rewnd32', nil);
    if target <> 0 then
    begin
    showmessage('habs gefunden');
      SendKeys('^P',true);
      end
      else
      begin
      showmessage('nicht gefunden');
  end;
end;

end.

Kann mir jemand einen Tip geben ?


Gruß,


Dirk