Criação de formulario

Caros Amigos,

Observem a procedure abaixo, de um formulário chamado FrmObjetos, herdado de FrmPadraoConsulta, quando pressiono o botão alterar:

procedure TFrmObjetos.Btn_AlterarClick(Sender: TObject);
begin
inherited;
try
Application.CreateForm(TFrmObjetosAt,FrmObjetosAt);
FrmObjetosAt.ShowModal;
finally
FrmObjetosAt. Release;
end;
end

A dúvida é a seguinte:

Tem como eu substituir TFrmObjetosAt e FrmObjetosAt por duas variáveis
para essa procedure ficar no formulário FrmPadraoConsulta?