No atino a encontrar como......

[Pablo Carlos]

Chequea este código que envio... precisamente, creo, es lo que necesitas... aqui intervienen varias tablas... espero te sirva. Saludos

Código Delphi [-]
procedure TfrmFacturacion.tblItemsNotaBeforePost(DataSet: TDataSet);
begin
 tblItemsNotaITE_Total.AsFloat :=
 tblItemsNotaITE_Cantidad.AsFloat *
 tblItemsNotaPrecio.AsFloat;
 tblItemsNotaITE_id_NotaCredito.AsInteger :=
 tblNotaCreditoNotaCredito_id.AsInteger;
 if tblItemsNotaITE_Cantidad.AsString = '' then
  ShowMessage('Indique la cantidad de productos');
end;