var
isf:boolean;
begin
isf:=fieldbyname('tong_kztf').AsBoolean;
end;
tong_kztf:
0
0
0
0
1
1
怎么我的出的结果都是false;
需要怎么操作,谢谢
得到正确答案就给分
isf:boolean;
begin
isf:=fieldbyname('tong_kztf').AsBoolean;
end;
tong_kztf:
0
0
0
0
1
1
怎么我的出的结果都是false;
需要怎么操作,谢谢
得到正确答案就给分
Bool:此类型在内存中分配4个字节。
boolean:分配1个字节.
var
isf:boolean;
begin
.....
while not ADODataSet.eof do
begin
isf:=fieldbyname('tong_kztf').AsBoolean;
ADODataSet.next;
end;