Question

您好我正在delphi中创建一个Web浏览器，所以现在我要做的就是让用户可以随意修改标题，目前的问题是我使用复选框来检查用户何时想要使用标题在备忘录中的问题是，当我第一次使用它时，它工作正常，但是当我禁用复选框并尝试使用没有标题的浏览器时，标题仍然是活动的，不应该发生。< / p>

用于测试本地

的代码页

<? 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;

Answer 1

回显PHP代码中的时间，以确保服务器每次都受到攻击。此外，请查看标记navNoReadFromCache和navNoWriteToCache以控制缓存。

详细了解Navigate和WebBrowser control。

在Delphi中更新WebBrowser

1 个答案: