• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Delphi URLを実行するときに)

DelphiでのURL実行方法についての質問

このQ&Aのポイント
  • DelphiでのURL実行方法についての質問です。前回の質問で教えていただいた方法を試しましたが、特定のURLではうまくいかない問題が発生しました。
  • 特定のURLでの問題として、ダブルコーテーションが実行させると消えてしまい、目的のページにうまく飛べない状況です。
  • ダブルコーテーションを残すためには、どのようにすればよいのでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • mimis
  • ベストアンサー率66% (16/24)
回答No.1

単純にダブルコーテーションのみ対応させるだけであれば、ダブルコーテーションを HTTPEncode後の%22に置き換えてあげれば簡単に対応できます。 もし、全ての文字列に対応させたい場合はホスト名の後ろの文字をHTTPAPPユニット内の HTTPEncode関数で変換してあげれば、対応できます。 procedure TForm1.Button1Click(Sender: TObject); var urlstr : string; begin urlstr := StringReplace(Edit1.Text,'"','%22',[rfReplaceAll]); ShellExecute(handle, 'open', pchar(urlstr), '', '', sw_shownormal); end;

kunihikomaru
質問者

お礼

ありがとうございます。 おかげ実行できるようになりました。 大変助かりました。

関連するQ&A