Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как очистить кеш определённой страници в TWebBrowser [D7, WinXP]


ROMBLLER ©   (2005-01-11 19:43:00) 

Всем привет... у меня вот такая задачка.. :)... мне надо сделать подобие Ctrl+F5 в InExploer.. для TWebBrowser...
В общим то я могу весь Кеш очистить... но у меня в проге используются аш 3 TWebBrowser ... и в одном из них чат... и почему-то он не хотить обновляться пака не нажмешь не просто f5 а Ctrl+F5 - очистка Кеша данной страницы.... сами понимаете, сидеть и постоянно жать Ctrl+F5 как-то тупо... а как заставить его самого это делать я блин ни как не врублюсь... в общим плиз, нужна функция для очистки Кеша странице только для определённого TWebBrowser... заранее благодарен... :)


ROMBLLER   (2005-01-13 19:11:00) [1]

дамс.. обновлять он начал.. вот только всёравно сообщения не меняются... пока не нажать Ctrl+F5... ну и что теперь народ посоветует?...


VMcL   (2005-01-13 08:28:00) [2]

Я бы написал как-то так:

procedure TForm1.GoToPageNoCache(const APage: String);
var
  Path: OleVariant;
  Flags: OleVariant;
begin
  Flags := DWORD(navNoReadFromCache or navNoWriteToCache);
  Path := WideString(APage);
  WebBrowser.Navigate2(Path, Flags);  // WebBrowser: TWebBrowser
end;


ROMBLLER   (2005-01-12 18:38:00) [3]

и вообще я нефига в этот TWebBrowser не врубаюсь... кстати, спасибо, что сказал про varя ток сейчас заметил... :)...ну а как тогда эти долбаные флаги использовать.... плиз напишите всю процедуру WebBrowser. Navigate(и что дальше до самого end;


ROMBLLER   (2005-01-12 18:20:00) [4]

очень умно... :)... тебе тоже русский подучить следовало (все-таки ) пишется через дефис... а я вроде бы прошу не ошибки в написании исправлять, а с Navigate помочь....


Piter   (2005-01-12 16:49:00) [5]

ROMBLLER   (12.01.05 11:58) [6]
спасиб.. но эт я уже видел... ток толку не кокого


действительно, толку не будет никакого если читать, но не понимать.
Изучай что такое директива var

P.S. Хотя, перед тем как учить Delphi, я бы все таки посоветовал подучить русский...


ROMBLLER   (2005-01-12 11:58:00) [6]

спасиб.. но эт я уже видел... ток толку не кокого... он всёравно плюётси...

он перестал плеватси только после того как я сделал так

var
variant:olevariant;
begin
variant:=navNoReadFromCache;
WebBrowser1.Navigate(adres,variant);
end;

но он всёравно читает с кеша, и вабще потом перестаёт что-то обновлять...


VMcL   (2005-01-12 08:30:00) [7]

>> ROMBLLER  (12.01.05 00:41) [2]

> а он в ответ плюётси

There is no overloaded version of 'Navigate' that can be called with these 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; var TargetFrameName: OleVariant; var PostData: OleVariant; var Headers: OleVariant); overload;


ROMBLLER   (2005-01-12 01:20:00) [8]

пишет тоже самое....


Piter   (2005-01-12 01:16:00) [9]

Я сейчас бех Дельфи, но может Navigate 2спасет тебя?


ROMBLLER   (2005-01-12 00:41:00) [10]

либо я туплю, либо чёт не то... пишу
WebBrowser1.Navigate(adres,navNoReadFromCache);

а он в ответ плюётси

There is no overloaded version of 'Navigate' that can be called with these arguments


VMcL   (2005-01-11 20:59:00) [11]

>> ROMBLLER  (11.01.05 19:43)

У TWebBrowser.Navigate/Navigate2 есть параметр Flags. Думаю, флаги navNoReadFromCache и/или navNoWriteToCache спасут отца русской демократии.


Наверх

Титульная страница Поиск, карта сайта Написать письмо