Ovenstående er hvis det er felt 0 Hvis du vil have dem alle kan du skrive:
var i : integer; begin for i:=0 to Table1.FieldCount-1 do begin showmessage(IntToStr(Integer(Table1.FieldDefs.Items[i].DataType))); showmessage(GetEnumName(TypeInfo(TFieldType),integer(Table1.FieldDefs.Items[i].DataType))); end; end;
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.