Código Delphi [-] while not(Data.eof) do begin Data.FieldByName('CampoX').AsString := Encryptar(Data.FieldByName('CampoX').AsString); Data.Next; end
while not(Data.eof) do begin Data.FieldByName('CampoX').AsString := Encryptar(Data.FieldByName('CampoX').AsString); Data.Next; end