C ++ Builder grafik komponentlari

sinf TMyShape : davlat TGraphicControl

{

jamoat:

 

virtual _fastcall TMyShape (TComponent * egasi);

__publi to'kilgan:

TPen * FPen;

TBrush * FBrush;

 

void_fastcall StyleChanged ( TObject * Yuboruvchi);

};

 

_fastcall TMyShape :: TMyShape (TComponent * egasi)

: TGraphicControl (Egasi) {

Kenglik = 64;

Balandligi = 64;

PPen = yangi TPen;

FPen-> OnChange = StyleChanged; // qalam uslubini o'zgartirish

FBrush = yangi TBrush;

FBrush-> OnChange = StyleChanged; // cho'tka uslubini o'zgartirish}

 

void_fastcall TMyShape :: StyleChanged (TObject * Sender) {

Yaroqsiz ();

}

7.4 ro'yxati. TMyShape komponentalari Unit1.h va Unit1.cpp fayllarining tarkibi.

Vizual kutubxonaning TShape geometrik shakllarini chizish uchun grafik komponent Komponent o'zining qalam va cho'tka xususiyatlarini _published bo'limida e'lon qiladi . Komponent ob'ekti konstruktori OnChange hodisasiga StyleChanged usulini tayinlaydi , natijada komponent qalam yoki cho'tka o'zgarganda chizilgan shakllarini qayta chizishga olib keladi. TShape komponentasining asl matni Object Pascal- da yozilgan bo'lsa-da, 7.4-ro'yxatda TMyShape yangi nomi bilan C ++ tiliga tarjima ko'rsatilgan.