0

こんにちは私は Delphi で Web ブラウザーを作成しています。今のところ、ユーザーが自由にヘッダーを変更できるようにしています。現在の問題は、チェックボックスを使用して、ユーザーがいつヘッダーを使用したいかを確認することです。メモ問題は、初めて使用するときは正常に動作しますが、チェックボックスを無効にしてヘッダーなしでブラウザーを使用しようとすると、ヘッダーがまだアクティブであり、発生しないはずです。

ローカルのテストに使用されるコード ページ

<? php

$ nav = $ _SERVER ['HTTP_USER_AGENT'];

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

?>

コード・デルピ

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

1 に答える 1

0

サーバーが毎回ヒットしていることを確認するために、PHP コードで時刻をエコーし​​ます。さらに、フラグnavNoReadFromCacheを見て、navNoWriteToCacheキャッシュを制御します。

NavigateとWebBrowser コントロールの詳細を参照してください。

于 2013-09-29T17:00:37.910 に答える