1、var
i: integer;
begin
for I := 1 to 20 do
TEdit(FindComponent('Edit'+IntToStr(I))).Caption:='0';
end;
2、3、aqoquery.sql.text:='select * from 人事表 where Rno like '''+edit15.text+'''';
i: integer;
begin
for I := 1 to 20 do
TEdit(FindComponent('Edit'+IntToStr(I))).Caption:='0';
end;
2、3、aqoquery.sql.text:='select * from 人事表 where Rno like '''+edit15.text+'''';
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货