Advertisement
Advertisement
| 12.31.2007 at 10:25AM PST, ID: 23051040 |
|
[x]
Attachment Details
|
||
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: |
Code fragment brought together from various methods to illustrate problem. var WebBrowser: TWebBrowser; Frames: IHTMLFramesCollection2; CurrFrame: IHTMLFrameBase; CurrDoc := WebBrowser.Document as IHTMLDocument2; Frames := CurrDoc.frames as IHTMLFramesCollection2; for i := 1 to Frames.length -1 do begin // The line below is the problem CurrFrame := Frames.Item(Index) as IHTMLFrameBase; //Similar code with IHTMLElementCollectios is of course OK //Want to do stuff like end; |