Як очистити кеш певної сторінки в TWebBrowser
Всім привіт. у мене ось таке завдання. :). мені треба зробити подібність Ctrl+F5 в InExploer. для TWebBrowser. Загалом я можу весь Кеш очистити. але у мене в прозі використовуються аш 3 TWebBrowser. та в одному з них чат. і чомусь він не хоче оновлюватися поки не натиснеш не просто f5, а Ctrl+F5 - очищення Кеша даної сторінки. самі розумієте, сидіти і постійно натискати Ctrl+F5 якось тупо. а як змусити його самого це робити я млинець ні як не врублюсь. в загальному пліз, потрібна функція для очищення сторінці Кеша тільки для певного TWebBrowser. заздалегідь вдячний. :)
>>ROMBLLER (11.01.05 19:43)
TWebBrowser.Navigate/Navigate2 має параметр Flags. Думаю, прапори navNoReadFromCache та/або navNoWriteToCache врятують отця української демократії.
або я туплю, або честь не те. пишу WebBrowser1.Navigate(adres,navNoReadFromCache);
а він у відповідь плює
Це не перезавантажили версію "Navigate", що може називатися з цими arguments
Я зараз бех Дельфі, але може Navigate2врятує тебе?
>>ROMBLLER (12.01.05 00:41) [2]
>а він у відповідь плюєс
Це не перезавантажили версію "Navigate", що може називатися з цими arguments
Довідку хакери стерли, а CodeInsight злий адмін заборонив?
procedure Navigate(const URL: WideString); overload;
procedure Navigate(const URL: WideString; var Flags: OleVariant); overload;
procedure Navigate(const URL: WideString; var Flags: OleVariant; var TargetFrameName: OleVariant); overload;
procedure Navigate(const URL: WideString; var Flags: OleVariant; var TargetFrameName: OleVariant; var PostData: OleVariant); overload;
procedure Navigate(const URL: WideString; var Flags: OleVariant; varTargetFrameName: OleVariant; var PostData: OleVariant; var Headers: OleVariant); overload;
спасиб.. але це я вже бачив. струм толку не якого. він все одно плює.
він перестав плеватсі тільки після того, як я зробив так
але він все одно читає з кеша, і взагалі потім перестає щось оновлювати.
ROMBLLER (12.01.05 11:58) [6] спасиб.. але це я вже бачив. струм толку не кокого
P.S. Хоча, перед тим як вивчати Delphi, я б все-таки порадив навчити українську.
дуже розумно. :). тобі теж українську навчити слід (все-таки) пишеться через дефіс. а я начебто прошу не помилки в написанні виправляти, а з Navigate допомогти.
і взагалі я нефіга в цей TWebBrowser не включаюсь. до речі, дякую, що сказав проvarя струм зараз помітив. :). ну а як тоді ці довбані прапори використовувати. напишіть всю процедуру WebBrowser. Navigate(і що далі до самогоend;
Я б написав якось так:
procedure TForm1.GoToPageNoCache(const APage: String); var Path: OleVariant; Flags: OleVariant; begin Flags := DWORD(navNoReadFromCache або navNoWriteToCache); Path := WideString(APage); WebBrowser.Navigate2(Path, Flags); // WebBrowser: TWebBrowser end;
дамс.. оновлювати він почав.. ось тільки все одно повідомлення не змінюються. доки не натиснути Ctrl+F5. ну і що тепер народ порадить.