Witam
Mam taki kod, ktory tworzy nowe zakladki TabSheet i Webbrowsera:
var
NewTab : TTabSheet;
NewWeb : TWebBrowser;
begin
NewTab:= TTabSheet.Create(Form1.PageControl1);
NewTab.Visible := True;
NewTab.Caption := 'NAZWA';
NewTab.PageControl := Form1.PageControl1;
Form1.PageControl1.ActivePage:= NewTab;
NewWeb:=TWebBrowser.Create(NewTab);
TWinControl(NewWeb).parent := NewTab;
NewWeb.Align:= alClient;
NewWeb.OnNewWindow2:= NewWindow;
NewWeb.Visible := True;
end;
Ale co zrobic, zeby na kazdym TabSheet na samym dole tworzylo sie automatyczne np. Gauge lub ProgressBar i pokazywalo postep ladowania sie strony?
Z gory dzieki za odpowiedz