Fórum TClienteDataSet #167254

Olá;

Gostaria de saber com faço para criar um conjunto de campos com TClienteDataSet em tempo de execução. Fiz assim e não funciona.

DMDados.tbDBase.FileName := ExtractFilePath(ParamStr(0)) + ´MyBase1.xml´;
With DMDados.tbDBase.FieldDefs.AddFieldDef do
begin
Name := ´DDD1´;
DataType := ftString;
Size := 4;
Name := ´Fone1´;
DataType := ftString;
Size := 20;
Name := ´Tipo1´;
DataType := ftString;
Size := 20;
Name := ´Particular1´;
DataType := ftString;
Size := 20;
Name := ´DDD2´;
DataType := ftString;
Size := 4;
Name := ´Fone2´;
DataType := ftString;
Size := 20;
Name := ´Tipo2´;
DataType := ftString;
Size := 20;
Name := ´Particular2´;
DataType := ftString;
Size := 20;
end;
DMDados.tbDBase.CreateDataSet;
DMDados.tbDBase.Open;

Obrigado.