Subversion Repositories Kolibri OS

Rev

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

Rev Author Line No. Line
2751 leency 1
//не идёт дальше 98 строки
2
//удалены неиспользуемые переменные
3
//правильное сворачивание в заголовок
4
 
5
//зачем строка 450?
6
//если выделить область ячеек и сдвинуть курсор ввода с помощью клавиш, "следы" остануться
7
//нельзя перемещаться по буквам в редактируемой строке
8
 
1114 leency 9
#include "func.h"
10
#include "parser.h"
990 barsuk 11
#include "calc.h"
1114 leency 12
#include "use_library.h"
13
 
2749 leency 14
#define TABLE_VERSION "0.97"
1114 leency 15
 
16
// строки, которые выводит программа
17
const char *sFileSign = "KolibriTable File\n";
18
const char sFilename[] = "Filename: ";
19
const char sSave[] = "Save";
20
const char sLoad[] = "Load";
21
const char sNew[] = "New";
22
 
23
const char er_file_not_found[] = "Cannot open file. ";
24
const char er_format[] = "Error: bad format. ";
25
const char msg_save[] = "File saved. ";
26
const char msg_load[] = "File loaded. ";
27
const char msg_new[] = "Memory cleared. ";
28
 
29
// свой PID
30
Dword myPID = -1;
31
 
32
// начальные размеры
33
#define WND_W 550
34
#define WND_H 400
35
// новые размеры и координаты
36
int wi = WND_W, he = WND_H;
37
int win_x, win_y;
38
 
39
// цвета элементов интерфейса
40
#define GRID_COLOR 0xa0a0a0
41
#define TEXT_COLOR 0x000000
42
#define CELL_COLOR 0xffffff
43
#define SEL_CELL_COLOR 0xe0e0ff
44
#define FIXED_CELL_COLOR 0xe0e0ff
45
#define SEL_FIXED_CELL_COLOR 0x758FC1
46
#define TEXT_SEL_FIXED_COLOR 0xffffff
47
 
48
#define SCROLL_BAR_WIDTH 16
49
#define SCROLL_BAR_HEIGHT 16
50
 
51
// ID кнопок
52
#define FILENAME_BUTTON 0x10
53
#define SAVE_BUTTON 0x11
54
#define LOAD_BUTTON 0x12
55
#define NEW_BUTTON 0x13
56
#define DRAG_BUTTON 0x20
57
 
58
#define SCROLL_LEFT_BUTTON 0x21
59
#define SCROLL_RIGHT_BUTTON 0x22
60
#define SCROLL_UP_BUTTON 0x23
61
#define SCROLL_DOWN_BUTTON 0x24
62
#define SCROLL_WIDTH 0x25
63
#define SCROLL_HEIGHT 0x26
64
 
65
#define COL_BUTTON 0x100
66
#define ROW_BUTTON (COL_BUTTON + 0x100)
67
#define COL_HEAD_BUTTON (ROW_BUTTON + 0x100)
68
#define ROW_HEAD_BUTTON (COL_HEAD_BUTTON + 0x100)
69
#define CELL_BUTTON (ROW_HEAD_BUTTON + 0x100)
70
 
71
 
72
// нижняя панель с кнопками и полем ввода
73
#define MENU_PANEL_HEIGHT 40
74
Dword panel_y = 0;
1218 Lrz 75
Dword mouse_dd;
76
// для поля ввода
1114 leency 77
 
990 barsuk 78
char edit_text[256] = "";
1218 Lrz 79
edit_box cell_box = {0,9*8-5,WND_H - 16-32,0xffffff,0x6a9480,0,0x808080,0,255,(dword)&edit_text,(dword)&mouse_dd,0};
1114 leency 80
 
81
// ячейки - их параметры и текст
82
DWORD def_col_width = 80, def_row_height = 16;
83
DWORD col_count = 200, row_count = 100;
84
DWORD *col_width, *row_height;
85
char ***cells;
86
char ***values;	// значения формул, если есть
87
 
88
bool display_formulas = 0;	// отображать ли формулы вместо значений
89
 
90
// координаты отображаемых столбцов и строк
91
DWORD *col_left, *row_top;
92
 
93
// буфер обмена
94
char ***buffer = NULL;
95
DWORD buf_col, buf_row;
96
DWORD buf_old_x, buf_old_y;
97
 
98
// это координаты ячейки, отображаемой в ЛВ угле
99
DWORD scroll_x = 1, scroll_y = 1;
100
// это выделенная ячейка
101
DWORD sel_x = 1, sel_y = 1;
102
DWORD prev_x = 0, prev_y = 0;	// предыдущая выделенная
103
int was_single_selection = 0;
104
 
105
// конец выделения если выделено несколько ячеек
106
DWORD sel_end_x = sel_x, sel_end_y = sel_y;
107
 
108
// флаг
109
bool sel_moved = 0;
110
bool sel_end_move = 0;
111
bool window_drawall = false;
112
// сколько ячеек помещается в окне по х и у
113
DWORD nx = 0, ny = 0;
114
 
115
// флаг реадктирования ячейки
990 barsuk 116
//bool is_edit = 0;
117
#define ed_focus 2
1114 leency 118
#define is_edit (cell_box.flags & ed_focus)
119
 
120
// редактирование имени файла
121
bool fn_edit = 0;
990 barsuk 122
char fname[256];
1218 Lrz 123
edit_box file_box = {0,9*8-5,WND_H - 16-32,0xffffff,0x6a9480,0,0x808080,0,255,(dword)&fname,(dword)&mouse_dd,0};
1114 leency 124
 
125
// изменение размеров
126
#define SIZE_X 1 // состояние
127
#define SIZE_Y 2
128
#define SIZE_SELECT 3
129
#define SIZE_DRAG 4
1112 barsuk 130
int size_mouse_x, size_mouse_y, size_id, size_state = 0;
131
 
1114 leency 132
int window_is_dragged = 0; // сейчас перетаскивается окно
133
 
134
// растаскивание ячейки при ее тащении за правый нижний угол, с заполнением ячеек
135
int drag_x, drag_y;
136
int old_end_x, old_end_y;
137
 
138
void draw_window();
139
 
990 barsuk 140
//edit_box ebox = {250,14,35,0xffffff,0x6f9480,0,0xAABBCC,0,248,0,2,20,20};
141
 
142
void kos_DrawRegion(Word x, Word y,Word width, Word height, Dword color1, Word invert)
143
{
144
	kos_DrawLine(x,y,x+width-2,y,color1,invert);
145
	kos_DrawLine(x,y+1,x,y+height-1,color1,invert);
146
	kos_DrawLine(x+width-1,y,x+width-1,y+height-2,color1,invert);
147
	kos_DrawLine(x+1,y+height-1,x+width-1,y+height-1,color1,invert);
1114 leency 148
}
149
 
150
void start_edit(int x, int y)
151
{
152
 
153
	int ch = 0;
154
	if (x < scroll_x || x > nx - 1)
155
	{
156
		scroll_x = x;
157
		ch = 1;
158
	}
159
	if (y < scroll_y || y > ny - 1)
160
	{
161
		scroll_y = y;
162
		ch = 1;
163
	}
164
	if (ch)
165
	{
166
		sel_moved = 1;
990 barsuk 167
		draw_window();
168
	}
169
 
1114 leency 170
	file_box.flags &= ~ed_focus;
171
 
172
	cell_box.flags |= ed_focus;
173
	cell_box.left = col_left[x] + 1;
174
	cell_box.top = row_top[y] + 1;
175
	cell_box.width = col_width[x] - 2;
990 barsuk 176
	//cell_box.height= row_height[y];
1114 leency 177
	memset((Byte*)edit_text, 0, sizeof(edit_text));
990 barsuk 178
	if (cells[x][y])
1114 leency 179
	{
180
		strcpy(edit_text, cells[x][y]);
990 barsuk 181
		edit_text[strlen(cells[x][y]) - 1] = '\0';
182
	}
183
	cell_box.pos = cell_box.offset = 0;
1114 leency 184
 
185
	draw_window();
186
}
187
 
