Also. Im ObjektInspektor gibt es beim TWebBrowser ein Event, das heißt OnDeocumentComplete. Die Hilfe sagt dazu folgendes:
Zitat von
OnlineHilfe:
In der Ereignisbehandlungsroutine für OnDocumentComplete können Sie Aktionen durchführen, wenn ein Frame oder Dokument vollständig in die TWebBrowser
-Komponente geladen ist. Bei einem Dokument ohne Frames wird dieses Ereignis nur einmal ausgelöst, nachdem das Dokument vollständig geladen wurde. Bei einem Dokument mit mehreren Frames wird das Ereignis einmal pro Frame und dann noch einmal nach dem Laden des gesamten Dokuments ausgelöst.
Ich würde das so machen:
Delphi-Quellcode:
var cur : Integer;
begin
Case cur of
0 : begin
IF CheckListbox1.Checked[cur]
THEN
Procedure1; //Prozedur 1 wird ausgeführt, wenn ein Haken davor steht
Inc(cur); //Cur wird um 1 erhöht.
end;
1 : begin
IF CheckListbox2.Checked[cur]
THEN
Procedure2
Inc(cur)
... usw ...
Wenn du das jetzt ins OnDocumentComplete Ereignis des WebBrowsers schreibst, wird jedesmal, wenn die/oder eine andere Seite fertig geladen ist, die nächste Prozedur ausgefährt.