abcde

代碼:

with ttable.Create(self) do begin
      databasename:='EmployeePayroll';{Access database alias}
      tablename:='p'+edit1.Text ;
      with fielddefs do begin
              //define datafield
                          begin
                          //employee data
                          add('工號',ftstring,10,false);
                          add('姓名',ftstring,10,false);
                          add('部門',ftstring,10,false);
                          add('部門組別',ftstring,10,false);
                          add('職位',ftstring,10,false);
                          add('到職日期',ftdate,0,false);
                          //date
                          add('應出勤天數',ftfloat,0,false);
                          add('事假天數',ftfloat,0,false);
                          add('病假天數',ftfloat,0,false);
                          add('支薪天數',ftfloat,0,false);
                          //add item
                          add('月計底薪',ftfloat,10,false);

                     end;
                     //define primarykey
                     indexdefs.Add('','工號',[ixprimary,ixunique]);
                     createtable
   問題﹕

   字段"應出勤天數"定義為ftfloat應為浮點數﹐可是到Access中一看﹐字段類型為整型(其它ftfloat字段也是如此)。
   請大家多多指教。