188
void stop_edit()
189
{
190
	if (is_edit)
191
	{
192
		cell_box.flags &= ~ed_focus;
193
		if (cells[sel_x][sel_y])
194
			freemem(cells[sel_x][sel_y]);
195
		if (strlen(edit_text) > 0)
196
		{
197
			cells[sel_x][sel_y] = (char*)allocmem(strlen(edit_text)+1);
198
			strcpy(cells[sel_x][sel_y], edit_text);
199
		}
200
		else
201
			cells[sel_x][sel_y] = NULL;
202
		//memset((Byte*)edit_text,0, 256);
990 barsuk 203
		calculate_values();
1114 leency 204
	}
205
}
206
 
207
void cancel_edit()
208
{
209
	if (!is_edit)
210
		return;
211
	cell_box.flags &= ~ed_focus;
212
	memset((Byte*)edit_text,0, 256);
990 barsuk 213
	draw_window();
1114 leency 214
}
215
 
216
void check_sel()
217
{
218
	DWORD sx0=scroll_x, sy0=scroll_y;
219
 
220
	if (sel_x >= nx - 1  /*&& sel_x < col_count - nx + scroll_x + 1*/)
221
		//if (sel_x == nx)
222
			scroll_x++;
223
		//else
224
		//	scroll_x = sel_x;
225
	if (sel_y >= ny - 1 /*&& sel_y < row_count - ny + scroll_y */)
226
		//if (sel_y == ny)
227
			scroll_y++;
228
		//else
229
		//	scroll_y = sel_y;
230
 
231
	if (sel_x < scroll_x)
232
		scroll_x = sel_x;
233
	if (sel_y < scroll_y)
234
		scroll_y = sel_y;
235
 
236
	if (sx0 != scroll_x || sy0 != scroll_y)
237
		sel_moved = 0;			// надо перерисовать все
238
 
239
}
240
 
241
// сдвинуть выделение
242
void move_sel(DWORD new_x, DWORD new_y)
243
{
244
	sel_moved = 1;
245
	stop_edit();
246
	prev_x = sel_x;
247
	prev_y = sel_y;
248
	sel_x = new_x;
249
	if (sel_x < 1)
250
		sel_x = 1;
251
	if (sel_x > col_count - 1)
252
		sel_x = col_count - 1;
253
	sel_end_x = sel_x;
254
	sel_y = new_y;
255
	if (sel_y < 1)
256
		sel_y = 1;
257
	if (sel_y > row_count - 1)
258
		sel_y = row_count - 1;
259
	sel_end_y = sel_y;
260
	check_sel();
261
	draw_window();
262
}
263
 
264
void draw_custom_button(int x0, int y0, int sx, int sy, int blue_border)
265
{
266
	int x1 = x0 + sx;
267
	int y1 = y0 + sy;
268
 
269
	if (blue_border) kos_DrawRegion(x0-1, y0-1, sx+3, sy+3, 0x94aece, 0);
270
 
271
	// серый прямоугольник
272
 
273
	kos_DrawBar(x0 + 1, y0 + 1, sx - 1, sy - 1, 0xe4dfe1);
274
 
275
	// две белые линии: сверху и слева
276
 
277
	kos_DrawLine(x0, y0, x1, y0, 0xffffff, 0);
278
	kos_DrawLine(x0, y0, x0, y1, 0xffffff, 0);
279
 
280
	// две серые линии: снизу и справа
281
	kos_DrawLine(x0, y1, x1, y1, 0xc7c7c7, 0);
282
	kos_DrawLine(x1, y0, x1, y1, 0xc7c7c7, 0);
283
}
284
 
285
// x - между low и high ? - необязательно low
286
bool is_between(Dword x, Dword low, Dword high)
287
{
288
	return ((low= low && x <= high):(x >= high && x <= low));
289
}
290
 
291
void clear_cell_slow(int px, int py)
292
{
293
	int i;
294
	int x0 = col_width[0];
295
	for (i = scroll_x; i < px; i++)
296
	{
297
		x0 += col_width[i];
298
	}
299
	int x1 = x0;
300
	x1 += col_width[px];
301
	int y0 = row_height[0];
302
	for (i = scroll_y; i < py; i++)
303
	{
304
		y0 += row_height[i];
305
	}
306
	int y1 = y0;
307
	y1 += row_height[py];
308
	kos_DrawBar(x0 + 1, y0 + 1, x1 - x0 - 1, y1 - y0 - 1, 0xffffff);
309
}
310
 
311
//debug
312
const int debugcolor[10]={0xff0000,0x00ff00,0x0000ff,0xffff00,0x00ffff,0xff00ff,0x800000,0x008000,0x000080,0x800080};
313
int debugc=0;
314
 
315
// рисование ячеек
316
#define is_x_changed(v) ((v) == sel_x || (v) == prev_x)
317
#define is_y_changed(v) ((v) == sel_y || (v) == prev_y)
318
 
