delphi的webbrower怎么样可以自定义显示的html内容？
delphi的webbrower怎么样可以自定义显示的html内容？
日期：2013-07-10 10:20:23 人气：1
function HTMLProcess(strCode: string): string;
begin
Result := 'asd';
end;
procedure TForm1.WebBrowser1DocumentComplete(ASender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
Var
doc: IHTMLDOcument2;
strCode: String;