Fórum Criação de DataSet em tempo de execução #230410

Estou criando os fields do meu ClientDataSet em tempo de execução me baseando neste exemplo retirado do help:

procedure TForm1.FormCreate(Sender: TObject);

begin
with ClientDataSet1 do
begin
with FieldDefs.AddFieldDef do
begin
DataType := ftInteger;
Name := ´Field1´;
end;
with FieldDefs.AddFieldDef do
begin
DataType := ftString;
Size := 10;
Name := ´Field2´;
end;
with IndexDefs.AddIndexDef do
begin
Fields := ´Field1´;
Name := ´IntIndex´;

end;
CreateDataSet;
end;
end;

Estou buscando as definições dos campos em outro ClientDataSet e da primeira vez ocorre tudo muito bem. O problema é quando tento pela segunda vez. Não consigo limpar os fields que existiam anteriormente.

Já tentei:

clientdataset1.FieldDefs.Clear;
clientdataset1.FieldDefList.Clear;


A propriedade StoreDefs do ClientDataSet esta False. Uso Delphi7