Можно ли в процедуру(функцию) передавать в качестве параметра переменную класса TForm? Вот примерный код:

procedure TfrmMain.NewProc(MyForm: TForm);
begin
with MyForm do
begin
Всякая всячина....
end;
end;


Дело в том, что у меня на нескольких формах, есть одинаковые по всем параметрам контролы. И чтоб в каждой форме не писать для них одинаковые процедуры, хотелось бы передавать все это через одну процедуру.