//引用delphi自带的HTTPApp单元
procedure TForm1.btn1Click(Sender: TObject);
var
s: string;
begin
s := ‘abcdefg‘;
s := HttpEncode(UTF8Encode(s));
showmessage(s);
end;
原文地址:https://www.cnblogs.com/studycode/p/11518464.html
时间: 2024-11-05 23:28:31
//引用delphi自带的HTTPApp单元
procedure TForm1.btn1Click(Sender: TObject);
var
s: string;
begin
s := ‘abcdefg‘;
s := HttpEncode(UTF8Encode(s));
showmessage(s);
end;
原文地址:https://www.cnblogs.com/studycode/p/11518464.html