Saber origen formulario.

[toorbye]

Creo qn o me he explicado el siguiente codigo se ejecuta en el evento Ondblclick y lo q intento hacer es pasar los datos de un dbgrid a otro situado en otro formulario:
formulario.Dbgrid1.Fields[0].Value := GridArtBusq.Fields[0].Value;Este formulario puede ser llamado por varios formularios, por lo q si pusiese por ej

FrmVentas.Dbgrid1.Fields[0].Value := GridArtBusq.Fields[0].Value;

Intentaria insertar los datos en el grid1 del frmventas, pero
imaginate que el formulario no fue llamado desde FrmVentas y fue llamado
desde FrmStocks por ejemplo....

Quiero evitarme andar con "if" o "case" por ejemplo
if formulario = frmventas then
FrmVentas.Dbgrid1.Fields[0].Value := GridArtBusq.Fields[0].Value
else
if formulario = FrmStocks
FrmStocks.
Dbgrid1.Fields[0].Value := GridArtBusq.Fields[0].Value

No se si me he explicado