za sajalenia niama :))

svalia6 stranicata pravi6 i crc32 i sveriava6 s predi6noto ako ima razlika zna4i e promenena......

a stranjucata e svalis6 s

var
HTMLDocument: IHTMLDocument2;
PersistFile: IPersistFile;
FileName, FileNameTmp: string;
P: PWideChar;
begin
HTMLDocument := WebBrowser1.Document as IHTMLDocument2;
PersistFile := HTMLDocument as IPersistFile;
FileName := 'c:\........'
P := StringToOleStr(FileNameTmp);
PersistFile.Save(P, False);

ima i drugi po hubavi na4ini ama saga niamam vreme :)))

Редактирано от Shveik на 24.07.02 16:11.