中科新闻网新时代证券软件下载:这代码错在哪
来源：百度文库 编辑：中科新闻网 时间：2024/05/10 12:50:14
我要写个关于转换ACSII码的程序,
procedure TForm1.Button1Click(Sender: TObject);
var i:string;
begin
i:=edit1.text;
edit2.Text:=inttostr(ord(i));
end;
end.
但在运行时总在edit2.Text:=inttostr(ord(i));这里出错,提示:INCOMPATIBLE TYPES.为什么呢
procedure TForm1.Button1Click(Sender: TObject);
var i:string;
begin
i:=edit1.text;
edit2.Text:=inttostr(ord(i));
end;
end.
但在运行时总在edit2.Text:=inttostr(ord(i));这里出错,提示:INCOMPATIBLE TYPES.为什么呢