C++ Builder - вопросы программирования


         

Листинг 6 5



Листинг 6.5.

Тест компонента NkEdit
#include <vcl.h>
#pragma hdrstop #include "tk_.h" #include "nkedit.cpp" #pragma package(smart_init) #pragma resource "*.dfm" TForml *Forml; // форма TNkEdit *NkEdit; // компонент программиста // конструктор формы __£astcall TForml::TForml(TComponent*Owner):TForm(Owner) { // создадим и инициализируем компонент NkEdit NkEdit = new TNkEdit(Forml);
NkEdit->
Parent = Forml; NkEdit->
Text = "0"; NkEdit->
Left = 10; NkEdit-ХГор = 100; // настроим компонент // зададим границы диапазона NkEdit->
Min = -100; NkEdit->
Max = 100; NkEdit->
EnableFloat = true; // разрешен ввод дробных чисел } // обработка события FormCreate void __fastcall TForml::FormCreate(TObject *Sender) { AnsiString st = "Введите "; // информация о компоненте if (NkEdit->
EnableFloat) st = st + "дробное"; else st = st + "целое"; st = st + " число от "; st = st + FloatToStr(NkEdit->
Min);
st = st + " до "; st = st + FloatToStr(NkEdit->
Max);
Label2->
Caption = st; }







Содержание  Назад  Вперед