Subversion Repositories Kolibri OS

Rev

Rev 1705 | Rev 1717 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1698 IgorA 1 
;lang equ ru
2 
 
1714 IgorA 3 
include 'obj_codes.inc'
1698 IgorA 4 
 
1714 IgorA 5 
macro ObjOpt c,bl_type,graph,info,caption,Col,img,bit_prop
1698 IgorA 6 
{
7 
db c
8 
db bl_type
9 
db graph
10 
@@: db info
11 
rb @b+30-$
12 
@@: db caption
13 
rb @b+MAX_LEN_OBJ_TXT-$
14 
dw Col
1714 IgorA 15 
dw img ;индексы картинок (в файле 'icon.bmp')
16 
dd bit_prop+0
1698 IgorA 17 
}
18 
 
1714 IgorA 19 
ObjOpt C_TDF,  0,0,'Тип данного','',\
1705 IgorA 20 
	< 0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
21 
	< 3, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
1714 IgorA 22 
ObjOpt C_VAR,  0,0,'Переменная','имя переменной*значение по умолчанию*комментарий',\
1705 IgorA 23 
	<40, 80,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
24 
	< 0, -1,  5, -1, -1, -1, -1, -1, -1, -1, -1>
1714 IgorA 25 
ObjOpt C_STR,  1,0,'Структура','имя структуры*параметры для макроса',\
1705 IgorA 26 
	<40,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
27 
	< 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
1714 IgorA 28 
ObjOpt C_ACO,  1,0,'Авто код','',\
1698 IgorA 29 
	<0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
1714 IgorA 30 
	<2, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>,\
31 
	txt_bit_auto
32 
ObjOpt C_BUT,  1,1,'Кнопка','идентификатор*отступ слева*отступ сверху*ширина*высота*цвет*имя метки при нажатии',\
1698 IgorA 33 
	<20, 40, 60, 80,100,120,  0,  0,  0,  0, 0>,\
1714 IgorA 34 
	<29, 15, 16, 26, 27, 25, -1, -1, -1, -1,-1>,\
35 
	txt_bit_but
36 
ObjOpt C_EDB,  1,1,'Текстовое поле','***отступ сверху*цвет фона*цвет выделения при удерживании shift или мышкой*цвет рамки*при неактивном боксе цвет рамки*цвет текста*максимальная длина текста*начальный текст',\
1698 IgorA 37 
	<30, 40, 50, 60, 80,100,120,140,160,170, 0>,\
1714 IgorA 38 
	<10, 26, 15, 16, 25, 25, 25, 25, 25, -1, 4>,\
39 
	txt_bit_edit
40 
ObjOpt C_OPT,  1,1,'Радио кнопка','имя*отступ слева*отступ сверху*цвет фона внутри*цвет рамки и внутр. галочки*цвет текста*подпись*отступ до надписи*размер квадрата',\
1698 IgorA 41 
	<40, 50, 60, 80,100,120,180,190,  0,  0, 0>,\
42 
	< 9, 15, 16, 25, 25, 25,  4, 26, 27, -1, -1>
1714 IgorA 43 
ObjOpt C_CHB,  1,1,'Флажок','***подпись*цвет фона внутри*цвет рамки и внутр. галочки*цвет текста*отступ до надписи*размер квадрата',\
1698 IgorA 44 
	<40, 50, 60,120,140,160,180,190,  0,  0, 0>,\
1714 IgorA 45 
	< 8, 15, 16,  4, 25, 25, 25, 26, 27, -1, -1>,\
46 
	txt_bit_che
47 
ObjOpt C_TXT,  1,0,'asm код','',\
1698 IgorA 48 
	< 0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
49 
	<11, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
1714 IgorA 50 
ObjOpt C_WND,  1,1,'Окно','**отступ слева*отступ сверху*ширина*высота*цвет клиентской области*цвет заголовка (если есть)',\
1698 IgorA 51 
	<98,100,110,120,130,150,170,  0,  0,  0, 0>,\
1714 IgorA 52 
	<12, -1, 15, 16, 26, 27, 25, 25, -1, -1, -1>,\
53 
	txt_bit_wnd
54 
ObjOpt C_COM,  1,0,'Комментарий','строка комментария',\
1698 IgorA 55 
	< 0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
56 
	< 5, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
1714 IgorA 57 
ObjOpt C_INC,  1,0,'Включение файла','имя файла*комментарий',\
1705 IgorA 58 
	<100, 0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
1698 IgorA 59 
	< 6,  5, -1, -1, -1, -1, -1, -1, -1, -1, -1>
1705 IgorA 60 
ObjOpt C_LIB,  1,0,'Импорт библиотеки','имя библ.*сист. дир.*метка импорта*приставка*ошибка не найдена*ошибка не могу открыть',\
61 
	<30, 80,110,120,160,  0,  0,  0,  0,  0, 0>,\
62 
	<20, -1, -1, -1,  4,  4, -1, -1, -1, -1, -1>
63 
ObjOpt C_IFN,  1,0,'Функция из библиотеки','програмное имя функции*импортируемое имя функции',\
64 
	<100, 0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
65 
	<21, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
1714 IgorA 66 
ObjOpt C_DTT,  1,1,'Рисование текста','текстовая строка*координата по x*координата по y*цвет текста*цвет фона (если есть)',\
1698 IgorA 67 
	<40, 50, 60, 80,  0,  0,  0,  0,  0,  0, 0>,\
1714 IgorA 68 
	< 4, 15, 16, 25, 25, -1, -1, -1, -1, -1, -1>,\
69 
	txt_bit_caption
70 
ObjOpt C_REC,  1,1,'Прямоугольник','цвет*отступ слева*отступ сверху*ширина*высота',\
1698 IgorA 71 
	<20, 40, 60, 80,  0,  0,  0,  0,  0,  0, 0>,\
72 
	<25, 15, 16, 26, 27, -1, -1, -1, -1, -1, -1>
1714 IgorA 73 
ObjOpt C_KEY,  1,0,'Событие на клавиатуру','',\
1698 IgorA 74 
	< 0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
75 
	<28, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
76 
ObjOpt 0x0d,  1,0, '-','',\
77 
	<20,  0,  0,  0,  0,  0,  0,  0,  0,  0, 0>,\
78 
	<-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1>
79 
 
1714 IgorA 80 
dd 0 ;разделитель
1698 IgorA 81 
 
1714 IgorA 82 
;названия битовых свойств
83 
txt_bit_auto db 'подключения файлов',0
84 
	db 'события от мыши',0
85 
	db 'коды элементов',0
86 
	db 'нажатия на кнопки',0
87 
	db 0
88 
txt_bit_wnd db 'подпись окна',0
89 
	db 'окно не закрашивает клиентскую обл.',0
90 
	db 'коорд. относительно клиентской обл.',0
91 
	db 'градиентная заливка раб. обл.',0
92 
	db 0
93 
txt_bit_edit db 'в фокусе',0
94 
	db 'цифры от 0-9',0
95 
	db 0
96 
txt_bit_che db 'check_box выбран',0
97 
	db 0
98 
txt_bit_but db 'не рисовать кнопку',0
99 
	db 'не рисовать границу при нажатии',0
100 
	db 0
101 
txt_bit_caption db 'строка ASCII заканч. 0',0
102 
	db 'заливка фона',0
103 
	db '2-й шрифт',0
104 
	db 0
1698 IgorA 105