Var
I:integer;
begin
if TryStrToInt(Edit1.Text,I) then
begin
Result := I;
end;
edn;
var
i:integer; //数字变量
s:string; //字符串变量
begin
i :=strtoint(edit1.text);
s:=edit1.text;
end;
是什么文本控件？
变量=edit.text ? 不会问这么简单的问题吧，难道你是想从字符串中提取数字？用正则
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024