Как правильно загрузиь html в webrowser

гостья :)
Дата: 20.11.2007 09:55:42
по незнанию делаю так:
var
  outfile, f: TextFile;
begin
    AssignFile(outfile, 'C:\' + OrderNumber + '.txt');Rewrite(outfile);

    QLoadXML.Close;
    QLoadXML.Connection := DModul.ConAl;
    QLoadXML.SQL.Clear;
    QLoadXML.SQL.Add('SELECT RESULT_XML FROM LOCAL_ORDER');
    QLoadXML.Open;

    writeln(outfile, '');
    writeln(outfile, QLoadXML.FieldByName('RESULT_XML').AsString);
    CloseFile(outfile);
    RenameFile ('C:\' + OrderNumber + '.txt', 'C:\' + OrderNumber + '.xml');

    WebBrowser.Navigate('C:\' + OrderNumber + '.xml')
end;

но вродьб эт как то по корявому....)))
Tellur
Дата: 20.11.2007 10:28:00
что то наподобии этого
  if WebBrowserRep.LocationURL='' then
    begin
      WebBrowserRep.Navigate('about:blank');
      WebBrowserRep.OleObject.Document.Write(s);
    end
  else
    begin
      WebBrowserRep.OleObject.Document.Body.innerHTML:=s;
    end;
гостья :)
Дата: 20.11.2007 10:50:56
Tellur
что то наподобии этого
  if WebBrowserRep.LocationURL='' then
    begin
      WebBrowserRep.Navigate('about:blank');
      WebBrowserRep.OleObject.Document.Write(s);
    end
  else
    begin
      WebBrowserRep.OleObject.Document.Body.innerHTML:=s;
    end;


как то не очень понятно....
Tellur
Дата: 20.11.2007 10:52:39
гостья :)

как то не очень понятно....


что конкретно не понятно?
s - это и будет ваша QLoadXML.FieldByName('RESULT_XML').AsString