Свойство компонента, как параметр метода

    // Объявление метода:
    void  Method( int&  par );
 
    // Определение метода:
    void  Method( int&  par )
    {
      // .........
      par += 2;
    }
 
    // Вызов метода:
    Method( (int&)Panel1->Left );

//---------------------------------------------------------------------------
enum lr_e { elrLeft = -1, elrRight = 1 };
//---------------------------------------------------------------------------
void __fastcall ShiftPanel( TControl* who, int side, int distance )
{
  who->Left += side * distance;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  ShiftPanel( Panel1, elrLeft, 10 );
}
//---------------------------------------------------------------------------

  // определяю метод так:
  void __fastcall  Step_to_Left( TControl*  __cont );
 
  // реализую его так:
  void __fastcall  TForm1::Step_to_Left( TControl*  _cont )
  {
    // .........
    _cont->Left -= 2;  //(РАБОТАЕТ ??? !!!)
  }
 
  // а обращаюсь так:
  Step_to_Left( Panel1 );  //(TControl*)
  // или так:
  Step_to_Left( Button1 );  //(TControl*)
  // или так:
  Step_to_Left( Edit1 );  //(TControl*)

  // приведения к конкретному типу Компонента:
  ((TPanel*)_cont)->Left -= 2;
  // или такого:
  ((TButton*)_cont)->Left -= 2;
  // или такого:
  ((TEdit*)_cont)->Left -= 2;
  // или, соответственно все это-же через - cast.
  // .........