319
void draw_grid()
320
{
321
	int i,j;
322
	long x0 = 0, y0 = 0, x = 0, y = 0, dx, popravka;
323
	DWORD text_color;
324
	//int lx, ly;
325
 
326
//	sprintf(debuf, "%U,%U", scroll_x, scroll_y);
327
//	rtlDebugOutString(debuf);
328
 
329
	nx=ny=0;
330
 
331
	// очистить область около выделенной ячейки
332
	if (sel_moved)
333
	{
334
		clear_cell_slow(sel_x, sel_y);
335
		clear_cell_slow(prev_x, prev_y);
336
	}
337
	else
338
	{
339
		// очистить всю область ячеек
340
		//kos_DrawBar(col_width[0]+1, row_height[0]+1, wi - SCROLL_BAR_WIDTH-col_width[0]-1, he - SCROLL_BAR_HEIGHT-row_height[0]-1, 0xffffff);
341
	}
342
 
343
	col_left[0] = 0;
344
	// ячейки - заголовки столбцов + вертикальные линии
345
	x = col_width[0];
346
	nx = 1;
347
	for (i = 1; i < col_count; i++)
348
	{
349
		col_left[i] = -1;
350
		if (i >= scroll_x)
351
		{
352
			{
353
				if (!sel_moved || is_x_changed(i))
354
					kos_DrawLine(x-x0, 0, x-x0, row_height[0], GRID_COLOR, 0);
355
			// и заголовок ячейки по х
356
				text_color = TEXT_COLOR;
357
				dx = (col_width[i]-6)/2;
358
				int dy = (row_height[0] - 8) / 2 + 1;
359
				int cur_width = col_width[i] - 1;
360
				if (cur_width + x - x0 > wi - SCROLL_BAR_WIDTH)
361
					cur_width = wi - SCROLL_BAR_WIDTH - x + x0;
362
				if (!sel_moved || (is_x_changed(i)))
363
					if (is_between(i,sel_x,sel_end_x))
364
					{
365
						kos_DrawBar(x - x0 + 1,0,cur_width,row_height[0],SEL_FIXED_CELL_COLOR); //0x0000CC
366
						text_color = TEXT_SEL_FIXED_COLOR;
367
					}
368
					else
369
					{
370
						kos_DrawBar(x - x0 + 1,0,cur_width,row_height[0],FIXED_CELL_COLOR);
371
						text_color = TEXT_COLOR;
372
					}
373
				if (!sel_moved || (is_x_changed(i))) kos_WriteTextToWindow(x-x0+2+dx,dy,0,text_color,cells[i][0],strlen(cells[i][0]));
374
 
375
				// есть кнопка стоблца и еще кнопка изменения ширины
376
				if (x - x0 + col_width[i] <= wi - col_width[0])
2749 leency 377
				{
378
					//kos_DeleteButton(COL_HEAD_BUTTON+i);
1114 leency 379
					kos_DefineButton(x-x0+5,0,cur_width - 10,row_height[0]-1,0x60000000+COL_HEAD_BUTTON+i,0);
2749 leency 380
				}
1114 leency 381
				//kos_DefineButton(x-x0+col_width[i]-10,0,15,row_height[0]-1,0x60000000+COL_SIZE_BUTTON+i,0);
382
				col_left[i] = x - x0;
383
			}
384
			if (x - x0 > wi - col_width[0])
385
			{
386
				x += col_width[i];
387
				nx++;
388
				break;
389
			}
390
		}
391
		else
392
		{
393
			x0 += col_width[i];
394
		}
395
		x += col_width[i];
396
		nx++;
397
	}
398
 
399
	//kos_DefineButton(0,0,0,0,0x80000000+COL_HEAD_BUTTON+i,0);
400
 
401
	for (j = i + 1; j < col_count; j++)
402
		col_left[j] = wi;
403
	//if (!sel_moved || (is_x_changed(nx))) kos_DrawLine(x - x0, 0, x - x0, he, GRID_COLOR, 0);
404
 
405
	// ячейки - заголовки строк + горизонт. линии
406
	y = row_height[0];
407
	ny = 1;
408
	row_top[0] = 0;
409
	for (i = 1; i < row_count && y - y0 < he - 10; i++)
410
	{
411
		row_top[i] = -1;
412
		if (i >= scroll_y)
413
		{
414
			{
415
				if (!sel_moved || (is_y_changed(i)))
416
					kos_DrawLine(0, y - y0, wi - SCROLL_BAR_WIDTH, y - y0, GRID_COLOR, 0);
417
				// и заголовок ячейки по y
418
				text_color = TEXT_COLOR;
419
				dx = (col_width[0]-6 * strlen(cells[0][i]))/2;	// optimize this, change strlen
420
				int dy = (row_height[i] - 8) / 2 + 1;
421
				if (!sel_moved || (is_y_changed(i)))
422
					if (is_between(i,sel_y,sel_end_y))
423
					{
424
						kos_DrawBar(0,y-y0+1,col_width[0],row_height[i] - 1,SEL_FIXED_CELL_COLOR);
425
						text_color = TEXT_SEL_FIXED_COLOR;
426
					}
427
					else
428
					{
429
						kos_DrawBar(0,y-y0+1,col_width[0],row_height[i] - 1,FIXED_CELL_COLOR);
430
						text_color = TEXT_COLOR;
431
					}
432
 
433
				if (!sel_moved || (is_y_changed(i)))
434
					kos_WriteTextToWindow(2+dx,y-y0+dy,0,text_color,cells[0][i],strlen(cells[0][i]));
435
 
2749 leency 436
 
1114 leency 437
				kos_DefineButton(0,y-y0+5,col_width[0]-1,row_height[i]-6,0x60000000+ROW_HEAD_BUTTON+i,0);
438
				//kos_DefineButton(0,y-y0+row_height[i]-5,col_width[0]-1,10,0x60000000+ROW_SIZE_BUTTON+i,0);
439
				row_top[i] = y - y0;
440
			}
441
		}
442
		else
443
		{
444
			y0 += row_height[i];
445
		}
446
		y += row_height[i];
447
		ny++;
448
	}
449
 
450
	kos_DefineButton(0,0,0,0,0x80000000+ROW_HEAD_BUTTON+ny-1,0);
451
 
452
	for (j = i + 1; j < row_count; j++)
453
		row_top[j] = he;
454
	if (!sel_moved || (is_y_changed(ny)))
455
		kos_DrawLine(0, y - y0, wi - SCROLL_BAR_WIDTH, y - y0, GRID_COLOR, 0);
456
 
457
	if (!sel_moved || (is_x_changed(0) && is_y_changed(0)))
458
		kos_DrawBar(0,0,col_width[0],row_height[0],FIXED_CELL_COLOR);
459
	// ЛВ ячейка
460
 
461
	//sprintf(debuf, "%U, %U; %U, %U", x0, y0, nx, ny);
462
	//rtlDebugOutString(debuf);
463
 
464
//	popravka = (y - y0 < he - 10);
465
	//sprintf(debuf, "%U, %U", scroll_y, ny);
466
	//rtlDebugOutString(debuf);
467
 
468
 
469
	// сами ячейки
470
 
471
	y = row_height[0];
472
	for (i = scroll_y; i < ny; i++)
473
	{
474
		x = col_width[0];
475
		if (!sel_moved)
476
			kos_DrawBar(col_width[0]+1, y+1, wi - SCROLL_BAR_WIDTH-col_width[0]-1, row_height[i]-1, 0xffffff);
477
		for (j = scroll_x; j < nx-1; j++)
478
		{
479
			if (!sel_moved || is_x_changed(j) || is_y_changed(i))
480
				kos_DrawLine(col_left[j], row_top[i], col_left[j], row_height[i], GRID_COLOR, 0);
481
 
482
			// заголовки уже нарисованы - пропускаем их
483
			if (i && j)
484
			{
485
				//kos_DrawBar(x+1, y+1, col_width[i]-1, row_height[i]-1, 0xffffff);
486
 
487
				//rtlDebugOutString(cap);
488
				//if (j >= sel_x && j <= sel_end_x && i >= sel_y && i <= sel_end_y)
489
				if (is_between(j,sel_x,sel_end_x) && is_between(i, sel_y, sel_end_y)	// (j,i) - выделена
490
					&& ((!sel_moved) || (is_x_changed(j) && is_y_changed(i))))			// и ее нужно нарисовать
491
				{
492
					if (i == sel_y && j == sel_x)		// рамка
493
					{
494
						kos_DrawBar(x,y,col_width[j],2,TEXT_COLOR);	// up
495
						kos_DrawBar(x,y,2,row_height[i],TEXT_COLOR);	// left
496
						kos_DrawBar(x,y+row_height[i]-2,col_width[j]-2-3,2,TEXT_COLOR);				// bottom
497
						kos_DrawBar(x+col_width[j]-2,y, 2,row_height[i]-2-3,TEXT_COLOR);				// right
498
 
499
						kos_DrawBar(x+col_width[j]-4,y+row_height[i]-4,4,4,TEXT_COLOR);
500
						//kos_DefineButton(x+col_width[j]-2,y+row_height[i]-2,4,4,0x60000000+DRAG_BUTTON,0x000000);
501
						drag_x = x + col_width[j] - 4;
502
						drag_y = y + row_height[i] - 4;
503
					}
504
					else
505
						kos_DrawBar(x + 1,y + 1,col_width[j] - 2,row_height[i] - 2,SEL_CELL_COLOR);	//	выделена но не основная(серая)
506
 
507
				}
508
				//kos_DefineButton(x,y,col_width[j]-1,row_height[i]-1,0x60000000+CELL_BUTTON+((i << 8) + j),0);
509
 
510
				char *text;
511
				if (values[j][i] && values[j][i][0] == '#')
512
				{
513
					text = cells[j][i];
514
					kos_DrawRegion(x+1, y+1, col_width[j]-1, row_height[i]-1, 0xff0000, 0);
515
				}
516
				else
517
					text = (values[j][i] && !display_formulas ? values[j][i] : cells[j][i]);
518
 
519
				int dy = (row_height[i] - 8) / 2 + 1;
520
 
521
				if (text)
522
					if (strlen(text) < col_width[j]/6)
523
						kos_WriteTextToWindow(x+2,y+dy,0,text_color,text,strlen(text));
524
					else
525
						kos_WriteTextToWindow(x+2,y+dy,0,text_color,text,col_width[j]/6);
526
 
527
			}
528
			if (!sel_moved || is_x_changed(j) || is_y_changed(i))
529
				kos_DrawLine(col_left[j]+col_width[j], row_top[i], col_left[j]+col_width[j], row_height[i], GRID_COLOR, 0);
530
			x += col_width[j];
531
		}
532
		y += row_height[i];
533
	}
534
 
535
	// Scrolls:
536
	// horizontal
537
 
538
	//if (!sel_moved) kos_DrawBar(0, he - SCROLL_BAR_HEIGHT, wi - SCROLL_BAR_WIDTH, SCROLL_BAR_HEIGHT, FIXED_CELL_COLOR);
539
	//if (!sel_moved) kos_DrawBar(scroll_x * wi / col_count, he - SCROLL_BAR_HEIGHT, wi / col_count, SCROLL_BAR_HEIGHT, SEL_FIXED_CELL_COLOR);
540
	if (!sel_moved)
541
	{
542
		// горизонталь
543
		kos_DrawBar(17, he - SCROLL_BAR_HEIGHT, wi - SCROLL_BAR_WIDTH - 32, SCROLL_BAR_HEIGHT, 0xced0d0);
990 barsuk 544
		// синие линии
1114 leency 545
		kos_DrawRegion(0, he - SCROLL_BAR_HEIGHT, wi - SCROLL_BAR_WIDTH, SCROLL_BAR_HEIGHT+1, 0x94aece, 0);
546
		// левая кнопка
547
		draw_custom_button(1, he - SCROLL_BAR_HEIGHT + 1, 14, 14, 1);
548
		kos_WriteTextToWindow(6, he - SCROLL_BAR_HEIGHT + 5, 0, 0, "\x1B", 1);
549
		// правая
550
		draw_custom_button(wi - SCROLL_BAR_WIDTH * 2 + 1, he - SCROLL_BAR_HEIGHT + 1, 14, 14, 1);
551
		kos_WriteTextToWindow(wi - SCROLL_BAR_WIDTH * 2 + 6, he - SCROLL_BAR_HEIGHT + 5, 0, 0, "\x1A", 1);
552
		// ползунок
553
		int tmp_w = (nx - scroll_x) * (wi - SCROLL_BAR_WIDTH - 2 * 14 - 14) / (col_count + 1);
554
		if (tmp_w < 16)
555
			tmp_w = 16;
556
		draw_custom_button(17 + (scroll_x - 1) * (wi - SCROLL_BAR_WIDTH - 2 * 14 - 14) / (col_count + 1), he - SCROLL_BAR_HEIGHT + 1,
557
			tmp_w, 14, 1);
558
 
559
#define sw(x,y) y,x
560
// не пинайте меня за это, было лень переставлять руками...
561
 
562
		// вертикаль
563
		kos_DrawBar(sw(17, wi - SCROLL_BAR_WIDTH), sw(he - SCROLL_BAR_HEIGHT - 33, SCROLL_BAR_WIDTH), 0xced0d0);
990 barsuk 564
		// синие линии
565
		kos_DrawRegion(sw(0, wi - SCROLL_BAR_WIDTH), sw(he - SCROLL_BAR_HEIGHT, SCROLL_BAR_WIDTH+1), 0x94aece, 0); // up
1114 leency 566
 
567
		// верхняя кнопка
568
		draw_custom_button(sw(1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, 1);
569
		kos_WriteTextToWindow(sw(5, wi - SCROLL_BAR_WIDTH + 6), 0, 0, "\x18", 1);
570
		// нижняя
571
		draw_custom_button(sw(he - SCROLL_BAR_HEIGHT * 2 + 1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, 1);
572
		//draw_custom_button(sw(he - SCROLL_BAR_HEIGHT * 2 + 1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, 1);
573
		kos_WriteTextToWindow(sw(he - SCROLL_BAR_HEIGHT * 2 + 5, wi - SCROLL_BAR_WIDTH + 6), 0, 0, "\x19", 1);
574
		// ползунок
575
		int tmp_h = (ny - scroll_y) * (he - SCROLL_BAR_HEIGHT - 2 * 14 - 14) / (row_count + 1);
576
		if (tmp_h < 16)
577
			tmp_h = 16;
578
		draw_custom_button(sw(17 + (scroll_y - 1) * (he - SCROLL_BAR_HEIGHT - 2 * 14 - 14) / (row_count + 1), wi - SCROLL_BAR_WIDTH + 1),
579
			sw(tmp_h, 14), 1);
580
	}
581
#define NO_DRAW 0x60000000
582
	kos_DefineButton(1, he - SCROLL_BAR_HEIGHT + 1, 14, 14, NO_DRAW + SCROLL_LEFT_BUTTON,0);
583
	kos_DefineButton(wi - SCROLL_BAR_WIDTH * 2 + 2, he - SCROLL_BAR_HEIGHT + 1, 14, 14, NO_DRAW + SCROLL_RIGHT_BUTTON,0);
584
	kos_DefineButton(17, he - SCROLL_BAR_HEIGHT + 1,  (wi - SCROLL_BAR_WIDTH - 2 * 14), 14, NO_DRAW + SCROLL_WIDTH,0);
585
 
586
	kos_DefineButton(sw(1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, NO_DRAW + SCROLL_UP_BUTTON,0);
587
	kos_DefineButton(sw(he - SCROLL_BAR_HEIGHT * 2 + 2, wi - SCROLL_BAR_WIDTH + 1), 14, 14, NO_DRAW + SCROLL_DOWN_BUTTON,0);
588
	kos_DefineButton(sw(17, wi - SCROLL_BAR_WIDTH + 1),  sw((he - SCROLL_BAR_HEIGHT - 2 * 14), 14), NO_DRAW + SCROLL_HEIGHT,0);
589
 
590
}
591
 
592
// очень быстрое рисование сетки, в процессе изменения размеров ячеек
593
void draw_size_grid()
594
{
595
	//rtlDebugOutString("draw size grid");
596
 
597
	if (size_state == SIZE_X)
598
	{
599
		int x, x0, i;
600
 
601
		x = col_width[0];
602
		x0 = 0;
603
		for (i = 1; i < col_count && x - x0 + col_width[i] < wi - 10; i++)
604
		{
605
			if (i >= scroll_x)
606
			{
607
				if (i >= size_id)
608
					kos_DrawLine(x - x0, 0, x - x0, he, 0, 1);
609
			}
610
			else
611
				x0 += col_width[i];
612
			x += col_width[i];
613
		}
614
		kos_DrawLine(x - x0, 0, x - x0, he, 0, 1);
615
	}
616
	else
617
	{
618
		int y, y0, i;
619
 
620
		y = row_height[0];
621
		y0 = 0;
622
		for (i = 1; i < col_count && y - y0 + row_height[i] < he - 10; i++)
623
		{
624
			if (i >= scroll_y)
625
			{
626
				if (i >= size_id)
627
					kos_DrawLine(0, y - y0, wi, y - y0, 0, 1);
628
			}
629
			else
630
				y0 += row_height[i];
631
			y += row_height[i];
632
		}
633
		kos_DrawLine(0, y - y0, wi, y - y0, 0, 1);
634
	}
635
 
636
}
637
 
638
 
639
// быстрое рисование выделенной области при выделении мышью
640
#define DCOLOR 0
641
//0xff0000
642
#define DINVERT 1
643
void draw_drag()
644
{
645
	// собственно, 4 инверсные линии
646
 
647
	int k0 = min(sel_x, sel_end_x);
648
	int k1 = max(sel_x, sel_end_x);
649
	int n0 = min(sel_y, sel_end_y);
650
	int n1 = max(sel_y, sel_end_y);
651
 
652
	DWORD x0 = col_left[k0] - 1;
653
	DWORD x1 = col_left[k1] + col_width[k1] + 1;
654
	DWORD y0 = row_top[n0] - 1;
655
	DWORD y1 = row_top[n1] + row_height[n1] + 1;
656
	if (x0 > wi - 1) x0 = wi - 1;
657
	if (x1 > wi - 1) x1 = wi - 1;
658
	if (y0 > he - 1) y0 = he - 1;
659
	if (y1 > he - 1) y1 = he - 1;
660
 
661
	//sprintf(debuf,"drag %U %U %U %U",k0,k1,n0,n1);
990 barsuk 662
	//rtlDebugOutString(debuf);
663
 
1114 leency 664
	kos_DrawLine(x0, y0, x0, y1, DCOLOR, DINVERT);
665
	kos_DrawLine(x0, y0, x1, y0, DCOLOR, DINVERT);
666
	kos_DrawLine(x1, y0, x1, y1, DCOLOR, DINVERT);
667
	kos_DrawLine(x0, y1, x1, y1, DCOLOR, DINVERT);
668
}
669
 
670
void draw_window()
671
{
672
	double xx0=0.0, yy0=0.0;
673
	sProcessInfo info;
674
	void *p;
675
 
676
	if (sel_end_move)
677
		sel_moved = 0;
678
 
679
	memset((Byte*)&info, 0, 1024);
680
 
681
	kos_ProcessInfo(&info, 0xFFFFFFFF);
682
	p = info.rawData + 42;			// magic
683
	wi = *(Dword *)(p);
684
	he = *(Dword *)((Byte *)p + 4);
685
	win_x = *(Dword *)((Byte *)p - 8);
686
	win_y = *(Dword *)((Byte *)p - 4);
687
 
688
	myPID = *(Dword*)((Byte *)p - 12);
689
 
690
	if (wi == 0)
691
		wi = WND_W;
692
	if (he == 0)
693
		he = WND_H;
694
 
695
	he -= kos_GetSkinHeight() + MENU_PANEL_HEIGHT; // доступная высота окна
696
	wi -= 10;
697
 
698
	if (window_drawall==true){
699
		kos_WindowRedrawStatus(1);
7495 leency 700
		kos_DefineAndDrawWindow(10,40,WND_W,WND_H,0x73,0x40FFFFFF,0,0,(Dword)"Table v" TABLE_VERSION);
2749 leency 701
		kos_WindowRedrawStatus(2);
1114 leency 702
 
2749 leency 703
		if (info.rawData[70]&0x04) return; //ничего не делать если окно схлопнуто в заголовок
1114 leency 704
 
705
		if (he < 100) kos_ChangeWindow( -1, -1, -1, 180 );
706
		if (wi < 340) kos_ChangeWindow( -1, -1, 350, -1 );
707
 
2749 leency 708
	}
1114 leency 709
 
710
//	edit_box_draw((dword)&ebox);
711
	int y = he + kos_GetSkinHeight() - 10;
712
 
713
	if (!sel_moved)
714
	{
715
		kos_DrawBar(wi-15,he - kos_GetSkinHeight() +7,16,16,0xe4dfe1);
716
		kos_DrawBar(0,he - kos_GetSkinHeight() + 23,wi + 1,MENU_PANEL_HEIGHT-5,0xe4dfe1);
717
		kos_WriteTextToWindow(3 + 1, y + 3, 0x80 , 0x000000, (char*)sFilename, strlen(sFilename));
718
	}
719
 
720
	//DWORD fn_line_color = fn_edit ? 0x000000 : 0xc0c0c0;
721
	//kos_DrawRegion(61, y - 2, 102, 18, fn_line_color, 0);
722
 
723
	// дальше editbox width = 100
724
 
990 barsuk 725
	// border around edit box
1114 leency 726
	file_box.left = 64;
727
	file_box.top = y - 1;
728
	file_box.width = 98;
7495 leency 729
	//editbox_h = 18;
1114 leency 730
 
731
	// сохранить
732
	kos_DefineButton(20 + 160, y - 5, 60, 20, SAVE_BUTTON, 0xd0d0d0);
7495 leency 733
	kos_WriteTextToWindow(22 + 160 + (60 - strlen(sSave) * 6) / 2, y + 2, 0x80, 0x000000, (char*)sSave, 0);
1114 leency 734
 
735
	// загрузить
736
	kos_DefineButton(90 + 160, y - 5, 60, 20, LOAD_BUTTON, 0xd0d0d0);
7495 leency 737
	kos_WriteTextToWindow(92 + 160 + (60 - strlen(sLoad) * 6) / 2, y + 2, 0x80, 0x000000, (char*)sLoad, 0);
1114 leency 738
 
739
	// создать. только эту кнопу воткнуть некуда о_О
740
	/*
741
	kos_DefineButton(90 + 160 + 70, y - 5, 60, 20, NEW_BUTTON, 0xd0d0d0);
742
	kos_WriteTextToWindow(92 + 160 + 10 + 70, y + 2, 0, 0x000000, (char*)sNew, strlen(sNew));
743
	*/
990 barsuk 744
	panel_y = y;
745
 
746
	if ((void*)edit_box_draw != NULL)
747
	{
748
		if (is_edit)
749
			edit_box_draw((DWORD)&cell_box);
750
		edit_box_draw((DWORD)&file_box);
1114 leency 751
	}
752
 
753
	draw_grid();
754
	window_drawall=false;
755
	sel_moved = 0;
756
}
757
 
758
 
759
void process_mouse()
760
{
761
	Dword mouse_btn, ckeys, shift, ctrl;
2749 leency 762
	int mouse_x, mouse_y, i, dx = 0, dy = 0;
1114 leency 763
	int redraw = 0;
764
 
765
	Dword mySlot = kos_GetSlotByPID(myPID);
766
	if (kos_GetActiveSlot() != mySlot)
767
		return;
768
 
990 barsuk 769
	edit_box_mouse((dword)&cell_box);
770
	edit_box_mouse((dword)&file_box);
771
 
1114 leency 772
	int vert, hor;
773
	kos_GetScrollInfo(vert, hor);
774
 
775
	//sprintf(debuf, "scroll %U %U", vert, hor);
776
	//rtlDebugOutString(debuf);
777
 
2749 leency 778
 
1114 leency 779
	if (vert != 0) //труъ перерисовка!
780
	{
2749 leency 781
		if (!((sel_end_y + vert) >= (row_count-1))) //заглушка
1114 leency 782
		move_sel(sel_x, sel_y + vert);
783
		return;
784
	}
785
 
786
	kos_GetMouseState(mouse_btn, mouse_x, mouse_y);
787
	mouse_x -= 5;
1112 barsuk 788
	mouse_y -= kos_GetSkinHeight();
789
 
1114 leency 790
	mouse_btn &= 0x0001;
791
 
792
	ckeys = kos_GetSpecialKeyState();
793
	shift = ckeys & 0x3;
794
 
2749 leency 795
 
1112 barsuk 796
	if (mouse_y < 0 && mouse_btn)	// т.к. мышка на заголовке окна
797
	{
798
		window_is_dragged = 1;
799
		return;
800
	}
801
	if (window_is_dragged)
802
	{
803
		if (mouse_btn)
804
			return;
805
		else
806
			window_is_dragged = 0;
807
	}
808
 
1114 leency 809
	if (!size_state && !mouse_btn)
810
		return;
811
	if (mouse_btn && !size_state)		// LMB down
812
	{
813
		//rtlDebugOutString("lmb down and not resize");
814
 
815
		if (mouse_x >= drag_x && mouse_x <= drag_x + 4 && mouse_y >= drag_y && mouse_y <= drag_y + 4)
816
		{
817
			size_state = SIZE_DRAG;
818
			old_end_x = sel_end_x;
819
			old_end_y = sel_end_y;
820
		}
821
		else if (mouse_y <= row_height[0])
822
		{
823
			//rtlDebugOutString("can resize cols");
824
			int kx = -1, i;
825
			for (i = 0; i < col_count - 1; i++)
826
			if (mouse_x >= col_left[i] + col_width[i] - 5 &&
827
				mouse_x <= col_left[i + 1] + 5)
990 barsuk 828
			{
1114 leency 829
				kx = i; break;
830
			}
831
			if (kx != -1)
832
			{
833
				//sprintf(debuf,"size x %U",k);
834
				//rtlDebugOutString(debuf);
835
				size_id = kx;
836
				size_state = SIZE_X;
837
			}
838
		}
839
		else if (mouse_x <= col_width[0])
840
		{
841
			int ky = -1;
842
			for (i = 0; i < row_count - 1; i++)
843
			if (mouse_y >= row_top[i] + row_height[i] - 5 &&
844
				mouse_y <= row_top[i + 1] + 5)
845
			{
846
				ky = i; break;
847
			}
848
			if (ky != -1)
849
			{
850
				size_id = ky;
851
				size_state = SIZE_Y;
852
			}
853
		}
854
		else		// кликнута ячейка
855
		if (mouse_x <= col_left[nx - 1] &&  mouse_y <= row_top[ny - 1])
856
		{
857
			was_single_selection = sel_x == sel_end_x && sel_y == sel_end_y;
858
			int kx = -1, i;
859
			for (i = 0; i < col_count - 1; i++)
860
			if (mouse_x >= col_left[i] &&
861
				mouse_x <= col_left[i] + col_width[i])
862
			{
863
				kx = i; break;
864
			}
865
			int ky = -1;
866
			for (i = 0; i < row_count - 1; i++)
867
			if (mouse_y >= row_top[i] &&
868
				mouse_y <= row_top[i] + row_height[i])
869
			{
870
				ky = i; break;
871
			}
872
			if (kx != -1 && ky != -1)
873
			{
990 barsuk 874
				if (!shift)
1114 leency 875
				{
990 barsuk 876
					move_sel(kx, ky);
1112 barsuk 877
					//return;
1114 leency 878
				}
879
				else
880
				{
1112 barsuk 881
					sel_end_x = kx;
1114 leency 882
					sel_end_y = ky;
883
				}
884
				size_state = SIZE_SELECT;
885
			}
886
		}
887
		if (size_state)
888
		{
889
			size_mouse_x = mouse_x;
890
			size_mouse_y = mouse_y;
891
		}
892
		return;
893
	}
894
	else if (!mouse_btn && size_state)
895
	{
896
		sel_moved = 0;		// чтобы была тру перерисовка
897
		//rtlDebugOutString("resize end");
898
 
899
		if (size_state == SIZE_DRAG)
900
		{
901
			fill_cells(sel_x, sel_y, sel_end_x, sel_end_y, old_end_x, old_end_y);
902
		}
903
 
904
		//sel_moved = (size_state == SIZE_SELECT && sel_x == sel_end_x && sel_y == sel_end_y && was_single_selection);
905
		size_state = 0;
990 barsuk 906
		draw_window();		// все сдвинулось - надо обновиться
1114 leency 907
		return;
908
	}
909
	if (size_state == SIZE_X && mouse_x != size_mouse_x)
910
	{
911
		draw_size_grid();
912
		col_width[size_id] += mouse_x - size_mouse_x;
913
		if (col_width[size_id] < 15)
914
			col_width[size_id] = 15;
915
		else if (col_width[size_id] > wi / 2)
916
			col_width[size_id] = wi / 2;
917
		draw_size_grid();
918
	}
919
	if (size_state == SIZE_Y && mouse_y != size_mouse_y)
920
	{
921
		draw_size_grid();
922
		row_height[size_id] += mouse_y - size_mouse_y;
923
		if (row_height[size_id] < 15)
924
			row_height[size_id] = 15;
925
		else if (row_height[size_id] > he / 2)
926
			row_height[size_id] = he / 2;
927
		draw_size_grid();
928
	}
929
	if ((size_state == SIZE_SELECT || size_state == SIZE_DRAG) && (mouse_x != size_mouse_x || mouse_y != size_mouse_y))
930
	{
931
		draw_drag();
932
		int kx = -1, i;
933
		for (i = 0; i < col_count - 1; i++)
934
			if (mouse_x >= col_left[i] &&
935
				mouse_x <= col_left[i + 1])
936
			{
937
				//sprintf(debuf, "yyy %U",col_left[i+1]);
938
				//rtlDebugOutString(debuf);
939
				kx = i; break;
940
			}
941
		int ky = -1;
942
		for (i = 0; i < row_count - 1; i++)
943
			if (mouse_y >= row_top[i] &&
944
				mouse_y <= row_top[i + 1])
945
			{
946
				ky = i; break;
947
			}
948
		if (kx != -1) sel_end_x = kx;
949
		if (kx != -1) sel_end_y = ky;
950
		if (size_state == SIZE_DRAG)
951
		{
952
			if (abs(sel_end_x - sel_x) > 0)
953
			{
954
				sel_end_y = old_end_y;
955
			}
956
			else if (abs(sel_end_y - sel_y) > 0)
957
			{
958
				sel_end_x = old_end_x;
959
			}
960
		}
961
		draw_drag();
962
	}
963
	size_mouse_x = mouse_x;
964
	size_mouse_y = mouse_y;
965
}
966
 
967
void process_key()
968
{
969
	Dword mouse_btn, ckeys, shift, ctrl;
2749 leency 970
	int mouse_x, mouse_y, dx = 0, dy = 0;
1114 leency 971
 
972
	// key pressed, read it
973
	Byte keyCode;
974
	ckeys = kos_GetSpecialKeyState();
975
	shift = ckeys & 0x3;
976
	ctrl = ckeys & 0x0c;
977
	//if (ctrl)
978
	//	rtlDebugOutString("control pressed!");
979
	dx = 0, dy = 0;
980
	sel_moved = 0;
981
	sel_end_move = 0;
990 barsuk 982
	kos_GetKey(keyCode);
983
 
984
	__asm
985
	{
986
		mov ah, keyCode
987
	}
988
	edit_box_key((dword)&cell_box);
989
	edit_box_key((dword)&file_box);
990
 
1114 leency 991
 
992
	switch (keyCode)
993
	{
994
		case 178:			// стрелки
995
			//dx = 0;
996
			dy = -1;
997
			break;
998
		case 176:
999
			dx = -1;
1000
			//dy = 0;
1001
			break;
1002
		case 179:
1003
			dx = 1;
1004
			//dy = 0;
1005
			break;
1006
		case 177:
1007
			//dx = 0;
1008
			dy = 1;
1009
			break;
1010
		/*
1011
		case 183:
1012
			if (sel_y < row_count-(ny - scroll_y))	// page down
1013
				dy = ny - scroll_y;
1014
			else
1015
				dy = row_count-(ny - scroll_y) - sel_y;
1016
			dx = 0;
1017
			redraw = 1;
1018
			break;
1019
		case 184:
1020
			if (sel_y > ny - scroll_y)		// page up
1021
				dy= - (ny - scroll_y);
1022
			else
1023
				dy = - (ny - scroll_y) + sel_y;
1024
			dx = 0;
1025
			redraw = 1;
1026
			break;
1027
		*/
1028
		case 180: //home
1029
			dx = -sel_x + 1;
1030
			dy = 0;
1031
			draw_grid(); //draw_window();
1032
			break;
1033
		case 181: //end
1034
			dx = col_count - (nx - scroll_x) - 1 - sel_x;
1035
			dy = 0;
1036
			draw_grid(); //draw_window();
1037
			break;
1038
		case 27:		// escape
1039
			cancel_edit();
1040
			break;
1041
		case 182:			// delete
1042
			{
1043
				int i,j,n0,n1,k0,k1;
1044
				n0 = min(sel_x, sel_end_x);
1045
				n1 = max(sel_x, sel_end_x);
1046
				k0 = min(sel_y, sel_end_y);
1047
				k1 = max(sel_y, sel_end_y);
1048
 
1049
				for (i = n0; i <= n1; i++)
1050
					for (j = k0; j <= k1; j++)
1051
					{
1052
						if (cells[i][j])
1053
						{
1054
							freemem(cells[i][j]);
1055
							cells[i][j] = NULL;
1056
						}
1057
					}
990 barsuk 1058
				calculate_values();
1114 leency 1059
				draw_grid();
1060
				break;
1061
			}
1062
		case 0x0D:			// enter
1063
			if (is_edit)
1064
			{
1065
				stop_edit();
990 barsuk 1066
				draw_window();
1067
			}
1114 leency 1068
			break;
1069
		case 22:	// contol-v
1070
			{
1071
				if (ctrl)
1072
				{
1073
					//rtlDebugOutString("control-v!");
1074
					int i, j, x0, y0;
1075
					x0 = min(sel_x, sel_end_x);
1076
					y0 = min(sel_y, sel_end_y);
1077
					int delta_x = x0 - buf_old_x;
1078
					int delta_y = y0 - buf_old_y;
1079
 
1080
					for (i = 0; i < buf_col; i++)
1081
						for (j = 0; j < buf_row; j++)
1082
						{
1083
							if (i + x0 >= col_count || j + y0 >= row_count)
1084
								continue;
1085
							if (cells[i + x0][j + y0])
1086
								freemem(cells[i + x0][j + y0]);
1087
							if (buffer[i][j])
1088
							{
1089
								cf_x0 = buf_old_x; cf_y0 = buf_old_y;
1090
								cf_x1 = buf_old_x + buf_col;
1091
								cf_y1 = buf_old_y + buf_row;
1092
								cells[i + x0][j + y0] = change_formula(buffer[i][j], delta_x, delta_y);
1093
								//cells[i + x0][j + y0] = (char*)allocmem(strlen(buffer[i][j]));
1094
								//strcpy(cells[i + x0][j + y0], buffer[i][j]);
1095
							}
1096
							else
1097
								cells[i + x0][j + y0] = NULL;
1098
						}
1099
 
1100
					calculate_values();
1101
					draw_window();
1102
					break;
1103
				}
1104
			}
1105
			case 24:	// control-x
1106
			case 03:	// control-c
1107
			{
1108
				if (ctrl)
1109
				{
1110
					//rtlDebugOutString("control-c!");
1111
					int i, j, x0, y0;
1112
 
1113
					freeBuffer();
1114
 
1115
					buf_col = abs(sel_end_x - sel_x) + 1;
1116
					buf_row = abs(sel_end_y - sel_y) + 1;
1117
					x0 = min(sel_x, sel_end_x);
1118
					y0 = min(sel_y, sel_end_y);
1119
					buf_old_x = x0;
1120
					buf_old_y = y0;
1121
 
1122
					//sprintf(debuf, "%U %U %U %U", buf_col, buf_row, x0, y0);
1123
					//rtlDebugOutString(debuf);
1124
 
1125
					buffer = (char***)allocmem(buf_col * sizeof(char**));
1126
					for (i = 0; i < buf_col; i++)
1127
					{
1128
						buffer[i] = (char**)allocmem(buf_row * sizeof(char*));
1129
						for (j = 0; j < buf_row; j++)
1130
						{
1131
							if (cells[i + x0][j + y0])
1132
							{
1133
								if (keyCode == 03)	// ctrl-c
1134
								{
1135
									buffer[i][j] = (char*)allocmem(strlen(cells[i + x0][j + y0]));
1136
									strcpy(buffer[i][j], cells[i + x0][j + y0]);
1137
								}
1138
								else
1139
								{
1140
									buffer[i][j] = cells[i + x0][j + y0];
1141
									cells[i + x0][j + y0] = NULL;
1142
								}
1143
							}
1144
							else
1145
								buffer[i][j] = NULL;
1146
						}
1147
					}
1148
					if (keyCode == 24)
1149
						calculate_values();
1150
					draw_window();
1151
					break;
1152
				}
1153
			}
1154
		case 06:		// control-f
1155
			{
1156
				display_formulas = !display_formulas;
1157
				draw_grid(); //draw_window();
1158
				break;
1159
			}
990 barsuk 1160
		default:
1114 leency 1161
 
1162
			if (!is_edit && !(file_box.flags & ed_focus))
1163
			{
990 barsuk 1164
				start_edit(sel_x, sel_y);
1165
				if (keyCode == 8)
1166
				{
1167
					cell_box.pos = strlen(edit_text);
1168
				}
1169
				else
1170
				{
1171
					__asm
1172
					{
1173
						mov ah, keyCode
1174
					}
1175
					edit_box_key((dword)&cell_box);
1114 leency 1176
				}
990 barsuk 1177
			}
1178
			if (is_edit)
1179
				edit_box_draw((dword)&cell_box);
1114 leency 1180
			break;
1181
	}
1182
	if (dx != 0)
1183
	{
1184
		if (shift)
1185
		{
1186
			sel_end_x += dx;
1187
			if (sel_end_x <= 1)
1188
				sel_end_x = 1;
1189
			else if (sel_end_x >= col_count)
1190
				sel_end_x = col_count - 1;
1191
		//	sprintf(debuf,"sel end x change. sel end %U %U",sel_end_x,sel_end_y);
1192
		//	rtlDebugOutString(debuf);
1193
			sel_moved = sel_end_move = 1;
990 barsuk 1194
			//stop_edit();
1114 leency 1195
			//draw_grid();
1196
		}
1197
		else
1198
		{
1199
		}
1200
	}
1201
	if (dy != 0)
1202
	{
1203
		if (shift)
1204
		{
1205
			sel_end_y += dy;
1206
			if (sel_end_y <= 1)
1207
				sel_end_y = 1;
1208
			else if (sel_end_y >= row_count)
1209
				sel_end_y = row_count - 1;
1210
		//	sprintf(debuf,"sel end y change. sel end %U %U",sel_end_x,sel_end_y);
1211
		//	rtlDebugOutString(debuf);
1212
			sel_moved = sel_end_move = 1;
990 barsuk 1213
			//stop_edit();
1114 leency 1214
			//draw_grid();
1215
		}
1216
	}
1217
	/*
1218
	if (sel_end_x < sel_x)
1219
	{
1220
		Dword tmp = sel_end_x; sel_end_x = sel_x; sel_x = tmp;
1221
	}
1222
	if (sel_end_y < sel_y)
1223
	{
1224
		Dword tmp = sel_end_y; sel_end_y = sel_y; sel_y = tmp;
1225
	}
1226
	*/
990 barsuk 1227
	if ((dx || dy))
1228
	{
1114 leency 1229
		if (!shift)
1230
		{
2749 leency 1231
			if ((sel_end_x + dx) >= (col_count-1)) {dx=0;} //заглушка
1232
			else if ((sel_end_y + dy) >= (row_count-1)) {dy=0;}
1233
			else {
1114 leency 1234
			move_sel(sel_x + dx, sel_y + dy);
2749 leency 1235
			}
990 barsuk 1236
		}
1237
		else
1238
		{
1239
			sel_moved = 0;
1240
			stop_edit();
1241
			draw_grid();
1242
		}
1114 leency 1243
	}
1244
}
1245
 
1246
 
1247
void process_button()
1248
{
1249
	Dword mouse_btn, ckeys, shift, ctrl;
1250
	int mouse_x, mouse_y, i, p, dx = 0, dy = 0;
1251
	int redraw = 0;
1252
 
1253
	Dword button;
1254
	kos_GetButtonID(button);
1255
 
1256
	/*
1257
	sprintf(debuf, "button %U", button);
1258
	rtlDebugOutString(debuf);
1259
	//*/
1260
 
1261
	switch (button)
1262
	{
1263
	case 1:
1264
		kos_ExitApp();
1265
 
1266
	case SCROLL_LEFT_BUTTON:
1267
		//rtlDebugOutString("scroll left btn");
1268
		stop_edit();
1269
		scroll_x--;
1270
		if (scroll_x <= 0)
1271
			scroll_x = 1;
1272
		sel_moved = 0;
1273
		/*if (sel_x > nx - 1)
1274
		{
1275
			nx - 1;
1276
			sel_end_x = sel_x;
1277
		}*/
1278
		draw_window();
1279
		return;
1280
 
1281
	case SCROLL_RIGHT_BUTTON:
1282
		//rtlDebugOutString("scroll right btn");
1283
		stop_edit();
1284
		scroll_x++;
1285
		if (scroll_x >= col_count - 1)
1286
			scroll_x = col_count - 1;
1287
		sel_moved = 0;/*
1288
		if (sel_x < scroll_x)
1289
		{
1290
			sel_x = scroll_x;
1291
			sel_end_x = sel_x;
1292
		}*/
1293
		draw_window();
1294
		return;
1295
 
1296
	case SCROLL_WIDTH:
1297
		{
1298
			//rtlDebugOutString("scroll width btn");
1299
			stop_edit();
1300
			kos_GetMouseState(mouse_btn, mouse_x, mouse_y);
1301
			mouse_x -= 5;
1302
			mouse_y -= kos_GetSkinHeight();
1303
 
1304
			// всего: wi - SCROLL_BAR_WIDTH - 2 * 14
1305
 
1306
			int tmp_w = (nx - scroll_x) * (wi - SCROLL_BAR_WIDTH - 3 * 14) / (col_count + 1);
1307
			if (tmp_w < 16)
1308
				tmp_w = 16;
1309
			scroll_x = (mouse_x - 14 - tmp_w / 2) * (col_count + 1) / (wi - SCROLL_BAR_WIDTH - 3 * 14) + 1;
1310
			if (scroll_x <= 0)
1311
				scroll_x = 1;
1312
			else if (scroll_x >= col_count - 1)
1313
				scroll_x = col_count - 1;
1314
			sel_moved = 0;
1315
			draw_window();
1316
			return;
1317
		}
1318
 
1319
	case SCROLL_UP_BUTTON:
1320
		stop_edit();
1321
		scroll_y--;
1322
		if (scroll_y <= 0)
1323
			scroll_y = 1;
1324
		sel_moved = 0;
990 barsuk 1325
		//draw_window();
1326
		draw_grid();
1114 leency 1327
		/*
1328
		if (sel_y > ny - 1)
1329
		{
1330
			sel_y = ny - 1;
1331
			sel_end_y = sel_y;
1332
		}*/
1333
		return;
1334
 
1335
	case SCROLL_DOWN_BUTTON:
1336
		stop_edit();
1337
		scroll_y++;
1338
		if (scroll_y >= row_count - 1)
1339
			scroll_y = row_count - 1;
1340
		sel_moved = 0;/*
1341
		if (sel_y < scroll_y)
1342
		{
1343
			sel_y = scroll_y;
1344
			sel_end_y = sel_y;
1345
		}*/
1346
		draw_grid();
1347
		return;
1348
 
1349
	case SCROLL_HEIGHT:
1350
		{
1351
			stop_edit();
1352
			kos_GetMouseState(mouse_btn, mouse_x, mouse_y);
1353
			mouse_x -= 5;
1354
			mouse_y -= kos_GetSkinHeight();
1355
			int tmp_h = (ny - scroll_y) * (he - SCROLL_BAR_HEIGHT - 2 * 14) / row_count;
1356
			if (tmp_h < 16)
1357
				tmp_h = 16;
1358
			scroll_y = (mouse_y - 2 * 14) * (row_count + 1) / (he - SCROLL_BAR_HEIGHT - 3 * 14) + 1;
1359
			if (scroll_y <= 0)
1360
				scroll_y = 1;
1361
			else if (scroll_y >= row_count - 1)
1362
				scroll_y = row_count - 1;
1363
			sel_moved = 0;
1364
			draw_grid();
1365
			return;
1366
		}
1367
 
1368
	case NEW_BUTTON:	// clear the table
1369
		reinit();
1370
		draw_window();
1371
		break;
1372
 
1373
	case FILENAME_BUTTON:
1374
		sel_moved = 1;
1375
		stop_edit();
1376
		fn_edit = 1;
1377
		strcpy(edit_text, fname);
1378
		draw_window();
1379
		break;
1380
 
1381
	case SAVE_BUTTON:
1382
		stop_edit();
1383
		kos_DrawBar(320, panel_y, wi - 320 - 10, 10, 0xe4dfe1);
1384
		if (SaveFile(fname))
1385
			kos_WriteTextToWindow(320, panel_y, 0, 0x000000, (char*)msg_save, strlen(msg_save));
1386
		break;
1387
 
1388
	case LOAD_BUTTON:
1389
		stop_edit();
1390
		int r = LoadFile(fname);
1391
		kos_DrawBar(320, panel_y, wi - 320 - 10, 10, 0xe4dfe1);
1392
		if (r > 0)
1393
		{
1394
			calculate_values();
1395
			sel_moved = 0;
1396
			draw_window();
1397
			kos_WriteTextToWindow(320, panel_y,0,0x000000,(char*)msg_load, strlen(msg_load));
1398
		}
1399
		else if (r == -1)
1400
			kos_WriteTextToWindow(320, panel_y,0,0x000000,(char*)er_file_not_found,strlen(er_file_not_found));
1401
		else if (r == -2)
1402
			kos_WriteTextToWindow(320, panel_y,0,0x000000,(char*)er_format,strlen(er_format));
1403
		break;
1404
	}
1405
	if (button >= COL_HEAD_BUTTON && button < ROW_HEAD_BUTTON)
1406
	{
1407
		sel_end_x = sel_x = button - COL_HEAD_BUTTON;
1408
		sel_y = 1;
1409
		sel_end_y = row_count - 1;
1410
		stop_edit();
1411
		draw_window();
1412
		return;
1413
	}
1414
	else if (button >= ROW_HEAD_BUTTON && button < CELL_BUTTON)
1415
	{
1416
		sel_end_y = sel_y = button - ROW_HEAD_BUTTON;
1417
		sel_x = 1;
1418
		sel_end_x = col_count - 1;
1419
		stop_edit();
1420
		draw_window();
1421
		return;
1422
	}
1423
 
1424
}
1425
 
1426
void kos_Main()
1427
{
990 barsuk 1428
	kos_InitHeap();
1429
	load_edit_box();
1114 leency 1430
	init();
2749 leency 1431
 
1114 leency 1432
	for (;;)
1433
	{
2751 leency 1434
		switch (kos_WaitForEvent())
1114 leency 1435
		{
2751 leency 1436
		case 6:
1114 leency 1437
			process_mouse();
990 barsuk 1438
			break;
1114 leency 1439
		case 1:
1440
			window_drawall=true;
1441
			draw_window();
1442
			break;
1443
		case 2:
1444
			process_key();
1445
			break;
1446
		case 3:
1447
			process_button();
1448
			break;
1449
		}
1450
	}
1451
}
1452