Über TWebBrowser Java Link klicken

[Bernhard Geyer]

Zitat von klaus9:

Hi nein das ist leider nicht meine webseite, sondern die meines auftraggebers.

Dann solltest du diesem erklären das eine API-Schnittstelle die sinnvollere Lösung ist.

[klaus9]

Werden die leider nicht machen. Deshalb muß ich es irgendwie anders hinbekommen ..

[klaus9]

Gibt es denn noch Befehle um eine Möglichkeit zu schaffen die Javascripts anzusteuern.

habe schon viele möglichkeiten probiert.

Webbrowser1.Navigate('javascript:void(true)' );
oder mit

WebBrowser1.OleObject.Document.Forms.item(0).eleme nts.item(xx).click; Nur gibt es leider diesen Button nicht
als Zahl, habe alle 1-130 durch geklickt.

oder mit folgendem Code

var link,s:string;
I:integer;
mylinklevariant;
begin
s:='';
mylink:='';
for I := 0 to WebBrowser1.OleObject.Document.links.Length - 1 do begin
s:=WebBrowser1.OleObject.Document.links.Item(I).In nerText;
if s='Alles auswählen' then mylink := WebBrowser1.OleObject.Document.links.Item(I);
end;
webbrowser1.Navigate(mylink);

funktioniert leider auch nicht..

auch mit folgendem komme ich nicht zum ergebnis

WebBrowser1.OleObject.document.getElementById('adv ancedFilterPanel').elements.item(1).click;


habe noch was im internet gefunden funktioniert aber leider auch nicht

procedure TForm1.Button1Click(Sender: TObject);
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.Forms.Item( 0 ).Elements;
for i := 0 to ( ovElements.Length-1 ) do
if ( AnsiUpperCase( ovElements.Item( i ).tagName ) = 'INPUT' ) then
if ( AnsiUpperCase( ovElements.Item( i ).type ) = 'SUBMIT' ) or
( AnsiUpperCase( ovElements.Item( i ).type ) = 'BUTTON' ) then
if ( ovElements.item( i ).Value = 'Some text' ) then
ovElements.Item( i ).Click;
end;



Hmm bei mir habe ich im Code stehen

<a class="linkButton" href="javascript:void(false);" onclick="togglePanel(this,'advancedFilterPanel','E rweiterte Filter einblenden','Erweiterte Filter ausblenden');">
Erweiterte Filter einblenden
</a>

<br/><br/>

<div id="advancedFilterPanel" style="display:none;">

<input type="hidden" value="false" name="advancedFilterPanel:isVisibleInput" id="advancedFilterPanel_isVisibleField"/>

Diesen müßte ich ansteuern.

Ein weiteres Problem habe ich weiter unten auf der HTML Seite

&nbsp;&nbsp;

(<a href="javascript:void(false);" onclick="toggleCheckboxes('auftragGroup', true);">Alle auswählen</a>&nbsp;/&nbsp;
<a href="javascript:void(false);" onclick="toggleCheckboxes('auftragGroup', false);">Auswahl entfernen</a>)

&nbsp;&nbsp;

Ich müßte irgendwie auf das
(<a href="javascript:void(false);" onclick="toggleCheckboxes('auftragGroup', true);">Alle auswählen</a>
klicken..

Habe mir auch mal eine Listbox gemacht die mir alle Links raussucht auf der Webseite und die man über die Listbox auch anklicken kann, aber leider funktionieren Javascripts nicht darüber

Hat jemand eine Idee ?

Gruß