Witam
Tak jak w temacie - jak mogę ukryć / ustawić przeźroczystość WebBrowser1 do czasu załadowania strony? Chodzi o to, że nie chcę oglądać białego prostokąta do czasu załadowania strony. Wygląda to mało gustownie...
WebBrowser1 utworzyłem na Panelu (Panel1) aby móc ukryć ramki WebBrowser1 - Panel1 ma pożądaną wielkość, i pozycję, natomiast znajdujący się na nim WebBrowser1 jest o łącznie 4px większy w poziomie i pionie, a następnie ucięty (Left/ Top -2). Takim sposobem nie widzę ramek, a WeBrowser1 pokrywa się z wielkością znajdującego się pod nim Panel1.
Wracając do tematu - ustawienie w opcjach Panel1 Visible na False skutkuje automatycznym ustawieniem niewidzialności także dla WeBrowser1 (jako że ten znajduje się na Panel1). Sądziłem więc, że skoro w ustawieniach ustawię Visible na False, to w evencie NavigateComplete2 ustawię Panel1.Visible:=True; i będzie po problemie, ale...Nie. NavigateComplete2 nie zmienia przeźroczystości Panel1 na True i w efekcie WebBrowser pozostaje niewidoczny cały czas.
Kod (w ustawieniach Panel1 Visible ustawione na False):
procedure TFMain.WebBrowser1NavigateComplete2(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
FMain.Panel1.Visible:=True;
end;
Jak mogę ukryć Panel1 i znajdujący się na nim WebBrowser1 do czasu załadowania się strony (by uniknąć białego prostokąta do czasu załadowania strony) ?
Ktoś podsunie jakieś pomysły? Będę wdzięczny
Pozdrawiam
zamiana znacznika <code class="cpp"> na <code class="delphi"> - Furious Programming