Para trabajar con un
TClientDataSet, debes recorrerlo registro por registro, y verificando manualmente.
Ejemplo:
Código Delphi
[-]
procedure RecorrerDataSet(cs: TClientDataSet);
var
begin
with cs do
begin
Active := True;
First;
while not Eof do
begin
Next;
end
Active := False;
end;
end;
Nota:
Tu codigo de comparación para no meter repetidos puede ser
Código:
if cs.FieldByName('Codigo').AsString <> NuevoCodigo then
begin
cs.Append;
cs.FieldByName('Codigo').AsString := NuevoCodigo;
cs.Post;
end;