Problem Z Delphi

[korall]

niewiem gdzie robie blad ale :

2 web browsery .. otwieraja ta sama sttrone .. jesli strony sa identyczne ma sie pojawic button ....

w przypadku porownania takiego jak ponizej button sie nieujawnia .. pomimo ze zmienne D i E przyjmuja wartosci .. sa one jednak rozne:/ ktos wie moze czemu ??

 

kod zamieszczony na dole

 

ps. moze wiecie czy z tbrowsetra da sie wyciagnac rozmiar pliku otwozonego

 

pozdrawiam

korall

 

procedure TForm1.WebBrowserDocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);  begin    with  WebBrowser  do  begin     D:=TWebBrowser(Sender).Document as IHTMLDocument2;   if Assigned(D) then  begin   if E=D then    begin    button1.Visible:= True; end;                           end;       end;procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;  const pDisp: IDispatch; var URL: OleVariant);    begin   with WebBrowser1 do  begin     E:=TWebBrowser(Sender).Document as IHTMLDocument2;    if Assigned(E) then  begin   if E = D then     begin     button1.Visible:= True;  end;