Delphi获取URI的查询参数

本文整理自网络，侵删。

 
function ExtractURIQueryString(const URI: string): string;var  QueryStart: Integer;  QueryEnd: Integer;begin  Result := '';  QueryStart := SysUtils.AnsiPos('?', URI);  if QueryStart = 0 then    Exit;  Inc(QueryStart);  QueryEnd := SysUtils.AnsiPos('#', URI);  if QueryEnd < QueryStart then    QueryEnd := Length(URI)  else    Dec(QueryEnd);  Result := Copy(URI, QueryStart, QueryEnd - QueryStart + 1);end;//该代码片段来自于: http://www.sharejs.com/codes/delphi/2260
 

相关阅读 >>

Delphi shellexecute 发送邮件

Delphi xe5 android在桌面添加快捷方式

Delphi 获取分解时间日期的年月日

Delphi遍历进程并获取进程路径

Delphi 截取某个字符之前的字段

Delphi richedit控件中插入图片bmp(bmp,文件),gif(文件)

Delphi控件升级

Delphi货币类型转中文大写金额

Delphi 如何从dll中检索导出函数的列表

Delphi rest application 与 webbroker application 区别

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi获取URI的查询参数