DELPHI-如何将枚举名称显示为字符串(TFieldType)

System.TypInfo添加到您的uses语句:

var

   i : integer;
   pColumn : TcxGridDBColumn;
begin
   ...
   for i := 0 to pGridView.VisibleColumnCount - 1 do
    begin
      pColumn := TcxGridDBColumn( pGridView.VisibleColumns[i] );

      ShowMessage( pColumn.DataBinding.FieldName + ' , ' + 
                   GetEnumName( TypeInfo(TFieldType), 
                                ord( pColumn.DataBinding.Field.DataType ) ) );
    end;
   ...






联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678