No wiec, najpierw robie tak:
WebBrowser1.Navigate('about:');
Teraz moge już coś dodawać. Zmieniam color tła i coś dodaje:
procedure TForm1.Button4Click(Sender: TObject);
var
i: integer;
begin
WebBrowser1.OleObject.Document.write('<BODY BGCOLOR="black">');
for i:=0 to 18 do
begin
with WebBrowser1 do
begin
OleObject.Document.write('<Font color="red">'+IntToStr(i)+'</font>');
end;
end;
end;
Teraz chciałbym wyczyścić zawartość strony ale w sposób dyskretny, czyli, jak dam znow Navigate('about') to dostaje ponownie biały kolor tła, wszystko sie resetuje, a chciałbym wczyczyścić tylko zawartość wpisanego tekstu.
Inne pytanie: Teraz jak coś dodaje to wszystko działa jak Add, czyli dodaje poniżej wcześniej dodanego, a jak zrobić aby działało podobnie jak Insert w Memo, czyli nowy kontent dodaje sie od góry?