1)DataSet.FieldByName('YourField').DataType
2)
ComboBox1.Items.Clear;
for i := 0 to DataSet.FieldCount - 1 do
  Combobox1.Items.Add(DataSet.Fields[i].FieldName);