simulate a mouse event on a twebbrowser PLEASE HELP ME !!! iam deseper

[Guest_imported]

I want to simulate a mouse event buttondown buttonup on a form with a twebbrowser to a relative position x,y .
But the form is not visible....
i have try postmessage or sendmessage but nothing;


Please HELP ME

Thank you very much

cyberalle@ifrance.com

sorry for my english...

 

[WildWill]

Have a look at the following code, I think this will do what you want by calling the mouseDown event directly.

procedure TForm1.myControlMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  messageDlg('hello from X:'+IntToStr(x)+' Y:'+intToStr(y),mtInformation,[mbOK],0);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  myControlMouseDown(self,mbLeft,[],25,33);
end;

Billy H

bhogar@acxiom.co.uk