Здравствуйте Cyber_Girl, Вы писали:

CG>в дельфи такое пишется :

CG>procedure TForm1.Button1Click(Sender: TObject);
CG>begin
CG> Label1.Caption := (Sender as TButton).Name;
CG>end;
а в Билдере все также не очень сложно, вышеприведенный фрагмент можно переписать в следующем виде:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   Label1->Caption = static_cast<TButton*>(Sender)->Caption;
}

ну и так далее в том же духе...