Fórum procedure com parâmetro tipo TFORM e TEDIT? #146315

Olá tudo bem?

Tenho um formulário para realizar uma pesquias e disponho dos seguintes componentes no formulário:

Um edit e um dbGrid e a medida que o usuario vai digitando é realizado um filtro, mas o problema é:

Ao clicar no DbGrid desejo pegar as informações e levá-las para o formulário que chamou a pesquisa.

Eu fiz assim

frmEditora.edCodCidade.Text := DBGrid1.DataSource.DataSet.Fields[0].AsString;
frmEditora.edCidade.Text := DBGrid1.DataSource.DataSet.Fields[1].AsString;

Até aqui tudo bem.

Mas eu quero passar o nome do formulario e do edit como parâmetro, ou seja, quero que qualquer formulário utilize esta pesquisa, então, eu quero fazer da seguinte forma:

procedure TfrmPesquisa.devolverPesquisa(formularioQueChamou : TForm; editDoFormularioQueChamou : TEdit);
begin

formularioQueChamou.editDoFormularioQueChamou.Text := DBGrid1.DataSource.DataSet.Fields[0].AsString;

editDoFormularioQueChamou := DBGrid1.DataSource.DataSet.Fields[1].AsString;


end;

Mas dá erro !