Hallo Tom,
wie du an das Dokument in einem verschachtelten Frame heran kommst, weißt du ja schon:
Delphi-Quellcode:
function GetDeepFrameDoc(doc: IHTMLDocument2; v: OleVariant): IHTMLDocument2;
var
win: IHTMLWindow2;
u: IUnknown;
i, lb, ub: Integer;
begin
if VarType(v) and varArray <> 0 then
begin
lb := VarArrayLowBound(v, 1);
ub := VarArrayHighBound(v, 1);
for i := lb to ub do
begin
Result := GetFrameDoc(doc, v[i]);
doc := Result;
end
end else
Result := GetFrameDoc(doc, v)
end;
Die Funktion GetFrameDoc() findet man sicher über die Suche in der
DP. Den
URL der im Frame geladenen Datei erhältst du dann so:
Delphi-Quellcode:
function DocumentUrl(doc: IHTMLDocument2): String;
begin
if Assigned(doc)
then Result := doc.parentWindow.location.href
else Result := '';
end;
Freundliche Grüße vom marabu