Fórum Identificar formulario que me chamou ??? #208883

Pessoal , tenho um formulario ( busca_cliente ) a minha dúvida é o seguinte quero identificar em qual formulário q me chamou entende..
Estou usando esse código abaixo , mas de vez em quando ele da pau.

if key =13 then
begin
TituloObjeto := FindWindow(´TFrm_notas´, nil);
if TituloObjeto <> 0 then { Já está aberto }
begin
linha := StringGrid1.Row;
frm_notas.edit6.text := StringGrid1.Cells[0,linha];
frm_notas.edit4.text := StringGrid1.Cells[1,linha];
Close;
end;
TituloObjeto := FindWindow(´Tfrm_Cliente_re´, nil);
if TituloObjeto <> 0 then { Já está aberto }
begin
linha := StringGrid1.Row;
frm_Cliente_re.edit6.text := StringGrid1.Cells[0,linha];
frm_Cliente_re.edit4.text := StringGrid1.Cells[1,linha];
Close;
end;
TituloObjeto := FindWindow(´Tfrm_notas´, nil);
if TituloObjeto <> 0 then { Já está aberto }
begin
linha := StringGrid1.Row;
frm_notas.edit10.text := StringGrid1.Cells[0,linha];
frm_notas.edit9.text := StringGrid1.Cells[1,linha];
Close;
end;
end;
end;

Tem alguma forma melhor de se fazer isso ?
Valeu