应该是系统得问题
不行了装Delphi得补丁
s:=Trim(ADOQuery1.FieldByName('Field1').AsString);
if s='正确' then
begin
RzCheckBox2.Checked:=True;
RzCheckBox3.Checked:=False;
end
else
begin
RzCheckBox2.Checked:=False;
RzCheckBox3.Checked:=true;
end;
不行了装Delphi得补丁
s:=Trim(ADOQuery1.FieldByName('Field1').AsString);
if s='正确' then
begin
RzCheckBox2.Checked:=True;
RzCheckBox3.Checked:=False;
end
else
begin
RzCheckBox2.Checked:=False;
RzCheckBox3.Checked:=true;
end;
如果这样的字段,你可以用bit类型,not null ,你在程序判断1 0 就好了
其次,你这种情况出现时,看看表里对应的字段内容,正确?错误?还是null,什么其他值?'select top 1 Field1 from table1' 这个语句好怪啊,确实能是你要的数据吗?