delphi创建字段

请问各位，我用动态创建字段，组件是Clientdataset，如果我想程序动态创建混合型字段，请问是怎么写，例如字符,整形，日期就是ftstring,ftinteger,ftdatetime....,我可以用variant声明，这样我可以给任何类型的值，那么这里字段该如何创建，我些ftvariant,怎么报告错误,我想该字段可以给任何类型的值