Código Delphi [-] var FieldName: String; Field: TField; Filter: String; begin FieldName := cboFieldNames.Text; // tomo el nombre del campo Field := AdoTable.Fields.FieldByName(FieldName); // buscamos el campo por nombre case Field.Datatype of .. end;
var FieldName: String; Field: TField; Filter: String; begin FieldName := cboFieldNames.Text; // tomo el nombre del campo Field := AdoTable.Fields.FieldByName(FieldName); // buscamos el campo por nombre case Field.Datatype of .. end;
Código Delphi [-] case Field.Datatype of ftString, ftWideString: .... end;
case Field.Datatype of ftString, ftWideString: .... end;