Subversion Repositories Kolibri OS

Rev

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