Программирование в Delphi

[Inostranec]

Помогите пожалуйста с программой в Delphi! Нужно, чтобы при открытии HTML через WebBrowser, он автоматически сохранялся на диске! (Хотя бы чтобы текст HTML сохранялся, и желательно, чтобы можно было указать путь к сохранению. Напимер C:\Новая папка\)
Спасибо...

[Ray79]

procedure TForm1.SpeedButton1Click(Sender: TObject);
var
Document: IHTMLDocument2;
begin
Document := WebBrowser1.Document as IHtmlDocument2;
if Document <> nil then
Memo1.Text := ( Document.all.Item( NULL, 0 ) as IHTMLElement ).OuterHTML;
end;

Вешаешь на что-нибудь типа onNavigateComplete2