[Delphi] Problem z Przeglądarką

Stworzyłem przeglądarkę internetową. Nie umię drukować kopiować zaznaczać wszystkiego i zapisywać. Chciałbym umieścić komponent Gauge żeby pokazywać jaki jest postęp. Teoretycznie coś mam ale niedziała najlepiej. Oto kod:

procedure TForm1.WebBrowser1ProgressChange(Sender: TObject; Progress,
ProgressMax: Integer);
var
Percent : integer;

begin

if (ProgressMax <= 0) or (Progress < 0) then
begin
Edit1.text:= 'gotowe';
end
else
begin
Percent := (Progress * 100 ) div Progressmax;
Edit1.Text := Format('pobieranie strony: %dk'+' '+ ComboBox1.Text, [progressmax div 1024]);
Gauge1.Hint:=Format('pobieranie strony: z %dk'+' '+ ComboBox1.Text, [progressmax div 1024]);
Gauge1.Progress:=Percent;
end;
end;

mój e-mail : [email protected]

help me Bartek

jeżeli chcesz zeby twoja przeglądara robiła ww rzeczy to odwiedz http://www.torry.net i w dziale TIPSI NTERNET masz kody na to

wow - musisz być dobry jeśli faktycznie stworzyłeś swój IE :)) - zarejestruj się www.wi-download.qs.pl i tam dostaniesz ocenę prawdziwych speców! :)

IEFrame :-D