analia1979
10-06-2008, 22:20:32
Hola a todos..
Estoy con una aplicacion de un cuenta corriente..El tema es que necesito ir cargando las ventas para una determinada fecha.
Uso un TcxDataEdit de dbExpress para seleccionar la fecha para la cual se van agregar las ventas..
Abajo tengo una dbGrid de dbExpress que esta relacionada con un dataset que tienen el clientdataset donde voy agregando los items de esa fecha para un cliente determinado.
El problema es que para cada item tengo que agregarle la fecha, eso lo hago en el evento BeforePost del clientDataSet.
Código Delphi [-] (http://www.clubdelphi.com/foros/#)
if not VarIsNull(lcbFecha.EditValue) then
begin
cdsVentasFecha.Value := lcbFecha.EditValue;
Lo que que pasa es que si el usuario no selecciono la fecha necesito volver atras..
habia pensado de esta manera:
Código Delphi [-] (http://www.clubdelphi.com/foros/#)
if not VarIsNull(lcbFecha.EditValue) then
begin
cdsVentasFecha.Value := lcbFecha.EditValue;
cdsVentasPrecioTotal.Value := cdsVentasPrecioUnitario.value * cdsVentasCantidad.value;
end
else
begin
ShowMessage('Debes elegir la Fecha');
cdsVentas.Cancel;
Pero el cancel no me lo toma...Hace el post pero con la fecha en blanco..
Ustedes saben como puedo hacer..?
Estoy con una aplicacion de un cuenta corriente..El tema es que necesito ir cargando las ventas para una determinada fecha.
Uso un TcxDataEdit de dbExpress para seleccionar la fecha para la cual se van agregar las ventas..
Abajo tengo una dbGrid de dbExpress que esta relacionada con un dataset que tienen el clientdataset donde voy agregando los items de esa fecha para un cliente determinado.
El problema es que para cada item tengo que agregarle la fecha, eso lo hago en el evento BeforePost del clientDataSet.
Código Delphi [-] (http://www.clubdelphi.com/foros/#)
if not VarIsNull(lcbFecha.EditValue) then
begin
cdsVentasFecha.Value := lcbFecha.EditValue;
Lo que que pasa es que si el usuario no selecciono la fecha necesito volver atras..
habia pensado de esta manera:
Código Delphi [-] (http://www.clubdelphi.com/foros/#)
if not VarIsNull(lcbFecha.EditValue) then
begin
cdsVentasFecha.Value := lcbFecha.EditValue;
cdsVentasPrecioTotal.Value := cdsVentasPrecioUnitario.value * cdsVentasCantidad.value;
end
else
begin
ShowMessage('Debes elegir la Fecha');
cdsVentas.Cancel;
Pero el cancel no me lo toma...Hace el post pero con la fecha en blanco..
Ustedes saben como puedo hacer..?