Click simulieren durch Klick in einen Bereich !

[Delphiturbo]

Hallo

ich wollte ein Klick simulieren, wenn der Cursor (Mauszeiger) in einen Bereich klickt
Ich habeprocedure
versucht mit dem Objekt TImage ohne Bild

Delphi-Quellcode:

TForm1.Image1Click(Sender: TObject);
begin
Button1.Click; // funktioniert nicht
end;

Es funktioniert aber wenn ich TImage auf Webbrowser lege, dann funktioniert nicht !

[Fussball-Robby]

Zitat:

Zitat von Delphiturbo

Hallo

ich wollte ein Klick simulieren, wenn der Cursor (Mauszeiger) in einen Bereich klickt
Ich habeprocedure
versucht mit dem Objekt TImage ohne Bild

Delphi-Quellcode:

TForm3.Image1Click(Sender: TObject);
begin
Button1.Click; // funktioniert nicht
end;

Es funktioniert aber wenn ich TImage auf Webbrowser lege, dann funktioniert nicht !

Ich habe von diesen abgehakten Sätzen ehrlich gesagt weniger als die Hälfte verstanden. Kannst du mal vernünftig erklären, was genau du machen willst, wie du es probiert hast und was nicht funktioniert?

[Delphiturbo]

wenn ich das Objekt TImage auf die Form lege, dann funktioniert der Code
Lege ich TImage auf Webbrowser, dann passiert nicht nach dem Klick drauf !

Delphi-Quellcode:

TForm1.Image1Click(Sender: TObject);
begin
Button1.Click;
end;

[Die Muhkuh]

Klick simulieren :roll:

[Delphiturbo]

ich möchte ein Klick auf Webbrowser simulieren, damit ein Button (ein Bild) in Webbrwoser anklike
ich habe diesen Code getestet, passiert aber nichts !

Delphi-Quellcode:

begin
mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);
end;

[Die Muhkuh]

Du weißt schon, dass Du vorher den Cursor an die Stelle bewegen musst, wo der Link ist?

[Delphiturbo]

Zitat:

Zitat von Die Muhkuh

Du weißt schon, dass Du vorher den Cursor an die Stelle bewegen musst, wo der Link ist?

Nein, habe ich nicht gewusst :thumb:

Delphi-Quellcode:

// so zusamen geht
SetCursorPos(left+200, top+200);
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);

Ich habe das Problem mit einem Trick gelöst
1. nach dem Klick auf TImage wird TImage ausgeblendet
2. dann folgt der Klick
3. dann wieder TImage einblenden
Umweg aber funktioniert :mrgreen:

[DeddyH]

Ich bin nicht ganz sicher, aber wenn Du das Flag MOUSEEVENTF_ABSOLUTE setzt, kannst Du die Koordinaten direkt angeben, ohne vorher den Cursor zu bewegen (ansonsten würde das Flag IMO keinen Sinn machen).