C++ Builder ερώτηση σχετικά με TPanel

[nicker]

Γεια σας.

Διαβάζω ένα πρόγραμμα κρεμάλλα το όποιο έχει την εξής εμφάνιση:

 

 

Έχω γράψει τον εξής κώδικα κάθε φορά που πατιέται ένα κουμπί τύπου TPanel:

>void __fastcall TForm1::Panel3MouseDown(TObject *Sender,
     TMouseButton Button, TShiftState Shift, int X, int Y)
{
TPanel *pnl;
pnl=(TPanel*)Sender;
pnl->BevelOuter=bvLowered;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Panel3MouseUp(TObject *Sender, TMouseButton Button,
     TShiftState Shift, int X, int Y)
{
TPanel *pnl;
pnl=(TPanel*)Sender;
pnl->BevelOuter=bvRaised;

}

 

Πως γίνεται ο κώδικας αυτός που έχω γράψει σε ένα TPanel να εκτελείται και στα υπόλοιπα 25 για να μην κάνω copy-paste χειροκίνητα σε όλα τα Panel;

[Directx]

Γεια σας.

Διαβάζω ένα πρόγραμμα κρεμάλλα το όποιο έχει την εξής εμφάνιση:

 

[ATTACH]24892[/ATTACH]

 

Έχω γράψει τον εξής κώδικα κάθε φορά που πατιέται ένα κουμπί τύπου TPanel:

>void __fastcall TForm1::Panel3MouseDown(TObject *Sender,
     TMouseButton Button, TShiftState Shift, int X, int Y)
{
TPanel *pnl;
pnl=(TPanel*)Sender;
pnl->BevelOuter=bvLowered;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Panel3MouseUp(TObject *Sender, TMouseButton Button,
     TShiftState Shift, int X, int Y)
{
TPanel *pnl;
pnl=(TPanel*)Sender;
pnl->BevelOuter=bvRaised;

}

 

Πως γίνεται ο κώδικας αυτός που έχω γράψει σε ένα TPanel να εκτελείται και στα υπόλοιπα 25 για να μην κάνω copy-paste χειροκίνητα σε όλα τα Panel;

 

Θα επιλέξεις όλα τα TPanel και ύστερα θα πας στον Object Inspector και στο OnMouseUp θα ορίσεις ως event το Panel3MouseUp, με αυτό τον τρόπο εξηγείς στην VCL ότι θες όλα τα επιλεγμένα TPanel να εκτελούν τον συγκεκριμένο (επιλεγμένο) event handler. Το ίδιο θα κάνεις και για το OnMouseDown των TPanels (θα ορίσεις ως handler το Panel3MouseDown) και τέλος.

[nicker]

Ευχαριστώ πολύ!