2018 年 9月 28 日随笔档案 - michellexiaoqi

2018年9月28日

摘要： vari :Integer;beginfor i := 1 to 10 do(FindComponent('Edit'+inttostr(i)) as TEdit).Text := inttostr(i);end; 阅读全文

posted @ 2018-09-28 09:44 michellexiaoqi 阅读(543) 评论(0) 推荐(0) 编辑