由数据库数据生成XML的方法（有源码）[4]

                temp := floattostr(table.fields[i].asfloat) 
              else 
                 temp := '0'; 
          end; 
          ftboolean: 
          begin 
              if table.fields[i].value then 
                temp:= 'true' 
              else 
                temp:= 'false'; 
          end; 
          ftdate: 
          begin 
              if (not table.fields[i].isnull) or 
                 (length(trim(table.fields[i].asstring)) > 0) then 
                temp := formatdatetime('mm/dd/yyyy', 
                               table.fields[i].asdatetime) 
              else 
                temp:= '01/01/2000'; //put a valid default date 
          end; 
          ftdatetime: 
          begin 
              if (not table.fields[i].isnull) or 
                 (length(trim(table.fields[i].asstring)) > 0) then 
                temp := formatdatetime('mm/dd/yyyy hh:nn:ss', 
                               table.fields[i].asdatetime) 
              else 
                temp := '01/01/2000 00:00:00'; //put a valid default date and time 
          end; 
          fttime: 
          begin 
              if (not table.fields[i].isnull) or 
                 (length(trim(table.fields[i].asstring)) > 0) then 
                 temp := formatdatetime('hh:nn:ss', 
                             table.fields[i].asdatetime) 
              else 
                 temp := '00:00:00'; //put a valid default time 
          end; 
        end; 
         //