Ciao a tutti,
dovrei caricare una pagina html che si aggiorna automaticamente ogni secondo e modificarla a mio piacimento in streaming per poi visualizzarla in un WebBrowser.
Il codice usato è questo:
BrowserDisplay.Navigate('about:blank');
while BrowserDisplay.ReadyState < READYSTATE_INTERACTIVE do
Application.ProcessMessages;
if Assigned(BrowserDisplay.Document) then
begin
MemoDisplay := IdHTTP1.Get('http://192.168.1.246/display.html');
MemoDisplay := StringReplace(MemoDisplay,'<caption>Remote display</caption>', '<caption></caption>', [rfReplaceAll,rfIgnoreCase]);
sl := TStringList.Create;
sl.text := MemoDisplay;
ms := TMemoryStream.Create;
sl.SaveToStream(ms);
ms.Seek(0, 0);
(BrowserDisplay.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms) );
end;
La pagina me la carica e il replace viene effettuato correttamente ma quando la pagina html si refresha (ogni secondo), il WebBrowser non mi carica più niente rimanendo bianco. Sostanzialmente quando parte il refresh, il WebBrowser perde la visualizzazione e per ripristinarla devo ricaricare il frame che lo contiene.
Sapete dirmi da cosa può dipendere?
Grazie