我要编个可以显示0-10数字的文本框,代码如下,错哪呢
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=0 to 10 do
edit1.Text:=edit1.text+i;
end;
end.
參考答案:因为i是整型变量,你要换成字符型才可以传给edit
edit1.Text:=edit1.Text +inttostr(i);这样就可以
笑话军事旅游美容女性百态母婴家电游戏互联网财经美女干货家饰健康探索资源娱乐学院 数码美食景区养生手机购车首饰美妆装修情感篇厨房科普动物植物编程百科知道汽车珠宝 健康评测品位娱乐居家情感星座服饰美体奢侈品美容达人亲子图库折扣生活美食花嫁风景 | 首页 |
我要编个可以显示0-10数字的文本框,代码如下,错哪呢
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=0 to 10 do
edit1.Text:=edit1.text+i;
end;
end.
參考答案:因为i是整型变量,你要换成字符型才可以传给edit
edit1.Text:=edit1.Text +inttostr(i);这样就可以