Ver Mensaje Individual
  #2  
Antiguo 10-02-2010
Avatar de heroe
heroe heroe is offline
Miembro
 
Registrado: may 2006
Ubicación: Cartago, Costa Rica
Posts: 45
Reputación: 0
heroe Va por buen camino
Reccorer TClientDataSet

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
      //Tu codigo   
      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;
Responder Con Cita