Как написать процедуру в Delphi 7

[Dominick1990]

Собственно в чем вопрос: есть на форме 2 панели и одна кнопка. Нужно чтобы при нажатии кнопки выполнялась процедура скрывающая панель с именем указанным в параметре процедуры. Нужна именно процедура, так как она будет использоваться многократно. Наподобие такого:

procedure hidePanel(panel:string);
begin
panel.visible:=FALSE;//только вот тут нужно написать правильно
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
hidePanel('Panel1');
end;

Заранее спасибо за Ваши ответы.

[DiemonStar]

procedure HideControl(Obj:TControl);
begin
  Obj.Visible:=FALSE;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  HideControl(Panel1);
end;

вот так будет правильнее - объект строкой не передаётся.

[Dominick1990]

Спасибо, то что нужно!