Mam na formie 2 komponenty. Jeden - memo, drugi - WebBrowser. Chcę, aby przy pisaniu kodu (html'a) w memo, na WebBrowser ukazywał sie na bieżąco postęp (czyli taki podgląd "na żywo"). Czy ktos ma pomysł, jak to zrobić? :) :-)
Daj update WebBrowsera w OnClick Memo.
Dałem na OnChange Memo taki kod:
WebBrowser1.Navigate('about:blank');
WebBrowser1.OleObject.Document.Write(Memo1.Lines.Text);
Lecz za pierwszym razem jak coś zmienie w Memo, to jest oki. Lecz np, jak wykasuje drugą literkę w kodzie (czyli znowu jest change - zmiana) to już nic nie ma na WebBrowser.
Co jest nie tak? :-8
Może by tak:
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('about:blank');
end;
procedure TForm1.Memo1Change(Sender: TObject);
begin
WebBrowser1.OleObject.document.body.innerHTML := Memo1.Text;
end;
a tak w ogóle to napisz konkretnie co tam przygotowujesz...
Dzięki Piechnat! To był strzał w 10! :P :d
Dzięki Piechnat! To był strzał w 10! :P :d
Dopisane: To właściwie może się odnieść do mojej sygnaturki :P :-)
przepraszam... ale co ma do tego Application.ProcessMessages ?
No...właściwie to nic :-P , ale myślałem może, że nie może pokazać podglądu ze względu na jakieś obciążenie czy co? :d Jestem raczej początkujący, więc proszę mi to wybaczyć :d
Ważne, że problem jest już rozwiązany! :)
Pozdrawiam all! [browar]