Código Delphi [-] Table1.Edit; Table1.Fields['Cantidad'].AsFloat := Table1.Fields['Cantidad'].AsFloat - 1; Table1.Post;
Table1.Edit; Table1.Fields['Cantidad'].AsFloat := Table1.Fields['Cantidad'].AsFloat - 1; Table1.Post;