如何把文字转成带%和字母的?(50)

  • 主题发起人 主题发起人 bo717
  • 开始时间 开始时间
B

bo717

Unregistered / Unconfirmed
GUEST, unregistred user!
例如:我们 转成 %CE%D2%C3%C7
 
我们 转化为unicode 为6211 4EEC你这个就不知道怎么转了~~
 
就是网址里边的,你去百度搜索下“我们”,然后网址那里就会是%CE%D2%C3%C7
 
function StringToCode(const AStr: string): string;var i: Integer; p: pChar;begin p := pChar(AStr); while p^<>#0 do begin if Result<>'' then Result := Result + '%' + IntToHex(ord(p^), 2) else Result := Result + '%' + IntToHex(ord(p^), 2); Inc(p); end;end;
 
http://www.delphibbs.com/keylife/iblog_show.asp?xid=31321找到了
 
后退
顶部