, , .
=> File | Save All . => LEDForm.cpp , File | Include Unite Hdr #include "LED. h" . , LEDForm.h, #include "LED.h" . private :
private: // User declarations TLED* LED1;
=> Formi OnCreate. LEDForm.cpp. TLED ( Parent ) :
void_fastcall TFormI::FormCreate(TObject *Sender)
t
LED1 = new TLED(this);
LED1->Parent = this;
// LEDl->Left = (Width/2)-(LEDl->Width/2);
// LEDl->Top = (Height/2)-(LEDl->Height/2);
}
, OnClick Buttoni . :
void_fasfccall TPormI::ButtonlClick(TObject *Sender) (
LEDl->LEDOn =!LEDl->LEDOn;
}
=> , Run | Run.
( , ), "". , (. 6.10).
, . , Tools | Image Editor, File | New | Resource File, a - Resource | New) Bitmap.
2424 VGA (16 Colors). (TLED) Resourse | Rename , (, ). File | Save As LED.res .
. 6.10. .