2013-09-28 84 views
0

嗨我在delphi中制作一个web浏览器,所以现在我要做的是让用户可以随意修改标题,目前的问题是我使用复选框来检查用户何时想要要使用备忘录中的头文件,问题是,当我第一次使用它时,它工作正常,但是当我禁用复选框并尝试在没有头文件的情况下使用浏览器时,头文件仍处于活动状态,正在发生。在Delphi中更新WebBrowser

用来测试本地

<? php 

$ nav = $ _SERVER ['HTTP_USER_AGENT']; 

echo "<h1> Test:". $ nav. "</ h1>"; 

?> 

代码delpi

TForm2.sButton1Click procedure (Sender: TObject); 
var 
    Flags, Headers, targetFrameName, PostData: OleVariant; 
    Url, Ref: string; 
begin 

    Flags: = '1 '; 
    TargetFrameName: =''; 
    PostData: =''; 
    URL: = sEdit1.Text; 

    if (sCheckBox1.Checked) then 
    begin 
    Headers: = sMemo1.Text; 
    WebBrowser1.Navigate (URL, Flags, targetFrameName, PostData, Headers); 
    end 
    else 
    begin 
    Headers: =''; 
    WebBrowser1.Navigate (URL, Flags, targetFrameName, PostData, Headers); 

    end; 

end; 
+0

你想刷新实际页面? –

+1

我很难理解你想要做什么 –

+0

我只想避免重复标题,因为当我浏览和使用选项标准标题时,标题在网页浏览器中处于活动状态 –

回答

0

Echo在PHP代码的时间,以确保服务器每次击中的代码页。另外,请看标志navNoReadFromCachenavNoWriteToCache来控制缓存。

了解更多关于NavigateWebBrowser control

+0

谢谢马库斯亚当斯 –