Hola
Realmente no se que pasa pero????
Cuando tengo un problema que no puedo resolver trato de ver que pasa el el codigo sql dando un mensaje asi:
Debajo del codigo que me da el Problema:
Código Delphi
[-]
Begin
AdoTable1.Insert;
AdoTable1.Fields.FieldByName('Numero').AsString := Label8.Caption;
AdoTable1.Fields.FieldByName('Codart').AsString := Data.Cells[0,Fila];
AdoTable1.Fields.FieldByName('Desart').AsString := Data.Cells[1,Fila];
AdoTable1.Fields.FieldByName('Almacen').AsString := Data.Cells[2,Fila];
AdoTable1.Fields.FieldByName('CantDesp').AsFloat :=Strtofloat(Data.Cells[6,Fila]);
Showmessage(AdoTable1.Fields.FieldByName('CantDesp').AsFloat :=Strtofloat(Data.Cells[6,Fila]);
AdoTable1.Fields.FieldByName('Anulado').AsString:='0';
AdoTable1.Fields.FieldByName('Factura').AsString := Label4.Caption;
AdoTable1.Post;
End;
Ta vez veas que pasa
Saludos