[DELPHI] Sincronizzare ProgressBar con processo di download in WebBrowser

[melk75]

Salve a tutti ragazzi!
Mi scuso per la semplicità della mia domanda, ma sono un neofita!
Ho realizzato un piccolo Browser in delphi,ovviamente, e volevo inserire una ProgressBar legata magari agli eventi onDownloadBegin e onDownloadComplete che funzionasse come una qualsiasi progressBar di un Browser facndo vedere graficamente quanto manca per l'efettiva connessione ad un sito (detto in parle povere...molto povere)!!!Sapreste darmi qualche dritta? Perchè non riesco proprio a farla funzionare!!!
Grazie a tutti anticipatamente!

[alka]

Puoi usare l'evento OnProgressChange del controllo TWebBrowser, il quale non è altro che un "wrapper" del controllo ActiveX di Microsoft Internet Explorer.

Nel suddetto evento, puoi scrivere una porzione di codice simile alla seguente:

procedure TForm1.WebBrowser1ProgressChange(
 ASender: TObject; Progress, ProgressMax: Integer);
begin
  ProgressBar1.Max := ProgressMax;
  ProgressBar1.Position := Progress;
end;

In sostanza, rispondi a questo evento impostando il valore massimo di scala che ti viene restituito alla proprietà Max del controllo TProgressBar, e il valore del parametro Progress alla proprietà Position.

Il valore minimo della scala è sempre quello predefinito, 0 (zero), normalmente assegnato alla proprietà Min del controllo TProgressBar.

Ciao!

[melk75]

Grazie 1000 Alka adesso vado a provare! Ma chi è quel genio che ha ideato i Forum???!!!