- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Delphi URLを実行するときに)
DelphiでのURL実行方法についての質問
このQ&Aのポイント
- DelphiでのURL実行方法についての質問です。前回の質問で教えていただいた方法を試しましたが、特定のURLではうまくいかない問題が発生しました。
- 特定のURLでの問題として、ダブルコーテーションが実行させると消えてしまい、目的のページにうまく飛べない状況です。
- ダブルコーテーションを残すためには、どのようにすればよいのでしょうか?
- みんなの回答 (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;
お礼
ありがとうございます。 おかげ実行できるようになりました。 大変助かりました。