Cita:
|
Empezado por jerosol
qOperacion.ParamByName('PCodigo').AsInteger :=strtoint(edCodigo.text);
qOperacion.ParamByName('PFecha').AsDate :=dtpFecha.Date;
qOperacion.ParamByName('PTotal_Factura').AsFloat:=strtofloat(edtotfac.Text);
qOperacion.ParamByName('PGasto').AsFloat :=strtofloat(edgasto.Text);
qOperacion.ParamByName('PTotal').AsFloat :=strtofloat(edtotal.Text);
|
No entiendo el prefijo
P cuando en realidad ningún parámetro comienza con
P
Código Delphi
[-]
qOperacion.ParamByName('Codigo').AsInteger :=strtoint(edCodigo.text);
qOperacion.ParamByName('Fecha').AsDate :=dtpFecha.Date;
qOperacion.ParamByName('Total_Factura').AsFloat:=strtofloat(edtotfac.Text);
qOperacion.ParamByName('Gasto').AsFloat :=strtofloat(edgasto.Text);
qOperacion.ParamByName('Total').AsFloat :=strtofloat(edtotal.Text);