西
西凉老猫
Unregistered / Unconfirmed
GUEST, unregistred user!
代码一：
begin
table1.Append;
Table1.Fields[0].asinteger:=StrToInt(edit1.text);
table1.Fields[1].AsString:=edit2.text;
table1.Post;
end;
代码二
var
i:integer;
str:string;
begin
i:=StrToInt(edit1.text);
str:=edit2.text;
table1.Append;
Table1.Fields[0].asinteger:=i;
table1.Fields[1].AsString:=str;
table1.Post;
end;
两段代码的功能是一样的，但是代码一里面字段得到得值都是空值。
而代码二里给字段赋得值都是edit1.text和edit2.text。
是怎么回事？
你们试试！
begin
table1.Append;
Table1.Fields[0].asinteger:=StrToInt(edit1.text);
table1.Fields[1].AsString:=edit2.text;
table1.Post;
end;
代码二
var
i:integer;
str:string;
begin
i:=StrToInt(edit1.text);
str:=edit2.text;
table1.Append;
Table1.Fields[0].asinteger:=i;
table1.Fields[1].AsString:=str;
table1.Post;
end;
两段代码的功能是一样的，但是代码一里面字段得到得值都是空值。
而代码二里给字段赋得值都是edit1.text和edit2.text。
是怎么回事？
你们试试！