Form de Pesquisa

Gente estou com o seguinte problema tenho um form de entrada de dados onde chamo um form de pesquisa(só que quero aproveitar em todos os formulários de cadastro) até aí tudo bem, qdo dou um duplo clique na grid do form de pesquisa seleciono a linha e abro meu form de cadastro é aí meu problema, pois não posso fazer isso já que vai vou utilizar esse form de pesquisa em vários formulários, então preciso colocar esse procedimento no form de cadastro como????

Preciso passar isso pro form de cadastro , mais ou menos assim
qdo acontecer TFm_Pesq_Descricao.DBGrid1DblClick faça
Como faço isso???

procedure TFm_Pesq_Descricao.DBGrid1DblClick(Sender: TObject);
begin
if (dm_Geral.query1.locate(´Nm_TpDoc´,DBGrid1.Columns[1].Field.AsString,[])) then
begin
Fm_Cad_TpDocumento.DBEdit1.Text := DBGrid1.Columns[0].Field.AsString;
Fm_Cad_TpDocumento.DBEdit2.Text := DBGrid1.Columns[1].Field.AsString;
Fm_Pesq_Descricao.Close;
Fm_Cad_TpDocumento.Show;
end;
end;



Se alguém tiver outra solução pra reaproveitar um form de pesquisa em diferentes formulários???