Subversion Repositories Kolibri OS

Rev

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

Rev 3654 Rev 3655
Line 41... Line 41...
41 
system_colors sc;
 41 
system_colors sc;
42 
proc_info Form;
 42 
proc_info Form;
Line 43... Line 43...
43 
 
 43 
 
44 
int mouse_dd;
 44 
int mouse_dd;
45 
unsigned char dsize[30];
 - 
 
Line 46... Line 45...
46 
edit_box edit1= {40,20,200,0xffffff,0x94AECE,0x94AECE,0x94AECE,0,4,#dsize,#mouse_dd,100000000000010b};
 45 
unsigned char dsize[30];
47 
 
 46 
 
48 
unsigned char icons[14*56] = FROM "icons.raw";
 47 
unsigned char icons[14*56] = FROM "icons.raw";
Line 55... Line 54...
55 
{
 54 
{
56 
	unsigned int id, key, err;
 55 
	unsigned int id, key, err;
57 
	int i, x;
 56 
	int i, x;
Line 58... Line 57...
58
57
59 
   	mem_Init();
 - 
 
60 
	if (load_dll2(boxlib, #edit_box_draw,0)!=0)
 - 
 
61 
	{
 - 
 
62 
		notify("error: library doesn't exist /rd/1/lib/box_lib.obj");
 - 
 
63 
		ExitProcess();
 - 
 
64 
	}
 - 
 
65 
	SetEventMask(0x27);
 58 
   	mem_Init();
66 
	loop()
 59 
	loop()
67 
	{
 60 
	{
68 
		switch(WaitEvent())
61 
		switch(WaitEvent())
69 
		{
 - 
 
70 
		case evMouse:
 - 
 
71 
			//edit_box_mouse stdcall (#edit1);
 - 
 
72 
			break;
 62 
		{
73 
		case evButton:
 63 
		case evButton:
74 
            id=GetButtonID();
64 
            id=GetButtonID();
75 
			if (id==1) ExitProcess();
 65 
			if (id==1) ExitProcess();
76 
			if (id==10) AddDisk();
 66 
			if (id==10) AddDisk();
Line 124... Line 114...
124 
			{
 114 
			{
125 
				if (selected+4>disk_num) break;
 115 
				if (selected+4>disk_num) break;
126 
				selected+=3;
 116 
				selected+=3;
127 
				DrawTmpDisks();
 117 
				DrawTmpDisks();
128 
			}
 118 
			}
129 
			//EAX=key<<8;
 - 
 
130 
			//edit_box_key stdcall(#edit1);
 - 
 
131 
			break;
 119 
			break;
132 
         case evReDraw:
120 
         case evReDraw:
133 
			sc.get();
 121 
			sc.get();
134 
			DefineAndDrawWindow(170,150,314,250,0x74,sc.work,"Virtual Disk Manager 0.45",0);
 122 
			DefineAndDrawWindow(170,150,314,250,0x74,sc.work,"Virtual Disk Manager 0.45",0);
135 
			GetProcessInfo(#Form, SelfInfo);
 123 
			GetProcessInfo(#Form, SelfInfo);