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); |