Subversion Repositories Kolibri OS

Rev

Rev 5674 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5674 Rev 5705
Line 60... Line 60...
60
#define TOPPANELH 19
60
#define TOPPANELH 19
61
#define BOTPANELH 10
61
#define BOTPANELH 10
62
#define WIN_W 600
62
#define WIN_W 600
63
#define WIN_H 400
63
#define WIN_H 400
Line 64... Line 64...
64
 
64
 
65
#define TITLE "Calypte v0.12"
65
#define TITLE "Calypte v0.13"
66
char win_title[4096] = TITLE;
66
char win_title[4096] = TITLE;
Line 67... Line 67...
67
proc_info Form;
67
proc_info Form;
68
 
68
 
Line 109... Line 109...
109
 
109
 
Line 110... Line 110...
110
menu_data menudata1 = {0, 40, 2, 15, 2, #menu_text_area1.menu, #menu_text_area1.sub_menu1, #menu_text_area1.end, 0, 0, 80, 2, 100, 18, 0xEEEEEE, 0xFF, 0xEEEEEE, 0, 0, 0, #Form, 0, 0, 0, 16, 0, 0, 0x00CC00, 0, 0xFFFFFF, 0, 8, 0, 0};
110
menu_data menudata1 = {0, 40, 2, 15, 2, #menu_text_area1.menu, #menu_text_area1.sub_menu1, #menu_text_area1.end, 0, 0, 80, 2, 100, 18, 0xEEEEEE, 0xFF, 0xEEEEEE, 0, 0, 0, #Form, 0, 0, 0, 16, 0, 0, 0x00CC00, 0, 0xFFFFFF, 0, 8, 0, 0};
111
 
111
 
112
void main()
112
void main()
-
 
113
{   
-
 
114
	int id;
Line 113... Line 115...
113
{   
115
	word key_ascii, key_scancode;
114
	int id, key;
116
	dword status_key;
115
	
117
	
116
	strcpy(#filter2.ext1, "TXT");
118
	strcpy(#filter2.ext1, "TXT");
Line 151... Line 153...
151
						Prepare();
153
						Prepare();
152
						draw_window();
154
						draw_window();
153
						break;
155
						break;
154
					case 2:
156
					case 2:
155
						read = 0;
157
						read = 0;
-
 
158
						tview.current = 0;
156
						strcpy(#win_title, TITLE);
159
						strcpy(#win_title, TITLE);
157
						FreeBuf();
160
						FreeBuf();
158
						draw_window();
161
						draw_window();
159
						break;
162
						break;
160
					case 3:
163
					case 3:
Line 180... Line 183...
180
            if (id==1) ExitProcess();
183
            if (id==1) ExitProcess();
181
			break;
184
			break;
Line 182... Line 185...
182
      
185
      
183
        case evKey:
186
        case evKey:
184
			if (Form.status_window>2) break;
187
			if (Form.status_window>2) break;
185
			key = GetKey();
188
			GetFullKey();
-
 
189
			key_ascii = AH;
-
 
190
			$shr  eax,16
-
 
191
			key_scancode = AL;
-
 
192
			status_key = GetStatusKey();
-
 
193
			if (tview.ProcessKey(key_scancode)) DrawText();
186
			switch (key)
194
			if (TestBit(status_key, 2))
-
 
195
			{
-
 
196
				switch(key_scancode)
187
			{
197
				{
188
				case 015:  //Ctrl+O
198
					case 024:  //Ctrl+O
189
					OpenDialog_start stdcall (#o_dialog);
199
						OpenDialog_start stdcall (#o_dialog);
190
					OpenFile(#openfile_path);
200
						OpenFile(#openfile_path);
191
					Prepare();
201
						Prepare();
192
					draw_window();
202
						draw_window();
193
					break;
-
 
194
				case ASCII_KEY_HOME:
-
 
195
				case ASCII_KEY_END:
203
						break;
196
				case ASCII_KEY_UP:
-
 
197
				case ASCII_KEY_DOWN:
-
 
198
					if (tview.ProcessKey(key)) DrawText();
204
				}
-
 
205
				break;
-
 
206
			}
-
 
207
			switch (key_scancode)
-
 
208
			{
-
 
209
				/*case SCAN_CODE_HOME:
-
 
210
				case SCAN_CODE_END:
-
 
211
				case SCAN_CODE_UP:
-
 
212
				case SCAN_CODE_DOWN:
-
 
213
					if (tview.ProcessKey(key_scancode)) DrawText();
199
					break;
214
					break;*/
200
				case ASCII_KEY_PGUP:
215
				case SCAN_CODE_PGUP:
201
					if (!tview.current) break;
216
					if (!tview.current) break;
202
					if (tview.current
217
					if (tview.current
203
					else tview.current = tview.current-tview.visible;
218
					else tview.current = tview.current-tview.visible;
204
					DrawText();
219
					DrawText();
205
					break;
220
					break;
206
				case ASCII_KEY_PGDN:
221
				case SCAN_CODE_PGDN:
207
					if (tview.current+tview.visible>tview.count) break;
222
					if (tview.current+tview.visible>tview.count) break;
208
					tview.current = tview.current+tview.visible;
223
					tview.current = tview.current+tview.visible;
209
					DrawText();
224
					DrawText();
210
					break;
225
					break;