Delphi onClick

jorg22

Pls akou funkciou v delphi zistim ci uzivatel stlacil lave tlacitko mysi hocikde v programe?
Thx.

Bobr · Príspevok od používateľa **Bobr** » 26 aug 2008, 8:44

Skus sa pohrat s tymto:

// The button action we have added
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := 'Hello World'; // Label changed when button pressed
end;

jorg22

lol tak to si mi moc nepomohol to je kliknutie na tlacitko ja to potrebujem zistovat v komponente webbrowser, potrebujem tam spravit aby ked niekto klikne na nejaky link vo webbrowseri tak aby my to nacitalo hodnotu href a aby som snou mohol dalej pracovat.

Tak to sa musíš pozrieť na ten komponent webbrowser, či má nejakú metódu, ktorá sa v takom prípade aktivuje.

jorg22

No ja som so skusal riesit takto:

//Get the point where the mouse was clicked
GetCursorPos(currPoint);

// Convert the screen coordinates to client coordinates
currPoint := WebBrowser1.ScreenToClient(currPoint);

//Now get the element which was clicked
CurrElem := WebBrowser1.OleObject.Document.ElementFromPoint(CurrPoint.X,CurrPoint.Y);

//Verify whether the element is a link
if CurrElem.TagName = 'A' then
ShowMessage(CurrElem.href);

to mam v timeri takze vzdy ked dakto ukaze na nejaky odkaz tak sa zobrazi

ShowMessage(CurrElem.href);

ale ja to chcem sprravit tak ze ked dakto na ten odkaz klikne aby sa to zobrazilo a nato potrebujem kontrolovat tlacitko mysi ci je stlacene a to neviem.

Inac hodila by sa mi aj nejaka dokumentacia pre komponentu webbrowser a to OleObject tiez neviem co to presne je, ja som nic zrozumitelneho nenasiel. thx

Skús pozrieť úplne posledný príspevok: http://www.programmersheaven.com/mb/del ... /?S=B20000

jorg22

no to som nasiel aj ja ale nejak delphi nevedel co je TMSHTMLHTMLAnchorEvents2 a ani kniznicu MSHTMLEvents nepoznal, mozno ze ju treba stiahnut ale aj tak nechapem jak to funguje vedel by si mi to vysvetit?

Skúšal si nájsť MSHTMLEvents.pas na internete?

jorg22

no nasiel som dve verzie MSHTMLEvents.pas jedna nepoznala TMSHTMLHTMLAnchorEvents2 a ta druha zas chcela dalsiu kniznicu Mshtml_Ewb ktoru neviem najst, nieje nejaky jednoduchsi sposob?
Myslim ze by stacilo zistit kedy je tlacitko mysi stlacene ale to neviem.