ProgressBar

0

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

0

Odsyłam do tematu: dynamiczne tworzenie komponentów... w ten sposób wstawiasz co chcesz i gdzie chcesz... :-|

0

to bylo juz, poszukaj

0

<font color="green">Ale co zrobic, zeby na kazdym TabSheet na samym dole tworzylo sie automatyczne np. Gauge lub ProgressBar i pokazywalo postep ladowania sie strony?</span>

<font color="blue">Gauge.parent := TabSheet;</span>

1 użytkowników online, w tym zalogowanych: 0, gości: 1