关于Delphi字符转换的问题。不会啊!!!帮帮忙!!! VCL组件开发及应用http://www.delphi2007.net/DelphiVCL/html/delphi_20061220231901235.html
输入一个任意长的字符串,使用Stringgrid控件显示字符串及其ASCII码。
s: string;
s:='abc';
IntToHex(Ord(s[n]),2);//返回ASCII码十六进制表示 n=1..Length(s)
楼上正确
ord
procedure TForm1.Button1Click(Sender: TObject);
var
s : string;
i : integer;
begin
s := 'asda';
StringGrid1.ColCount := length(s);
for i := 1 to length(s) do
StringGrid1.Cells[i-1,1] := IntToHex(ord(s[i]),2)
end;
得到答案了吧