Integer(True) & Interger(false)三少 :o)

解决方案 »

  1.   

    使用字段编辑器!
    双击对应的Table或Query-->右键-->选中要用的字段-->将对应字段的DisplayFormat属性设置为0;1即可!
      

  2.   

    a: boolean;
    b: Integer;
    if a then
      b:= 1
    else
      b:= 0;
      
      

  3.   

    To mutant:
      有必要那么麻烦吗?使用Integer()将True或False强制转换就行了。
      eg: Integer(True) 三少 :o)
      

  4.   

    不,我觉得ePing的是最好的,不过我自己已经搞清楚了,所以就不给分了。Sorry!
      

  5.   

    procedure TFMain.Button3Click(Sender: TObject);begin  button3.caption := inttostr(ord(true));end;procedure TFMain.Button4Click(Sender: TObject);
    begin
      button4.caption := inttostr(ord(False));
    end;