Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include "C:\\dllBridge\\WinLego\\Lego\\Lego.h"
- using namespace Lego;
- float fA = 3.09;
- EditBox edt[17];
- ComBox cmb[ 7];
- Button btn[ 7];
- int cnt = 0;
- char sz[33];
- ///////////////////////////////////////////// Эта функция инициализации. Создана специально для Вас ! Она вызывается
- void INIT() // (с помощью таймера №1) 1 единственный раз, когда Timer_CLK == 1.
- {
- btn[ 1].Create("add", 360, 20, 40, 20);
- btn[ 2].Create("dec", 300, 20, 40, 20);
- btn[ 3].Create("Clear", 430, 20, 70, 20);
- btn[ 4].Create("GetCurSel", 470, 104, 70, 20);
- btn[ 5].Create("GetText() from EditBox",380, 370, 160, 20);
- btn[ 5].SetFont(3); // Установим шрифт №3 для надписи на кнопке
- edt[ 1].SeType( 0, 1);
- edt[ 1].Create("Paramaunt Pictures",30, 20, 200, 20);
- edt[ 2].SeType(10, 2);
- edt[ 2].Create("111" , 30, 50, 70, 20);
- edt[ 3].SeType(11, 3);
- edt[ 3].Create("111,777", 30, 80, 70, 20);
- edt[ 4].SeType(12, 4);
- edt[ 4].Create("111,777", 30, 110, 70, 20);
- edt[ 5].SeType(13, 5);
- edt[ 5].Create("111,777", 30, 140, 70, 20);
- edt[ 6].SeType(14, 6);
- edt[ 6].Create("111,7771", 30, 170, 70, 20);
- edt[ 7].SeType(-10, 7);
- edt[ 7].Create("-77", 30, 200, 100, 20);
- edt[ 8].SeType(-11, 8);
- edt[ 8].Create("-77,1", 30, 230, 100, 20);
- edt[ 9].SeType(-12, 9);
- edt[ 9].Create("-77,777", 30, 260, 100, 20);
- edt[10].SeType(-13, 10);
- edt[10].Create("-77,111", 30, 290, 100, 20);
- edt[11].SeType(-14, 11);
- edt[11].Create("-77,7771", 30, 320, 100, 20);
- edt[12].SeType(-15, 12);
- edt[12].Create("-77,77711", 30, 350, 100, 20);
- edt[13].SeType(-16, 1);
- edt[13].Create("-77,222116", 30, 380, 100, 20);
- edt[14].SeType( 10, 1);
- int C = RGB( 85, 65, 65); // Устанавливаем свой цвет...
- edt[14].TextColor = RGB(255, 255, 25);//RGB( 255, 150, 120); // шрифта
- edt[14].BackColor = C; // для заднего фона
- edt[14].brush = CreateSolidBrush(C); // заливка (кисть) вокруг задного фона.
- edt[14].Create("7", 300, 370, 40, 20);
- edt[14].Dia_UP = 13;
- edt[14].Dia_Down = 1;
- cmb[1].SetColor(RGB(255, 169, 0), RGB(15, 69, 51), hBr[0]);
- cmb[1].Create("Audio cassette:", 300, 100, 140, 260);
- cmb[1].AddString("TDK" );
- cmb[1].AddString("SONY" );
- cmb[1].AddString("JVC" );
- cmb[1].AddString("DENON" );
- cmb[1].AddString("Maxell");
- wsprintf(sz, "Select the number of the input field.");
- Print_2(300, 325, sz);
- wsprintf(sz, "The range of values is from 1 to 13");
- Print_2(300, 345, sz);
- }
- ///////////////////////////////////////////// Эта функция вызывается (с помощью таймера №2) 5 раз в секунду, когда
- void START() // Timer_CLK >= 2.
- {
- if(btn[1].Press())
- {
- wsprintf(sz, "add_%d", cnt++);
- cmb[1].AddString(sz);
- }
- if(btn[2].Press())
- {
- //wsprintf(sz, "add_%d", cnt++);
- cmb[1].DeleteString(0);
- }
- if(btn[3].Press())
- {
- //wsprintf(sz, "add_%d", cnt++);
- cmb[1].Clear();
- }
- if(btn[4].Press())
- {
- wsprintf(sz, " ");
- Print_2(370, 140, sz);
- wsprintf(sz, "%d = %s ", cmb[1].GetCurSel(), cmb[1].GetText());
- Print_2(300, 140, sz);
- //wsprintf(sz, "%s ", cmb[1].GetText());
- //
- }
- if(btn[ 5].Press() )
- {
- wsprintf(sz, " ");
- Print_2(370, 400, sz);
- wsprintf(sz, "%s ", edt[ edt[14].iDigit ].GetText());
- Print_1(300, 400, sz);
- }
- Print_1(620, 220, xBox::cnt);
- wsprintf(sz, "Line %d is selected.", cmb[1].GetCurSel());
- Print_1(300, 70, sz);
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement