Здравствуйте, как можно сохранить содержимое окна IWebBrowser2 в файл при помощи IPersistFile??? Я пробовал разобраться на delphi все гуд, а вот как на fasm'e не пойму... ... IID_IPersistFile GUID 0000010B-0000-0000-C000-000000000046 ... interface IPersistFile,\ IsDirty,\ Load,\ Save,\ SaveCompleted,\ GetCurFile ... ; Вот таким образом я делаю юникод путь к файлу... invoke GetModuleFileName, 0, full_file, 1024 cld mov esi, full_file xor eax, eax @1: lodsb cmp al, 0 jne @1 std @2: lodsb cmp al, '\' jne @2 cld lodsw mov edi, esi xor eax, eax stosd invoke lstrcat, full_file, cash_file invoke lstrlen, full_file invoke MultiByteToWideChar, CP_ACP, 0, full_file, eax, szBuf, 4000 invoke lstrcpyW, full_file, szBuf ... ; А вот так я перевел пример с С++ на fasm (не работает) cominvk ppw, get_Document, addr iDisp cominvk iDisp, QueryInterface, IID_IHTMLDocument2, addr Html cominvk Html, QueryInterface, IID_IPersistFile, addr pfile cominvk pfile, Save, full_file, TRUE cominvk Html, Release cominvk iDisp, Release ... ppw IWebBrowser2 Html IHTMLDocument2 pfile IPersistFile iDisp IDispatch
Код (Text): cominvk Html, QueryInterface, IID_IPersistFile, addr pfile ; Hresult = 16, facility = 7, code = 123 Вот оно зло!!! Только не могу понять как от него избавиться...
dgs Покажи листинг для Код (Text): IID_IPersistFile GUID 0000010B-0000-0000-C000-000000000046 ... cominvk Html, QueryInterface, IID_IPersistFile, addr pfile
да я уже все сделал. Код (Text): interface IPersistFile,\ QueryInterface,\ AddRef,\ Release,\ GetClassID,\ IsDirty,\ Load,\ Save,\ SaveCompleted,\ GetCurFile ... cominvk ppw, get_Document, iDisp cominvk iDisp, QueryInterface, IID_IHTMLDocument2, Html cominvk Html, QueryInterface, IID_IPersistFile, pfile stdcall UpdateCashPath mov ebx, [pfile] mov eax, full_file mov [pBigBuff], eax comcall ebx,IPersistFile,Save,[pBigBuff] cominvk iDisp, Release cominvk pfile, Release cominvk Html, Release
