[danytorres]

buenas noches amigos del foro estoy realizando una insercion en una tabla de paradox de un archivo TXT, el codigo es el siguiente;

Code:
_____________________________________________________
try

Transferencia.Height:=172;
Archivo.LoadFromFile('C:\NominaObre1.txt');
ProgressBar1.Max:= Archivo.Count;

for I := 0 to Archivo.Count -1 do
begin
Campos.Clear;
Campos.CommaText:= Archivo[i];

If Datamodule2.REMMAE.Locate('CODEMP',Campos[0],[]) then
begin
Datamodule2.REMMAE.Edit;
Datamodule2.REMMAE.Fields[42].Value := Strtofloat(Campos[1]);
Datamodule2.REMMAE.Fields[43].Value := Strtofloat(Campos[2]);
Datamodule2.REMMAE.Fields[44].Value := Strtofloat(Campos[3]);
Datamodule2.REMMAE.Fields[51].Value := Strtofloat(Campos[4]);
Datamodule2.REMMAE.Fields[50].Value := Strtofloat(Campos[5]);
Datamodule2.REMMAE.Fields[36].Value := Strtofloat(Campos[6]);
Datamodule2.REMMAE.Fields[47].Value := Strtofloat(Campos[7]);
Datamodule2.REMMAE.Post;

end;
showmessage( 'Ficha del trabajador ='+Campos[0]);

Application.ProcessMessages;
ProgressBar1.Position:=i +1;

end;

finally
Archivo.Free;
Campos.Free;
end;
_______________________________________________________________



El error que meda es el siguiente : Couldn't perform the edit because another user changed the record.

Este error meda cuando a insertado mas de 10 lineas del txt.


Que hago????