| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как программно определить тип поля в таблице Intebase??? [D5, IB6.x]

vvs1981 ©   (2002-08-26 14:25:00) 

Как программно определить тип поля в таблице Intebase???

---

loto   (2002-08-26 16:54:00) [1]

s := GetFieldType( DataSet.Fields[i] );

function GetFieldType(F:TField):string;
begin
case F.DataType of
ftUnknown : Result:="Unknown";
ftString : Result:="String";
ftSmallint : Result:="Smallint";
ftInteger : Result:="Integer";
ftWord : Result:="Word";
ftBoolean : Result:="Boolean";
ftFloat : Result:="Float";
ftCurrency : Result:="Currency";
ftBCD : Result:="BCD";
ftDate : Result:="Date";
ftTime : Result:="Time";
ftDateTime : Result:="DateTime";
ftBytes : Result:="Bytes";
ftVarBytes : Result:="VarBytes";
ftAutoInc : Result:="AutoInc";
ftBlob : Result:="Blob";
ftMemo : Result:="Memo";
ftGraphic : Result:="Graphic";
ftFmtMemo : Result:="FmtMemo";
ftParadoxOle : Result:="ParadoxOle";
ftDBaseOle : Result:="DBaseOle";
ftTypedBinary: Result:="TypedBinary";
ftCursor : Result:="Cursor";
ftFixedChar : Result:="FixedChar";
ftWideString : Result:="WideString";
ftLargeint : Result:="Largeint";
ftADT : Result:="ADT";
ftArray : Result:="Array";
ftReference : Result:="Reference";
ftDataSet : Result:="DataSet";
ftOraBlob : Result:="OraBlob";
ftOraClob : Result:="OraClob";
ftVariant : Result:="Variant";
ftInterface : Result:="Interface";
ftIDispatch : Result:="IDispatch";
ftGuid : Result:="Guid";
ftTimeStamp : Result:="TimeStamp";
ftFMTBcd : Result:="FMTBcd";
end;
end;


---

Johnny Smith   (2002-08-26 15:42:00) [2]

Если работаешь с потомком Dataset"a, то тип i-го поля будет:
DataSet.Fields[i].DataType;

---

Наверх