Evento BeforePost de un clientDataSet
 

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 [-]
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 [-]
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..?

Dos cosas:

1. Creo que hay mandar llamar el método "Abort" en lugar de "Cancel"

2. Nunca pongas un mensaje antes de una cancelación. Te puede pasar que el usuario nunca le de aceptar al error y deja la operación pendiente. Es mejor que primero llames al método "Abort" y luego muestres el mensaje.

Gracias..
 

Muchas gracias...
Ahora si..., muchas gracias...