Hola a todos!
Yo pongo el codigo en el onValidate del campo, y lanzo la exception... pero cuando la capturo?...
Los ubico un poco en la situacion... tengo que hacer un control de stock y quiero verificar que al momento de hacer la factura y al poner la cantidad que quiero del producto, este no supere el stock diponible...
Código Delphi
[-]
procedure TDMDocumento.cdsDetalleCANTIDADValidate(Sender: TField);
begin
dm.cdsArticulos.Open;
dm.cdsArticulos.Locate('idArticulo', cdsDetalleARTICULO.AsInteger,[loCaseInsensitive]);
if Sender.AsInteger > dm.cdsArticulosCANTIDAD.AsInteger then
raise Exception.Create('¡No hay Stock suficiente!');
end;
tengo esto en el onValidate... donde capturo la exception?
desde ya agradezco su ayuda... Saludos
P/d: uso delphi 2007 y firebird 2.0