es war nichts passiert, inzwischen habe ich das anders gelöst mit nem tipp aus nem anderen topic mit der funktion "FindAWindow"
habe den link jetzt nicht mehr parat dazu
damit gehts jetzt, wird immer das aktuelle opera-fenster / tab genommen
jetzt habe ich nur noch das problem, es geht zwar nur passiert mir folgendes, ich kann das "CleanIcon" von windows nicht mehr nutzen, also das was den Desktop sichtbar machen, in verzeichnissen gehen auch keine Doppelklicks mehr um programme zu öffnen
senden tue ich SHIFT, ESC und S um ein Formular mittels accesskey abzuschicken, denn so wie das im opera gelöst ist ist es zu umständlich, nutze dafür momentan die F10 Taste, soll aber mal genauso funktionieren wie auch im IE und im Firefox
ach ja hier der code
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var TheWindowHandle: THandle;
begin
if GetAsyncKeyState(VK_F10) < 0 then
begin
TheWindowHandle:=FindAWindow('Opera', '');
if TheWindowHandle=0 then
ShowMessage('Window not found!')
else
begin
setforegroundwindow(TheWindowHandle);
keybd_event(VK_SHIFT, 0, 0, 0 );
keybd_event(VK_ESCAPE, 0, 0, 0 );
sendkeys('{S}', false);
sleep(1000);
end;
end;
ach ja wenn ich dann die ESC Taste mehrmals drücke dann funktioniert wieder alles
was habe ich denn da jetzt falsch gemacht ?
S