Daniel,
El problema es que la clase TWebBrowser define su evento OnDocumentComplete asi:
Código Delphi
[-]
published
property OnDocumentComplete: TWebBrowserDocumentComplete read FOnDocumentComplete write FOnDocumentComplete;
...
Y revisando el tipo TWebBrowserDocumentComplete tenemos esto:
Código Delphi
[-]
TWebBrowserDocumentComplete = procedure(ASender: TObject; const pDisp: IDispatch;
var URL: OleVariant) of object;
Osea que no te queda otra que sea
ASender 