Mercurial > dwindows
annotate os2/dw.c @ 40:88c9c7410c22
Lots of fixes and new functions on all platforms.
| author | bsmith@81767d24-ef19-dc11-ae90-00e081727c95 |
|---|---|
| date | Mon, 22 Oct 2001 22:32:58 +0000 |
| parents | 3aa9ef0b3996 |
| children | 997e9ed670ef |
| rev | line source |
|---|---|
| 3 | 1 /* |
| 2 * Dynamic Windows: | |
| 3 * A GTK like implementation of the PM GUI | |
| 4 * | |
| 5 * (C) 2000,2001 Brian Smith <dbsoft@technologist.com> | |
| 6 * (C) 2000 Achim Hasenmueller <achimha@innotek.de> | |
| 7 * (C) 2000 Peter Nielsen <peter@pmview.com> | |
| 8 * (C) 1998 Sergey I. Yevtushenko (some code borrowed from cell toolkit) | |
| 9 * | |
| 10 */ | |
| 11 #define INCL_DOS | |
| 12 #define INCL_DOSERRORS | |
| 13 #define INCL_WIN | |
| 14 #define INCL_GPI | |
| 15 | |
| 16 #include <os2.h> | |
| 17 #include <stdlib.h> | |
| 18 #include <string.h> | |
| 19 #include <stdio.h> | |
| 20 #include <stdarg.h> | |
| 21 #include <stddef.h> | |
| 22 #include <ctype.h> | |
| 23 #include <process.h> | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
24 #include <time.h> |
| 3 | 25 #include "dw.h" |
| 26 | |
| 27 #define QWP_USER 0 | |
| 28 | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
29 MRESULT EXPENTRY _run_event(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
30 |
| 3 | 31 char ClassName[] = "dynamicwindows"; |
| 32 char SplitbarClassName[] = "dwsplitbar"; | |
| 33 char DefaultFont[] = "9.WarpSans"; | |
| 34 | |
| 35 /* this is the callback handle for the window procedure | |
| 36 * make sure you always match the calling convention! | |
| 37 */ | |
| 38 int (* EXPENTRY filterfunc)(HWND, ULONG, MPARAM, MPARAM) = 0L; | |
| 39 | |
| 40 HAB dwhab = 0; | |
| 41 HMQ dwhmq = 0; | |
| 42 DWTID _dwtid = 0; | |
| 43 LONG _foreground = 0xAAAAAA, _background = 0; | |
| 44 | |
| 45 HWND hwndBubble = NULLHANDLE, hwndBubbleLast = NULLHANDLE; | |
| 46 PRECORDCORE pCore = NULL; | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
47 ULONG aulBuffer[4]; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
48 |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
49 #define IS_WARP4() (aulBuffer[0] == 20 && aulBuffer[1] >= 40) |
| 3 | 50 |
| 51 #ifndef min | |
| 52 #define min(a, b) (((a < b) ? a : b)) | |
| 53 #endif | |
| 54 | |
| 55 #ifdef DWDEBUG | |
| 56 FILE *f; | |
| 57 | |
| 58 void reopen(void) | |
| 59 { | |
| 60 fclose(f); | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
61 f = fopen("dw.log", "a+"); |
| 3 | 62 } |
| 63 #endif | |
| 64 | |
| 65 static LONG lColor[SPLITBAR_WIDTH] = | |
| 66 { | |
| 67 DW_CLR_BLACK, | |
| 68 DW_CLR_PALEGRAY, | |
| 69 DW_CLR_WHITE | |
| 70 }; | |
| 71 | |
| 72 #ifdef NO_SIGNALS | |
| 73 #define USE_FILTER | |
| 74 #else | |
| 75 typedef struct _sighandler | |
| 76 { | |
| 77 struct _sighandler *next; | |
| 78 ULONG message; | |
| 79 HWND window; | |
| 80 void *signalfunction; | |
| 81 void *data; | |
| 82 | |
| 83 } SignalHandler; | |
| 84 | |
| 85 SignalHandler *Root = NULL; | |
| 86 | |
| 87 typedef struct | |
| 88 { | |
| 89 ULONG message; | |
| 90 char name[30]; | |
| 91 | |
| 92 } SignalList; | |
| 93 | |
| 94 /* List of signals and their equivilent OS/2 message */ | |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
95 #define SIGNALMAX 13 |
| 3 | 96 |
| 97 SignalList SignalTranslate[SIGNALMAX] = { | |
| 98 { WM_SIZE, "configure_event" }, | |
| 99 { WM_CHAR, "key_press_event" }, | |
| 100 { WM_BUTTON1DOWN, "button_press_event" }, | |
| 101 { WM_BUTTON1UP, "button_release_event"}, | |
| 102 { WM_MOUSEMOVE, "motion_notify_event" }, | |
| 103 { WM_CLOSE, "delete_event" }, | |
| 104 { WM_PAINT, "expose_event" }, | |
| 105 { WM_COMMAND, "clicked" }, | |
| 106 { CN_ENTER, "container-select" }, | |
| 107 { CN_CONTEXTMENU, "container-context" }, | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
108 { LN_SELECT, "item-select" }, |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
109 { WM_USER+1, "tree-select" }, |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
110 { WM_SETFOCUS, "set-focus" } |
| 3 | 111 }; |
| 112 | |
| 113 /* This function adds a signal handler callback into the linked list. | |
| 114 */ | |
| 115 void _new_signal(ULONG message, HWND window, void *signalfunction, void *data) | |
| 116 { | |
| 117 SignalHandler *new = malloc(sizeof(SignalHandler)); | |
| 118 | |
| 119 new->message = message; | |
| 120 new->window = window; | |
| 121 new->signalfunction = signalfunction; | |
| 122 new->data = data; | |
| 123 new->next = NULL; | |
| 124 | |
| 125 if (!Root) | |
| 126 Root = new; | |
| 127 else | |
| 128 { | |
| 129 SignalHandler *prev = NULL, *tmp = Root; | |
| 130 while(tmp) | |
| 131 { | |
| 132 prev = tmp; | |
| 133 tmp = tmp->next; | |
| 134 } | |
| 135 if(prev) | |
| 136 prev->next = new; | |
| 137 else | |
| 138 Root = new; | |
| 139 } | |
| 140 } | |
| 141 | |
| 142 /* Finds the message number for a given signal name */ | |
| 143 ULONG _findsigmessage(char *signame) | |
| 144 { | |
| 145 int z; | |
| 146 | |
| 147 for(z=0;z<SIGNALMAX;z++) | |
| 148 { | |
| 149 if(stricmp(signame, SignalTranslate[z].name) == 0) | |
| 150 return SignalTranslate[z].message; | |
| 151 } | |
| 152 return 0L; | |
| 153 } | |
| 154 #endif | |
| 155 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
156 /* This function changes the owner of buttons in to the |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
157 * dynamicwindows handle to fix a problem in notebooks. |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
158 */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
159 void _fix_button_owner(HWND handle, HWND dw) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
160 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
161 HENUM henum; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
162 HWND child; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
163 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
164 henum = WinBeginEnumWindows(handle); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
165 while((child = WinGetNextWindow(henum)) != NULLHANDLE) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
166 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
167 char tmpbuf[100]; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
168 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
169 WinQueryClassName(child, 99, tmpbuf); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
170 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
171 if(strncmp(tmpbuf, "#3", 3)==0 && dw) /* Button */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
172 WinSetOwner(child, dw); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
173 else if(strncmp(tmpbuf, "dynamicwindows", 14) == 0) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
174 dw = child; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
175 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
176 _fix_button_owner(child, dw); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
177 } |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
178 WinEndEnumWindows(henum); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
179 return; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
180 } |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
181 |
| 3 | 182 /* This function removes and handlers on windows and frees |
| 183 * the user memory allocated to it. | |
| 184 */ | |
| 185 void _free_window_memory(HWND handle) | |
| 186 { | |
| 187 HENUM henum; | |
| 188 HWND child; | |
| 189 | |
| 190 #ifndef NO_SIGNALS | |
| 191 dw_signal_disconnect_by_window(handle); | |
| 192 #endif | |
| 193 | |
| 194 henum = WinBeginEnumWindows(handle); | |
| 195 while((child = WinGetNextWindow(henum)) != NULLHANDLE) | |
| 196 { | |
| 197 void *ptr = (void *)WinQueryWindowPtr(handle, QWP_USER); | |
| 198 | |
| 199 if(ptr) | |
| 200 { | |
| 201 WinSetWindowPtr(handle, QWP_USER, 0); | |
| 202 free(ptr); | |
| 203 } | |
| 204 | |
| 205 _free_window_memory(child); | |
| 206 } | |
| 207 WinEndEnumWindows(henum); | |
| 208 return; | |
| 209 } | |
| 210 | |
| 211 /* This function returns 1 if the window (widget) handle | |
| 212 * passed to it is a valid window that can gain input focus. | |
| 213 */ | |
| 214 int _validate_focus(HWND handle) | |
| 215 { | |
| 216 char tmpbuf[100]; | |
| 217 | |
| 218 if(!handle) | |
| 219 return 0; | |
| 220 | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
221 if(!WinIsWindowEnabled(handle)) |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
222 return 0; |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
223 |
| 3 | 224 WinQueryClassName(handle, 99, tmpbuf); |
| 225 | |
| 226 /* These are the window classes which can | |
| 227 * obtain input focus. | |
| 228 */ | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
229 if(strncmp(tmpbuf, "#2", 3)==0 || /* Entryfield */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
230 strncmp(tmpbuf, "#3", 3)==0 || /* Button */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
231 strncmp(tmpbuf, "#6", 3)==0 || /* Combobox */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
232 strncmp(tmpbuf, "#7", 3)==0 || /* List box */ |
| 3 | 233 strncmp(tmpbuf, "#10", 3)==0 || /* MLE */ |
| 234 strncmp(tmpbuf, "#32", 3)==0 || /* Spinbutton */ | |
| 235 strncmp(tmpbuf, "#37", 3)== 0) /* Container */ | |
| 236 return 1; | |
| 237 return 0; | |
| 238 } | |
| 239 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
240 int _focus_check_box(Box *box, HWND handle, int start, HWND defaultitem) |
| 3 | 241 { |
| 242 int z; | |
| 243 static HWND lasthwnd, firsthwnd; | |
| 244 static int finish_searching; | |
| 245 | |
| 246 /* Start is 2 when we have cycled completely and | |
| 247 * need to set the focus to the last widget we found | |
| 248 * that was valid. | |
| 249 */ | |
| 250 if(start == 2) | |
| 251 { | |
| 252 if(lasthwnd) | |
| 253 WinSetFocus(HWND_DESKTOP, lasthwnd); | |
| 254 return 0; | |
| 255 } | |
| 256 | |
| 257 /* Start is 1 when we are entering the function | |
| 258 * for the first time, it is zero when entering | |
| 259 * the function recursively. | |
| 260 */ | |
| 261 if(start == 1) | |
| 262 { | |
| 263 lasthwnd = handle; | |
| 264 finish_searching = 0; | |
| 265 firsthwnd = 0; | |
| 266 } | |
| 267 | |
| 268 /* Vertical boxes are inverted on OS/2 */ | |
| 269 if(box->type == BOXVERT) | |
| 270 { | |
| 271 for(z=0;z<box->count;z++) | |
| 272 { | |
| 273 if(box->items[z].type == TYPEBOX) | |
| 274 { | |
| 275 Box *thisbox = WinQueryWindowPtr(box->items[z].hwnd, QWP_USER); | |
| 276 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
277 if(thisbox && _focus_check_box(thisbox, handle, start == 3 ? 3 : 0, defaultitem)) |
| 3 | 278 return 1; |
| 279 } | |
| 280 else | |
| 281 { | |
| 282 if(box->items[z].hwnd == handle) | |
| 283 { | |
| 284 if(lasthwnd == handle && firsthwnd) | |
| 285 WinSetFocus(HWND_DESKTOP, firsthwnd); | |
| 286 else if(lasthwnd == handle && !firsthwnd) | |
| 287 finish_searching = 1; | |
| 288 else | |
| 289 WinSetFocus(HWND_DESKTOP, lasthwnd); | |
| 290 | |
| 291 /* If we aren't looking for the last handle, | |
| 292 * return immediately. | |
| 293 */ | |
| 294 if(!finish_searching) | |
| 295 return 1; | |
| 296 } | |
| 297 if(_validate_focus(box->items[z].hwnd)) | |
| 298 { | |
| 299 /* Start is 3 when we are looking for the | |
| 300 * first valid item in the layout. | |
| 301 */ | |
| 302 if(start == 3) | |
| 303 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
304 if(!defaultitem || (defaultitem && defaultitem == box->items[z].hwnd)) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
305 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
306 WinSetFocus(HWND_DESKTOP, box->items[z].hwnd); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
307 return 1; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
308 } |
| 3 | 309 } |
| 310 | |
| 311 if(!firsthwnd) | |
| 312 firsthwnd = box->items[z].hwnd; | |
| 313 | |
| 314 lasthwnd = box->items[z].hwnd; | |
| 315 } | |
| 316 else | |
| 317 { | |
| 318 char tmpbuf[100] = ""; | |
| 319 | |
| 320 WinQueryClassName(box->items[z].hwnd, 99, tmpbuf); | |
| 321 if(strncmp(tmpbuf, "#40", 3)==0) /* Notebook */ | |
| 322 { | |
| 323 Box *notebox; | |
| 324 HWND page = (HWND)WinSendMsg(box->items[z].hwnd, BKM_QUERYPAGEWINDOWHWND, | |
| 325 (MPARAM)dw_notebook_page_query(box->items[z].hwnd), 0); | |
| 326 | |
| 327 if(page) | |
| 328 { | |
| 329 notebox = (Box *)WinQueryWindowPtr(page, QWP_USER); | |
| 330 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
331 if(notebox && _focus_check_box(notebox, handle, start == 3 ? 3 : 0, defaultitem)) |
| 3 | 332 return 1; |
| 333 } | |
| 334 } | |
| 335 } | |
| 336 } | |
| 337 } | |
| 338 } | |
| 339 else | |
| 340 { | |
| 341 for(z=box->count-1;z>-1;z--) | |
| 342 { | |
| 343 if(box->items[z].type == TYPEBOX) | |
| 344 { | |
| 345 Box *thisbox = WinQueryWindowPtr(box->items[z].hwnd, QWP_USER); | |
| 346 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
347 if(thisbox && _focus_check_box(thisbox, handle, start == 3 ? 3 : 0, defaultitem)) |
| 3 | 348 return 1; |
| 349 } | |
| 350 else | |
| 351 { | |
| 352 if(box->items[z].hwnd == handle) | |
| 353 { | |
| 354 if(lasthwnd == handle && firsthwnd) | |
| 355 WinSetFocus(HWND_DESKTOP, firsthwnd); | |
| 356 else if(lasthwnd == handle && !firsthwnd) | |
| 357 finish_searching = 1; | |
| 358 else | |
| 359 WinSetFocus(HWND_DESKTOP, lasthwnd); | |
| 360 | |
| 361 /* If we aren't looking for the last handle, | |
| 362 * return immediately. | |
| 363 */ | |
| 364 if(!finish_searching) | |
| 365 return 1; | |
| 366 } | |
| 367 if(_validate_focus(box->items[z].hwnd)) | |
| 368 { | |
| 369 /* Start is 3 when we are looking for the | |
| 370 * first valid item in the layout. | |
| 371 */ | |
| 372 if(start == 3) | |
| 373 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
374 if(!defaultitem || (defaultitem && defaultitem == box->items[z].hwnd)) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
375 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
376 WinSetFocus(HWND_DESKTOP, box->items[z].hwnd); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
377 return 1; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
378 } |
| 3 | 379 } |
| 380 | |
| 381 if(!firsthwnd) | |
| 382 firsthwnd = box->items[z].hwnd; | |
| 383 | |
| 384 lasthwnd = box->items[z].hwnd; | |
| 385 } | |
| 386 else | |
| 387 { | |
| 388 char tmpbuf[100] = ""; | |
| 389 | |
| 390 WinQueryClassName(box->items[z].hwnd, 99, tmpbuf); | |
| 391 if(strncmp(tmpbuf, "#40", 3)==0) /* Notebook */ | |
| 392 { | |
| 393 Box *notebox; | |
| 394 HWND page = (HWND)WinSendMsg(box->items[z].hwnd, BKM_QUERYPAGEWINDOWHWND, | |
| 395 (MPARAM)dw_notebook_page_query(box->items[z].hwnd), 0); | |
| 396 | |
| 397 if(page) | |
| 398 { | |
| 399 notebox = (Box *)WinQueryWindowPtr(page, QWP_USER); | |
| 400 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
401 if(notebox && _focus_check_box(notebox, handle, start == 3 ? 3 : 0, defaultitem)) |
| 3 | 402 return 1; |
| 403 } | |
| 404 } | |
| 405 } | |
| 406 } | |
| 407 } | |
| 408 } | |
| 409 return 0; | |
| 410 } | |
| 411 | |
| 412 /* This function finds the first widget in the | |
| 413 * layout and moves the current focus to it. | |
| 414 */ | |
| 415 void _initial_focus(HWND handle) | |
| 416 { | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
417 Box *thisbox = NULL; |
| 3 | 418 HWND box; |
| 419 | |
| 420 box = WinWindowFromID(handle, FID_CLIENT); | |
| 421 if(box) | |
| 422 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 423 | |
| 424 if(thisbox) | |
| 425 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
426 _focus_check_box(thisbox, handle, 3, thisbox->defaultitem); |
| 3 | 427 } |
| 428 } | |
| 429 | |
| 430 /* This function finds the current widget in the | |
| 431 * layout and moves the current focus to the next item. | |
| 432 */ | |
| 433 void _shift_focus(HWND handle) | |
| 434 { | |
| 435 Box *thisbox; | |
| 436 HWND box, lastbox = WinQueryWindow(handle, QW_PARENT); | |
| 437 | |
| 438 /* Find the toplevel window */ | |
| 439 while((box = WinQueryWindow(lastbox, QW_PARENT)) > 0x80000001) | |
| 440 { | |
| 441 lastbox = box; | |
| 442 } | |
| 443 | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
444 box = WinWindowFromID(lastbox, FID_CLIENT); |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
445 if(box) |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
446 thisbox = WinQueryWindowPtr(box, QWP_USER); |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
447 else |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
448 thisbox = WinQueryWindowPtr(lastbox, QWP_USER); |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
449 |
| 3 | 450 if(thisbox) |
| 451 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
452 if(_focus_check_box(thisbox, handle, 1, 0) == 0) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
453 _focus_check_box(thisbox, handle, 2, 0); |
| 3 | 454 } |
| 455 } | |
| 456 | |
| 457 /* ResetWindow: | |
| 458 * Resizes window to the exact same size to trigger | |
| 459 * recalculation of frame. | |
| 460 */ | |
| 461 void _ResetWindow(HWND hwndFrame) | |
| 462 { | |
| 463 SWP swp; | |
| 464 | |
| 465 WinQueryWindowPos(hwndFrame, &swp); | |
| 466 WinSetWindowPos(hwndFrame, HWND_TOP, 0, 0, swp.cx, swp.cy-1, SWP_SIZE); | |
| 467 WinSetWindowPos(hwndFrame, HWND_TOP, 0, 0, swp.cx, swp.cy, SWP_SIZE); | |
| 468 } | |
| 469 | |
| 470 /* This function will recursively search a box and add up the total height of it */ | |
| 471 void _count_size(HWND box, int type, int *xsize, int *xorigsize) | |
| 472 { | |
| 473 int size = 0, origsize = 0, z; | |
| 474 Box *tmp = WinQueryWindowPtr(box, QWP_USER); | |
| 475 | |
| 476 if(!tmp) | |
| 477 { | |
| 478 *xsize = *xorigsize = 0; | |
| 479 return; | |
| 480 } | |
| 481 | |
| 482 if(type == tmp->type) | |
| 483 { | |
| 484 /* If the box is going in the direction we want, then we | |
| 485 * return the entire sum of the items. | |
| 486 */ | |
| 487 for(z=0;z<tmp->count;z++) | |
| 488 { | |
| 489 if(tmp->items[z].type == TYPEBOX) | |
| 490 { | |
| 491 int s, os; | |
| 492 | |
| 493 _count_size(tmp->items[z].hwnd, type, &s, &os); | |
| 494 size += s; | |
| 495 origsize += os; | |
| 496 } | |
| 497 else | |
| 498 { | |
| 499 size += (type == BOXHORZ ? tmp->items[z].width : tmp->items[z].height); | |
| 500 origsize += (type == BOXHORZ ? tmp->items[z].origwidth : tmp->items[z].origheight); | |
| 501 } | |
| 502 } | |
| 503 } | |
| 504 else | |
| 505 { | |
| 506 /* If the box is not going in the direction we want, then we only | |
| 507 * want to return the maximum value. | |
| 508 */ | |
| 509 int tmpsize = 0, tmporigsize = 0; | |
| 510 | |
| 511 for(z=0;z<tmp->count;z++) | |
| 512 { | |
| 513 if(tmp->items[z].type == TYPEBOX) | |
| 514 _count_size(tmp->items[z].hwnd, type, &tmpsize, &tmporigsize); | |
| 515 else | |
| 516 { | |
| 517 tmpsize = (type == BOXHORZ ? tmp->items[z].width : tmp->items[z].height); | |
| 518 tmporigsize = (type == BOXHORZ ? tmp->items[z].origwidth : tmp->items[z].origheight); | |
| 519 } | |
| 520 | |
| 521 if(tmpsize > size) | |
| 522 size = tmpsize; | |
| 523 } | |
| 524 } | |
| 525 | |
| 526 *xsize = size; | |
| 527 *xorigsize = origsize; | |
| 528 } | |
| 529 | |
| 530 | |
| 531 /* Function: TrackRectangle | |
| 532 * Abstract: Tracks given rectangle. | |
| 533 * | |
| 534 * If rclBounds is NULL, then track rectangle on entire desktop. | |
| 535 * rclTrack is in window coorditates and will be mapped to | |
| 536 * desktop. | |
| 537 */ | |
| 538 | |
| 539 BOOL _TrackRectangle(HWND hwndBase, RECTL* rclTrack, RECTL* rclBounds) | |
| 540 { | |
| 541 TRACKINFO track; | |
| 542 APIRET rc; | |
| 543 | |
| 544 track.cxBorder = 1; | |
| 545 track.cyBorder = 1; | |
| 546 track.cxGrid = 1; | |
| 547 track.cyGrid = 1; | |
| 548 track.cxKeyboard = 8; | |
| 549 track.cyKeyboard = 8; | |
| 550 | |
| 551 if(!rclTrack) | |
| 552 return FALSE; | |
| 553 | |
| 554 if(rclBounds) | |
| 555 { | |
| 556 track.rclBoundary = *rclBounds; | |
| 557 } | |
| 558 else | |
| 559 { | |
| 560 track.rclBoundary.yTop = | |
| 561 track.rclBoundary.xRight = 3000; | |
| 562 track.rclBoundary.yBottom = | |
| 563 track.rclBoundary.xLeft = -3000; | |
| 564 } | |
| 565 | |
| 566 track.rclTrack = *rclTrack; | |
| 567 | |
| 568 WinMapWindowPoints(hwndBase, | |
| 569 HWND_DESKTOP, | |
| 570 (PPOINTL)&track.rclTrack, | |
| 571 2); | |
| 572 | |
| 573 track.ptlMinTrackSize.x = track.rclTrack.xRight | |
| 574 - track.rclTrack.xLeft; | |
| 575 track.ptlMinTrackSize.y = track.rclTrack.yTop | |
| 576 - track.rclTrack.yBottom; | |
| 577 track.ptlMaxTrackSize.x = track.rclTrack.xRight | |
| 578 - track.rclTrack.xLeft; | |
| 579 track.ptlMaxTrackSize.y = track.rclTrack.yTop | |
| 580 - track.rclTrack.yBottom; | |
| 581 | |
| 582 track.fs = TF_MOVE | TF_ALLINBOUNDARY; | |
| 583 | |
| 584 rc = WinTrackRect(HWND_DESKTOP, 0, &track); | |
| 585 | |
| 586 if(rc) | |
| 587 *rclTrack = track.rclTrack; | |
| 588 | |
| 589 return rc; | |
| 590 } | |
| 591 | |
| 592 /* This function calculates how much space the widgets and boxes require | |
| 593 * and does expansion as necessary. | |
| 594 */ | |
| 595 int _resize_box(Box *thisbox, int *depth, int x, int y, int *usedx, int *usedy, | |
| 596 int pass, int *usedpadx, int *usedpady) | |
| 597 { | |
| 598 int z, currentx = 0, currenty = 0; | |
| 599 int vectorx = 0, vectory = 0; | |
| 600 int uymax = 0, uxmax = 0; | |
| 601 int upymax = 0, upxmax = 0; | |
| 602 /* Used for the SIZEEXPAND */ | |
| 603 int nux = *usedx, nuy = *usedy; | |
| 604 int nupx = *usedpadx, nupy = *usedpady; | |
| 605 | |
| 606 (*usedx) += (thisbox->pad * 2); | |
| 607 (*usedy) += (thisbox->pad * 2); | |
| 608 | |
| 609 for(z=0;z<thisbox->count;z++) | |
| 610 { | |
| 611 if(thisbox->items[z].type == TYPEBOX) | |
| 612 { | |
| 613 int initialx, initialy; | |
| 614 Box *tmp = WinQueryWindowPtr(thisbox->items[z].hwnd, QWP_USER); | |
| 615 | |
| 616 initialx = x - (*usedx); | |
| 617 initialy = y - (*usedy); | |
| 618 | |
| 619 if(tmp) | |
| 620 { | |
| 621 int newx, newy; | |
| 622 int nux = *usedx, nuy = *usedy; | |
| 623 int upx = *usedpadx + (tmp->pad*2), upy = *usedpady + (tmp->pad*2); | |
| 624 | |
| 625 /* On the second pass we know how big the box needs to be and how | |
| 626 * much space we have, so we can calculate a ratio for the new box. | |
| 627 */ | |
| 628 if(pass == 2) | |
| 629 { | |
| 630 int deep = *depth + 1; | |
| 631 | |
| 632 _resize_box(tmp, &deep, x, y, &nux, &nuy, 1, &upx, &upy); | |
| 633 | |
| 634 tmp->upx = upx - *usedpadx; | |
| 635 tmp->upy = upy - *usedpady; | |
| 636 | |
| 637 newx = x - nux; | |
| 638 newy = y - nuy; | |
| 639 | |
| 640 tmp->width = thisbox->items[z].width = initialx - newx; | |
| 641 tmp->height = thisbox->items[z].height = initialy - newy; | |
| 642 | |
| 643 tmp->parentxratio = thisbox->xratio; | |
| 644 tmp->parentyratio = thisbox->yratio; | |
| 645 | |
| 646 tmp->parentpad = tmp->pad; | |
| 647 | |
| 648 /* Just in case */ | |
| 649 tmp->xratio = thisbox->xratio; | |
| 650 tmp->yratio = thisbox->yratio; | |
| 651 | |
| 652 #ifdef DWDEBUG | |
| 653 if(pass > 1) | |
| 654 { | |
| 655 fprintf(f, "FARK! depth %d\r\nwidth = %d, height = %d, nux = %d, nuy = %d, upx = %d, upy = %d xratio = %f, yratio = %f\r\n\r\n", | |
| 656 *depth, thisbox->items[z].width, thisbox->items[z].height, nux, nuy, tmp->upx, tmp->upy, tmp->xratio, tmp->yratio); | |
| 657 reopen(); | |
| 658 } | |
| 659 #endif | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
660 |
| 3 | 661 if(thisbox->type == BOXVERT) |
| 662 { | |
| 663 if((thisbox->items[z].width-((thisbox->items[z].pad*2)+(tmp->pad*2)))!=0) | |
| 664 tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-((thisbox->items[z].pad*2)+(tmp->pad*2))))/((float)(thisbox->items[z].width-((thisbox->items[z].pad*2)+(tmp->pad*2)))); | |
| 665 } | |
| 666 else | |
| 667 { | |
| 668 if((thisbox->items[z].width-tmp->upx)!=0) | |
| 669 tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-tmp->upx))/((float)(thisbox->items[z].width-tmp->upx)); | |
| 670 } | |
| 671 if(thisbox->type == BOXHORZ) | |
| 672 { | |
| 673 if((thisbox->items[z].height-((thisbox->items[z].pad*2)+(tmp->pad*2)))!=0) | |
| 674 tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-((thisbox->items[z].pad*2)+(tmp->pad*2))))/((float)(thisbox->items[z].height-((thisbox->items[z].pad*2)+(tmp->pad*2)))); | |
| 675 } | |
| 676 else | |
| 677 { | |
| 678 if((thisbox->items[z].height-tmp->upy)!=0) | |
| 679 tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-tmp->upy))/((float)(thisbox->items[z].height-tmp->upy)); | |
| 680 } | |
| 681 | |
| 682 nux = *usedx; nuy = *usedy; | |
| 683 upx = *usedpadx + (tmp->pad*2); upy = *usedpady + (tmp->pad*2); | |
| 684 } | |
| 685 | |
| 686 (*depth)++; | |
| 687 | |
| 688 #ifdef DWDEBUG | |
| 689 if(pass > 1) | |
| 690 { | |
| 691 fprintf(f, "Before Resize Box depth %d\r\nx = %d, y = %d, usedx = %d, usedy = %d, usedpadx = %d, usedpady = %d xratio = %f, yratio = %f\r\n\r\n", | |
| 692 *depth, x, y, *usedx, *usedy, *usedpadx, *usedpady, tmp->xratio, tmp->yratio); | |
| 693 reopen(); | |
| 694 } | |
| 695 #endif | |
| 696 | |
| 697 _resize_box(tmp, depth, x, y, &nux, &nuy, pass, &upx, &upy); | |
| 698 | |
| 699 (*depth)--; | |
| 700 | |
| 701 newx = x - nux; | |
| 702 newy = y - nuy; | |
| 703 | |
| 704 tmp->minwidth = thisbox->items[z].width = initialx - newx; | |
| 705 tmp->minheight = thisbox->items[z].height = initialy - newy; | |
| 706 | |
| 707 #ifdef DWDEBUG | |
| 708 if(pass > 1) | |
| 709 { | |
| 710 fprintf(f, "After Resize Box depth %d\r\nx = %d, y = %d, usedx = %d, usedy = %d, usedpadx = %d, usedpady = %d width = %d, height = %d\r\n\r\n", | |
| 711 *depth, x, y, *usedx, *usedy, *usedpadx, *usedpady, thisbox->items[z].width, thisbox->items[z].height); | |
| 712 reopen(); | |
| 713 } | |
| 714 #endif | |
| 715 } | |
| 716 } | |
| 717 | |
| 718 if(pass > 1 && *depth > 0) | |
| 719 { | |
| 720 if(thisbox->type == BOXVERT) | |
| 721 thisbox->items[z].xratio = ((float)((thisbox->width * thisbox->parentxratio)-((thisbox->items[z].pad*2)+(thisbox->parentpad*2))))/((float)(thisbox->minwidth-((thisbox->items[z].pad*2)+(thisbox->parentpad*2)))); | |
| 722 else | |
| 723 thisbox->items[z].xratio = ((float)((thisbox->width * thisbox->parentxratio)-thisbox->upx))/((float)(thisbox->minwidth-thisbox->upx)); | |
| 724 | |
| 725 if(thisbox->type == BOXHORZ) | |
| 726 thisbox->items[z].yratio = ((float)((thisbox->height * thisbox->parentyratio)-((thisbox->items[z].pad*2)+(thisbox->parentpad*2))))/((float)(thisbox->minheight-((thisbox->items[z].pad*2)+(thisbox->parentpad*2)))); | |
| 727 else | |
| 728 thisbox->items[z].yratio = ((float)((thisbox->height * thisbox->parentyratio)-thisbox->upy))/((float)(thisbox->minheight-thisbox->upy)); | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
729 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
730 if(thisbox->items[z].type == TYPEBOX) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
731 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
732 Box *tmp = WinQueryWindowPtr(thisbox->items[z].hwnd, QWP_USER); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
733 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
734 if(tmp) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
735 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
736 tmp->parentxratio = thisbox->items[z].xratio; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
737 tmp->parentyratio = thisbox->items[z].yratio; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
738 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
739 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
740 |
| 3 | 741 #ifdef DWDEBUG |
| 742 fprintf(f, "RATIO- xratio = %f, yratio = %f, width = %d, height = %d, pad = %d, box xratio = %f, box yratio = %f, parent xratio = %f, parent yratio = %f, minwidth = %d, minheight = %d, width = %d, height = %d, upx = %d, upy = %d\r\n\r\n", | |
| 743 thisbox->items[z].xratio, thisbox->items[z].yratio, thisbox->items[z].width, thisbox->items[z].height, thisbox->items[z].pad, thisbox->xratio, thisbox->yratio, thisbox->parentxratio, thisbox->parentyratio, thisbox->minwidth, thisbox->minheight, thisbox->width, thisbox->height, thisbox->upx, thisbox->upy); | |
| 744 reopen(); | |
| 745 #endif | |
| 746 } | |
| 747 else | |
| 748 { | |
| 749 thisbox->items[z].xratio = thisbox->xratio; | |
| 750 thisbox->items[z].yratio = thisbox->yratio; | |
| 751 } | |
| 752 | |
| 753 if(thisbox->type == BOXVERT) | |
| 754 { | |
| 755 if((thisbox->items[z].width + (thisbox->items[z].pad*2)) > uxmax) | |
| 756 uxmax = (thisbox->items[z].width + (thisbox->items[z].pad*2)); | |
| 757 if(thisbox->items[z].hsize != SIZEEXPAND) | |
| 758 { | |
| 759 if(((thisbox->items[z].pad*2) + thisbox->items[z].width) > upxmax) | |
| 760 upxmax = (thisbox->items[z].pad*2) + thisbox->items[z].width; | |
| 761 } | |
| 762 else | |
| 763 { | |
| 764 if(thisbox->items[z].pad*2 > upxmax) | |
| 765 upxmax = thisbox->items[z].pad*2; | |
| 766 } | |
| 767 } | |
| 768 else | |
| 769 { | |
| 770 if(thisbox->items[z].width == -1) | |
| 771 { | |
| 772 /* figure out how much space this item requires */ | |
| 773 /* thisbox->items[z].width = */ | |
| 774 } | |
| 775 else | |
| 776 { | |
| 777 (*usedx) += thisbox->items[z].width + (thisbox->items[z].pad*2); | |
| 778 if(thisbox->items[z].hsize != SIZEEXPAND) | |
| 779 (*usedpadx) += (thisbox->items[z].pad*2) + thisbox->items[z].width; | |
| 780 else | |
| 781 (*usedpadx) += thisbox->items[z].pad*2; | |
| 782 } | |
| 783 } | |
| 784 if(thisbox->type == BOXHORZ) | |
| 785 { | |
| 786 if((thisbox->items[z].height + (thisbox->items[z].pad*2)) > uymax) | |
| 787 uymax = (thisbox->items[z].height + (thisbox->items[z].pad*2)); | |
| 788 if(thisbox->items[z].vsize != SIZEEXPAND) | |
| 789 { | |
| 790 if(((thisbox->items[z].pad*2) + thisbox->items[z].height) > upymax) | |
| 791 upymax = (thisbox->items[z].pad*2) + thisbox->items[z].height; | |
| 792 } | |
| 793 else | |
| 794 { | |
| 795 if(thisbox->items[z].pad*2 > upymax) | |
| 796 upymax = thisbox->items[z].pad*2; | |
| 797 } | |
| 798 } | |
| 799 else | |
| 800 { | |
| 801 if(thisbox->items[z].height == -1) | |
| 802 { | |
| 803 /* figure out how much space this item requires */ | |
| 804 /* thisbox->items[z].height = */ | |
| 805 } | |
| 806 else | |
| 807 { | |
| 808 (*usedy) += thisbox->items[z].height + (thisbox->items[z].pad*2); | |
| 809 if(thisbox->items[z].vsize != SIZEEXPAND) | |
| 810 (*usedpady) += (thisbox->items[z].pad*2) + thisbox->items[z].height; | |
| 811 else | |
| 812 (*usedpady) += thisbox->items[z].pad*2; | |
| 813 } | |
| 814 } | |
| 815 } | |
| 816 | |
| 817 (*usedx) += uxmax; | |
| 818 (*usedy) += uymax; | |
| 819 (*usedpadx) += upxmax; | |
| 820 (*usedpady) += upymax; | |
| 821 | |
| 822 currentx += thisbox->pad; | |
| 823 currenty += thisbox->pad; | |
| 824 | |
| 825 #ifdef DWDEBUG | |
| 826 fprintf(f, "Done Calc depth %d\r\nusedx = %d, usedy = %d, usedpadx = %d, usedpady = %d, currentx = %d, currenty = %d, uxmax = %d, uymax = %d\r\n\r\n", | |
| 827 *depth, *usedx, *usedy, *usedpadx, *usedpady, currentx, currenty, uxmax, uymax); | |
| 828 reopen(); | |
| 829 #endif | |
| 830 | |
| 831 /* The second pass is for expansion and actual placement. */ | |
| 832 if(pass > 1) | |
| 833 { | |
| 834 /* Any SIZEEXPAND items should be set to uxmax/uymax */ | |
| 835 for(z=0;z<thisbox->count;z++) | |
| 836 { | |
| 837 if(thisbox->items[z].hsize == SIZEEXPAND && thisbox->type == BOXVERT) | |
| 838 thisbox->items[z].width = uxmax-(thisbox->items[z].pad*2); | |
| 839 if(thisbox->items[z].vsize == SIZEEXPAND && thisbox->type == BOXHORZ) | |
| 840 thisbox->items[z].height = uymax-(thisbox->items[z].pad*2); | |
| 841 /* Run this code segment again to finalize the sized after setting uxmax/uymax values. */ | |
| 842 if(thisbox->items[z].type == TYPEBOX) | |
| 843 { | |
| 844 Box *tmp = WinQueryWindowPtr(thisbox->items[z].hwnd, QWP_USER); | |
| 845 | |
| 846 if(tmp) | |
| 847 { | |
| 848 if(*depth > 0) | |
| 849 { | |
| 850 if(thisbox->type == BOXVERT) | |
| 851 { | |
| 852 tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-((thisbox->items[z].pad*2)+(thisbox->pad*2))))/((float)(tmp->minwidth-((thisbox->items[z].pad*2)+(thisbox->pad*2)))); | |
| 853 tmp->width = thisbox->items[z].width; | |
| 854 } | |
| 855 if(thisbox->type == BOXHORZ) | |
| 856 { | |
| 857 tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-((thisbox->items[z].pad*2)+(thisbox->pad*2))))/((float)(tmp->minheight-((thisbox->items[z].pad*2)+(thisbox->pad*2)))); | |
| 858 tmp->height = thisbox->items[z].height; | |
| 859 } | |
| 860 } | |
| 861 | |
| 862 (*depth)++; | |
| 863 | |
| 864 /*tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-tmp->upx) )/((float)(tmp->minwidth-tmp->upx)); | |
| 865 tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-tmp->upy))/((float)(tmp->minheight-tmp->upy));*/ | |
| 866 | |
| 867 #ifdef DWDEBUG | |
| 868 fprintf(f, "2- Resize Box depth %d\r\nx = %d, y = %d, usedx = %d, usedy = %d, usedpadx = %d, usedpady = %d xratio = %f, yratio = %f,\r\nupx = %d, upy = %d, width = %d, height = %d, minwidth = %d, minheight = %d, box xratio = %f, box yratio = %f\r\n\r\n", | |
| 869 *depth, x, y, *usedx, *usedy, *usedpadx, *usedpady, tmp->xratio, tmp->yratio, tmp->upx, tmp->upy, thisbox->items[z].width, thisbox->items[z].height, tmp->minwidth, tmp->minheight, thisbox->xratio, thisbox->yratio); | |
| 870 reopen(); | |
| 871 #endif | |
| 872 | |
| 873 _resize_box(tmp, depth, x, y, &nux, &nuy, 3, &nupx, &nupy); | |
| 874 | |
| 875 (*depth)--; | |
| 876 | |
| 877 } | |
| 878 } | |
| 879 } | |
| 880 | |
| 881 for(z=0;z<(thisbox->count);z++) | |
| 882 { | |
| 883 int height = thisbox->items[z].height; | |
| 884 int width = thisbox->items[z].width; | |
| 885 int pad = thisbox->items[z].pad; | |
| 886 HWND handle = thisbox->items[z].hwnd; | |
| 887 | |
| 888 /* When upxmax != pad*2 then ratios are incorrect. */ | |
| 889 vectorx = (int)((width*thisbox->items[z].xratio)-width); | |
| 890 vectory = (int)((height*thisbox->items[z].yratio)-height); | |
| 891 | |
| 892 if(width > 0 && height > 0) | |
| 893 { | |
| 894 char tmpbuf[100]; | |
| 895 /* This is a hack to fix rounding of the sizing */ | |
| 896 if(*depth == 0) | |
| 897 { | |
| 898 vectorx++; | |
| 899 vectory++; | |
| 900 } | |
| 901 | |
| 902 /* If this item isn't going to expand... reset the vectors to 0 */ | |
| 903 if(thisbox->items[z].vsize != SIZEEXPAND) | |
| 904 vectory = 0; | |
| 905 if(thisbox->items[z].hsize != SIZEEXPAND) | |
| 906 vectorx = 0; | |
| 907 | |
| 908 WinQueryClassName(handle, 99, tmpbuf); | |
| 909 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
910 if(strncmp(tmpbuf, "#2", 3)==0) |
| 3 | 911 { |
| 912 /* Make the combobox big enough to drop down. :) */ | |
| 913 WinSetWindowPos(handle, HWND_TOP, currentx + pad, (currenty + pad) - 100, | |
| 914 width + vectorx, (height + vectory) + 100, SWP_MOVE | SWP_SIZE | SWP_ZORDER); | |
| 915 } | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
916 else if(strncmp(tmpbuf, "#6", 3)==0) |
| 3 | 917 { |
| 918 /* Entryfields on OS/2 have a thick border that isn't on Windows and GTK */ | |
| 919 WinSetWindowPos(handle, HWND_TOP, (currentx + pad) + 3, (currenty + pad) + 3, | |
| 920 (width + vectorx) - 6, (height + vectory) - 6, SWP_MOVE | SWP_SIZE | SWP_ZORDER); | |
| 921 } | |
| 922 else | |
| 923 { | |
| 924 WinSetWindowPos(handle, HWND_TOP, currentx + pad, currenty + pad, | |
| 925 width + vectorx, height + vectory, SWP_MOVE | SWP_SIZE | SWP_ZORDER); | |
| 926 if(thisbox->items[z].type == TYPEBOX) | |
| 927 { | |
| 928 Box *boxinfo = WinQueryWindowPtr(handle, QWP_USER); | |
| 929 | |
| 930 if(boxinfo && boxinfo->grouphwnd) | |
| 931 WinSetWindowPos(boxinfo->grouphwnd, HWND_TOP, 0, 0, | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
932 width + vectorx, height + vectory, SWP_MOVE | SWP_SIZE /*| SWP_ZORDER*/); |
| 3 | 933 |
| 934 } | |
| 935 | |
| 936 } | |
| 937 | |
| 938 #ifdef DWDEBUG | |
| 939 fprintf(f, "Window Pos depth %d\r\ncurrentx = %d, currenty = %d, pad = %d, width = %d, height = %d, vectorx = %d, vectory = %d, Box type = %s\r\n\r\n", | |
| 940 *depth, currentx, currenty, pad, width, height, vectorx, vectory,thisbox->type == BOXHORZ ? "Horizontal" : "Vertical"); | |
| 941 reopen(); | |
| 942 #endif | |
| 943 | |
| 944 if(thisbox->type == BOXHORZ) | |
| 945 currentx += width + vectorx + (pad * 2); | |
| 946 if(thisbox->type == BOXVERT) | |
| 947 currenty += height + vectory + (pad * 2); | |
| 948 } | |
| 949 } | |
| 950 } | |
| 951 return 0; | |
| 952 } | |
| 953 | |
| 954 void _do_resize(Box *thisbox, int x, int y) | |
| 955 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
956 if(x != 0 && y != 0) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
957 { |
| 3 | 958 if(thisbox) |
| 959 { | |
| 960 int usedx = 0, usedy = 0, usedpadx = 0, usedpady = 0, depth = 0; | |
| 961 | |
| 962 _resize_box(thisbox, &depth, x, y, &usedx, &usedy, 1, &usedpadx, &usedpady); | |
| 963 | |
| 964 if(usedx-usedpadx == 0 || usedy-usedpady == 0) | |
| 965 return; | |
| 966 | |
| 967 thisbox->xratio = ((float)(x-usedpadx))/((float)(usedx-usedpadx)); | |
| 968 thisbox->yratio = ((float)(y-usedpady))/((float)(usedy-usedpady)); | |
| 969 | |
| 970 #ifdef DWDEBUG | |
| 971 fprintf(f, "WM_SIZE Resize Box Pass 1\r\nx = %d, y = %d, usedx = %d, usedy = %d, usedpadx = %d, usedpady = %d xratio = %f, yratio = %f\r\n\r\n", | |
| 972 x, y, usedx, usedy, usedpadx, usedpady, thisbox->xratio, thisbox->yratio); | |
| 973 reopen(); | |
| 974 #endif | |
| 975 | |
| 976 usedx = usedy = usedpadx = usedpady = depth = 0; | |
| 977 | |
| 978 _resize_box(thisbox, &depth, x, y, &usedx, &usedy, 2, &usedpadx, &usedpady); | |
| 979 #ifdef DWDEBUG | |
| 980 fprintf(f, "WM_SIZE Resize Box Pass 2\r\nx = %d, y = %d, usedx = %d, usedy = %d, usedpadx = %d, usedpady = %d\r\n", | |
| 981 x, y, usedx, usedy, usedpadx, usedpady); | |
| 982 reopen(); | |
| 983 #endif | |
| 984 } | |
| 985 } | |
| 986 } | |
| 987 | |
| 988 /* This procedure handles WM_QUERYTRACKINFO requests from the frame */ | |
| 989 MRESULT EXPENTRY _sizeproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 990 { | |
| 991 PFNWP *blah = WinQueryWindowPtr(hWnd, QWP_USER); | |
| 992 | |
| 993 switch(msg) | |
| 994 { | |
| 995 case WM_QUERYTRACKINFO: | |
| 996 { | |
| 997 if(blah && *blah) | |
| 998 { | |
| 999 PTRACKINFO ptInfo; | |
| 1000 int res; | |
| 1001 PFNWP myfunc = *blah; | |
| 1002 res = (int)myfunc(hWnd, msg, mp1, mp2); | |
| 1003 | |
| 1004 ptInfo = (PTRACKINFO)(mp2); | |
| 1005 | |
| 1006 ptInfo->ptlMinTrackSize.y = 8; | |
| 1007 ptInfo->ptlMinTrackSize.x = 8; | |
| 1008 | |
| 1009 return (MRESULT)res; | |
| 1010 } | |
| 1011 } | |
| 1012 } | |
| 1013 if(blah && *blah) | |
| 1014 { | |
| 1015 PFNWP myfunc = *blah; | |
| 1016 return myfunc(hWnd, msg, mp1, mp2); | |
| 1017 } | |
| 1018 | |
| 1019 return WinDefWindowProc(hWnd, msg, mp1, mp2); | |
| 1020 } | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1021 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1022 void _Top(HPS hpsPaint, RECTL rclPaint) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1023 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1024 POINTL ptl1, ptl2; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1025 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1026 ptl1.x = rclPaint.xLeft; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1027 ptl2.y = ptl1.y = rclPaint.yTop - 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1028 ptl2.x = rclPaint.xRight - 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1029 GpiMove(hpsPaint, &ptl1); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1030 GpiLine(hpsPaint, &ptl2); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1031 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1032 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1033 /* Left hits the bottom */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1034 void _Left(HPS hpsPaint, RECTL rclPaint) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1035 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1036 POINTL ptl1, ptl2; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1037 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1038 ptl2.x = ptl1.x = rclPaint.xLeft; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1039 ptl1.y = rclPaint.yTop - 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1040 ptl2.y = rclPaint.yBottom; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1041 GpiMove(hpsPaint, &ptl1); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1042 GpiLine(hpsPaint, &ptl2); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1043 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1044 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1045 void _Bottom(HPS hpsPaint, RECTL rclPaint) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1046 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1047 POINTL ptl1, ptl2; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1048 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1049 ptl1.x = rclPaint.xRight - 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1050 ptl1.y = ptl2.y = rclPaint.yBottom; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1051 ptl2.x = rclPaint.xLeft; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1052 GpiMove(hpsPaint, &ptl1); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1053 GpiLine(hpsPaint, &ptl2); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1054 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1055 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1056 /* Right hits the top */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1057 void _Right(HPS hpsPaint, RECTL rclPaint) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1058 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1059 POINTL ptl1, ptl2; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1060 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1061 ptl2.x = ptl1.x = rclPaint.xRight - 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1062 ptl1.y = rclPaint.yBottom + 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1063 ptl2.y = rclPaint.yTop - 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1064 GpiMove(hpsPaint, &ptl1); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1065 GpiLine(hpsPaint, &ptl2); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1066 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1067 |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1068 /* This procedure handles drawing of a status border */ |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1069 MRESULT EXPENTRY _statusproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1070 { |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1071 PFNWP *blah = WinQueryWindowPtr(hWnd, QWP_USER); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1072 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1073 if(blah && *blah) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1074 { |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1075 PFNWP myfunc = *blah; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1076 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1077 switch(msg) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1078 { |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1079 case WM_PAINT: |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1080 { |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1081 HPS hpsPaint; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1082 RECTL rclPaint; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1083 char buf[1024]; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1084 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1085 hpsPaint = WinBeginPaint(hWnd, 0, 0); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1086 WinQueryWindowRect(hWnd, &rclPaint); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1087 WinFillRect(hpsPaint, &rclPaint, CLR_PALEGRAY); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1088 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1089 GpiSetColor(hpsPaint, CLR_DARKGRAY); |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1090 _Top(hpsPaint, rclPaint); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1091 _Left(hpsPaint, rclPaint); |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1092 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1093 GpiSetColor(hpsPaint, CLR_WHITE); |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1094 _Right(hpsPaint, rclPaint); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1095 _Bottom(hpsPaint, rclPaint); |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1096 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1097 WinQueryWindowText(hWnd, 1024, buf); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1098 rclPaint.xLeft += 3; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1099 rclPaint.xRight--; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1100 rclPaint.yTop--; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1101 rclPaint.yBottom++; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1102 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1103 GpiSetColor(hpsPaint, CLR_BLACK); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1104 WinDrawText(hpsPaint, -1, buf, &rclPaint, DT_TEXTATTRS, DT_TEXTATTRS, DT_VCENTER | DT_LEFT | DT_TEXTATTRS); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1105 WinEndPaint(hpsPaint); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1106 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1107 return (MRESULT)TRUE; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1108 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1109 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1110 return myfunc(hWnd, msg, mp1, mp2); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1111 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1112 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1113 return WinDefWindowProc(hWnd, msg, mp1, mp2); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1114 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1115 |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1116 /* This procedure handles drawing of a percent bar */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1117 MRESULT EXPENTRY _percentproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1118 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1119 PercentBar *blah = (PercentBar *)WinQueryWindowPtr(hWnd, QWP_USER); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1120 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1121 if(blah) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1122 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1123 PFNWP myfunc = blah->oldproc; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1124 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1125 switch(msg) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1126 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1127 case WM_PAINT: |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1128 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1129 HPS hpsPaint; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1130 RECTL rclPaint, rclBar; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1131 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1132 hpsPaint = WinBeginPaint(hWnd, 0, 0); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1133 WinQueryWindowRect(hWnd, &rclPaint); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1134 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1135 /* Draw outer border */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1136 rclBar = rclPaint; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1137 GpiSetColor(hpsPaint, CLR_PALEGRAY); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1138 _Top(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1139 _Bottom(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1140 rclBar.yTop--; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1141 GpiSetColor(hpsPaint, CLR_WHITE); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1142 _Right(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1143 rclBar.yBottom++; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1144 GpiSetColor(hpsPaint, CLR_DARKGRAY); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1145 _Left(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1146 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1147 /* Draw inner border */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1148 rclBar.xLeft++; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1149 rclBar.xRight--; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1150 GpiSetColor(hpsPaint, CLR_DARKGRAY); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1151 _Left(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1152 _Top(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1153 GpiSetColor(hpsPaint, CLR_WHITE); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1154 _Bottom(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1155 _Right(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1156 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1157 /* Draw bar border */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1158 rclBar.xLeft++; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1159 rclBar.xRight--; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1160 rclBar.yBottom++; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1161 rclBar.yTop--; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1162 GpiSetColor(hpsPaint, CLR_DARKGRAY); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1163 _Left(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1164 _Top(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1165 _Bottom(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1166 _Right(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1167 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1168 if(blah->pos) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1169 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1170 rclBar.xRight = 3 + blah->pos; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1171 _Right(hpsPaint, rclBar); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1172 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1173 /* Draw Bar itself */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1174 rclBar.xLeft = rclPaint.xLeft + 3; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1175 rclBar.xRight = rclPaint.xLeft + 2 + blah->pos; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1176 rclBar.yTop = rclPaint.yTop - 3; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1177 rclBar.yBottom = rclPaint.yBottom + 3; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1178 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1179 WinFillRect(hpsPaint, &rclBar, CLR_DARKBLUE); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1180 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1181 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1182 /* Draw the background */ |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1183 rclBar.xLeft = rclPaint.xLeft + 3 + blah->pos; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1184 rclBar.xRight = rclPaint.xRight - 3; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1185 rclBar.yTop = rclPaint.yTop - 3; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1186 rclBar.yBottom = rclPaint.yBottom + 3; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1187 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1188 WinFillRect(hpsPaint, &rclBar, CLR_PALEGRAY); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1189 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1190 WinEndPaint(hpsPaint); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1191 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1192 return (MRESULT)TRUE; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1193 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1194 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1195 return myfunc(hWnd, msg, mp1, mp2); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1196 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1197 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1198 return WinDefWindowProc(hWnd, msg, mp1, mp2); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1199 } |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
1200 |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1201 void _click_default(HWND handle) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1202 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1203 char tmpbuf[100]; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1204 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1205 WinQueryClassName(handle, 99, tmpbuf); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1206 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1207 /* These are the window classes which can |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1208 * obtain input focus. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1209 */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1210 if(strncmp(tmpbuf, "#3", 3)==0) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1211 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1212 /* Generate click on default item */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1213 SignalHandler *tmp = Root; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1214 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1215 /* Find any callbacks for this function */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1216 while(tmp) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1217 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1218 if(tmp->message == WM_COMMAND) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1219 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1220 int (*clickfunc)(HWND, void *) = (int (*)(HWND, void *))tmp->signalfunction; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1221 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1222 /* Make sure it's the right window, and the right ID */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1223 if(tmp->window == handle) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1224 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1225 clickfunc(tmp->window, tmp->data); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1226 tmp = NULL; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1227 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1228 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1229 if(tmp) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1230 tmp= tmp->next; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1231 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1232 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1233 else |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1234 WinSetFocus(HWND_DESKTOP, handle); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1235 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1236 |
| 3 | 1237 /* Originally just intended for entryfields, it now serves as a generic |
| 1238 * procedure for handling TAB presses to change input focus on controls. | |
| 1239 */ | |
| 1240 MRESULT EXPENTRY _entryproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 1241 { | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1242 WindowData *blah = (WindowData *)WinQueryWindowPtr(hWnd, QWP_USER); |
| 3 | 1243 |
| 1244 switch(msg) | |
| 1245 { | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1246 case WM_BUTTON1DOWN: |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1247 case WM_BUTTON2DOWN: |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1248 case WM_BUTTON3DOWN: |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1249 { |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1250 char tmpbuf[100]; |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1251 |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1252 WinQueryClassName(hWnd, 99, tmpbuf); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1253 |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1254 if(strncmp(tmpbuf, "#32", 3)==0) |
|
38
538db2a48bac
Added typecast to MPARAM.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
37
diff
changeset
|
1255 _run_event(hWnd, WM_SETFOCUS, (MPARAM)FALSE, (MPARAM)TRUE); |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1256 } |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1257 break; |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1258 case WM_SETFOCUS: |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1259 _run_event(hWnd, msg, mp1, mp2); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
1260 break; |
| 3 | 1261 case WM_CHAR: |
| 1262 if(SHORT1FROMMP(mp2) == '\t') | |
| 1263 { | |
| 1264 _shift_focus(hWnd); | |
| 1265 return FALSE; | |
| 1266 } | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1267 else if(SHORT1FROMMP(mp2) == '\r' && blah && blah->clickdefault) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1268 _click_default(blah->clickdefault); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1269 |
| 3 | 1270 break; |
| 1271 } | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1272 if(blah && blah->oldproc) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1273 return blah->oldproc(hWnd, msg, mp1, mp2); |
| 3 | 1274 |
| 1275 return WinDefWindowProc(hWnd, msg, mp1, mp2); | |
| 1276 } | |
| 1277 | |
| 1278 /* Handle correct painting of a combobox with the WS_CLIPCHILDREN | |
| 1279 * flag enabled, and also handle TABs to switch input focus. | |
| 1280 */ | |
| 1281 MRESULT EXPENTRY _comboproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 1282 { | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1283 WindowData *blah = WinQueryWindowPtr(hWnd, QWP_USER); |
| 3 | 1284 |
| 1285 switch(msg) | |
| 1286 { | |
| 1287 case WM_CHAR: | |
| 1288 if(SHORT1FROMMP(mp2) == '\t') | |
| 1289 { | |
| 1290 _shift_focus(hWnd); | |
| 1291 return FALSE; | |
| 1292 } | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1293 else if(SHORT1FROMMP(mp2) == '\r' && blah && blah->clickdefault) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1294 _click_default(blah->clickdefault); |
| 3 | 1295 break; |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1296 case WM_BUTTON1DOWN: |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1297 case WM_BUTTON2DOWN: |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1298 case WM_BUTTON3DOWN: |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1299 _run_event(hWnd, WM_SETFOCUS, (MPARAM)FALSE, (MPARAM)TRUE); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1300 break; |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1301 case WM_SETFOCUS: |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1302 _run_event(hWnd, msg, mp1, mp2); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1303 break; |
| 3 | 1304 case WM_PAINT: |
| 1305 { | |
| 1306 HWND parent = WinQueryWindow(hWnd, QW_PARENT); | |
| 1307 ULONG bcol, av[32]; | |
| 1308 HPS hpsPaint; | |
| 1309 POINTL ptl; /* Add 6 because it has a thick border like the entryfield */ | |
| 1310 unsigned long width, height, thumbheight = WinQuerySysValue(HWND_DESKTOP, SV_CYVSCROLLARROW) + 6; | |
| 1311 | |
| 1312 WinQueryPresParam(parent, PP_BACKGROUNDCOLORINDEX, 0, &bcol, sizeof(ULONG), &av, QPF_ID1COLORINDEX | QPF_NOINHERIT); | |
| 1313 dw_window_get_pos_size(hWnd, 0, 0, &width, &height); | |
| 1314 | |
| 1315 hpsPaint = WinGetPS(hWnd); | |
| 1316 GpiSetColor(hpsPaint, CLR_PALEGRAY); | |
| 1317 | |
| 1318 ptl.x = 0; | |
|
24
d9e87e8bcf1d
Updated dynamic windows to build with EMX.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
23
diff
changeset
|
1319 ptl.y = 0; |
| 3 | 1320 GpiMove(hpsPaint, &ptl); |
| 1321 | |
| 1322 ptl.x = width; | |
| 1323 ptl.y = height - thumbheight; | |
| 1324 GpiBox(hpsPaint, DRO_FILL, &ptl, 0, 0); | |
| 1325 | |
| 1326 WinReleasePS(hpsPaint); | |
| 1327 } | |
| 1328 break; | |
| 1329 } | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1330 if(blah && blah->oldproc) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
1331 return blah->oldproc(hWnd, msg, mp1, mp2); |
| 3 | 1332 |
| 1333 return WinDefWindowProc(hWnd, msg, mp1, mp2); | |
| 1334 } | |
| 1335 | |
| 1336 void _GetPPFont(HWND hwnd, char *buff) | |
| 1337 { | |
| 1338 ULONG AttrFound; | |
| 1339 BYTE AttrValue[128]; | |
| 1340 ULONG cbRetLen; | |
| 1341 | |
| 1342 cbRetLen = WinQueryPresParam(hwnd, | |
| 1343 PP_FONTNAMESIZE, | |
| 1344 0, | |
| 1345 &AttrFound, | |
| 1346 sizeof(AttrValue), | |
| 1347 &AttrValue, | |
| 1348 QPF_NOINHERIT); | |
| 1349 | |
| 1350 if(PP_FONTNAMESIZE == AttrFound && cbRetLen) | |
| 1351 { | |
| 1352 memcpy(buff, AttrValue, cbRetLen); | |
| 1353 } | |
| 1354 } | |
| 1355 | |
| 1356 /* Returns height of specified window. */ | |
| 1357 int _get_height(HWND handle) | |
| 1358 { | |
| 1359 unsigned long height; | |
| 1360 dw_window_get_pos_size(handle, NULL, NULL, NULL, &height); | |
| 1361 return (int)height; | |
| 1362 } | |
| 1363 | |
| 1364 /* Find the height of the frame a desktop style window is sitting on */ | |
| 1365 int _get_frame_height(HWND handle) | |
| 1366 { | |
| 1367 while(handle) | |
| 1368 { | |
| 1369 HWND client; | |
| 1370 if((client = WinWindowFromID(handle, FID_CLIENT)) != NULLHANDLE) | |
| 1371 { | |
| 1372 return _get_height(WinQueryWindow(handle, QW_PARENT)); | |
| 1373 } | |
| 1374 handle = WinQueryWindow(handle, QW_PARENT); | |
| 1375 } | |
| 1376 return dw_screen_height(); | |
| 1377 } | |
| 1378 | |
| 1379 #ifndef NO_SIGNALS | |
| 1380 MRESULT EXPENTRY _run_event(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 1381 { | |
| 1382 int result = -1; | |
| 1383 SignalHandler *tmp = Root; | |
| 1384 ULONG origmsg = msg; | |
| 1385 | |
| 1386 if(msg == WM_BUTTON2DOWN || msg == WM_BUTTON3DOWN) | |
| 1387 msg = WM_BUTTON1DOWN; | |
| 1388 if(msg == WM_BUTTON2UP || msg == WM_BUTTON3UP) | |
| 1389 msg = WM_BUTTON1UP; | |
| 1390 | |
| 1391 /* Find any callbacks for this function */ | |
| 1392 while(tmp) | |
| 1393 { | |
| 1394 if(tmp->message == msg || msg == WM_CONTROL) | |
| 1395 { | |
| 1396 switch(msg) | |
| 1397 { | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1398 case WM_SETFOCUS: |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1399 { |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1400 if(mp2) |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1401 { |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1402 int (*setfocusfunc)(HWND, void *) = (int (*)(HWND, void *))tmp->signalfunction; |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1403 |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1404 if(hWnd == tmp->window || WinWindowFromID(tmp->window, FID_CLIENT) == hWnd) |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1405 { |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1406 result = setfocusfunc(tmp->window, tmp->data); |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1407 tmp = NULL; |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1408 } |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1409 } |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1410 } |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
1411 break; |
| 3 | 1412 case WM_SIZE: |
| 1413 { | |
| 1414 int (*sizefunc)(HWND, int, int, void *) = (int (*)(HWND, int, int, void *))tmp->signalfunction; | |
| 1415 | |
| 1416 if(hWnd == tmp->window || WinWindowFromID(tmp->window, FID_CLIENT) == hWnd) | |
| 1417 { | |
| 1418 result = sizefunc(tmp->window, SHORT1FROMMP(mp2), SHORT2FROMMP(mp2), tmp->data); | |
| 1419 tmp = NULL; | |
| 1420 } | |
| 1421 } | |
| 1422 break; | |
| 1423 case WM_BUTTON1DOWN: | |
| 1424 { | |
| 1425 POINTS pts = (*((POINTS*)&mp1)); | |
| 1426 int (*buttonfunc)(HWND, int, int, int, void *) = (int (*)(HWND, int, int, int, void *))tmp->signalfunction; | |
| 1427 | |
| 1428 if(hWnd == tmp->window || WinWindowFromID(tmp->window, FID_CLIENT) == hWnd || WinQueryCapture(HWND_DESKTOP) == tmp->window) | |
| 1429 { | |
|
24
d9e87e8bcf1d
Updated dynamic windows to build with EMX.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
23
diff
changeset
|
1430 int button = 0; |
| 3 | 1431 |
| 1432 switch(origmsg) | |
| 1433 { | |
| 1434 case WM_BUTTON1DOWN: | |
| 1435 button = 1; | |
| 1436 break; | |
| 1437 case WM_BUTTON2DOWN: | |
| 1438 button = 2; | |
| 1439 break; | |
| 1440 case WM_BUTTON3DOWN: | |
| 1441 button = 3; | |
| 1442 break; | |
| 1443 } | |
| 1444 | |
| 1445 result = buttonfunc(tmp->window, pts.x, _get_frame_height(tmp->window) - pts.y, button, tmp->data); | |
| 1446 tmp = NULL; | |
| 1447 } | |
| 1448 } | |
| 1449 break; | |
| 1450 case WM_BUTTON1UP: | |
| 1451 { | |
| 1452 POINTS pts = (*((POINTS*)&mp1)); | |
| 1453 int (*buttonfunc)(HWND, int, int, int, void *) = (int (*)(HWND, int, int, int, void *))tmp->signalfunction; | |
| 1454 | |
| 1455 if(hWnd == tmp->window || WinWindowFromID(tmp->window, FID_CLIENT) == hWnd || WinQueryCapture(HWND_DESKTOP) == tmp->window) | |
| 1456 { | |
|
24
d9e87e8bcf1d
Updated dynamic windows to build with EMX.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
23
diff
changeset
|
1457 int button = 0; |
| 3 | 1458 |
| 1459 switch(origmsg) | |
| 1460 { | |
| 1461 case WM_BUTTON1UP: | |
| 1462 button = 1; | |
| 1463 break; | |
| 1464 case WM_BUTTON2UP: | |
| 1465 button = 2; | |
| 1466 break; | |
| 1467 case WM_BUTTON3UP: | |
| 1468 button = 3; | |
| 1469 break; | |
| 1470 } | |
| 1471 | |
| 1472 result = buttonfunc(tmp->window, pts.x, WinQueryWindow(tmp->window, QW_PARENT) == HWND_DESKTOP ? dw_screen_height() - pts.y : _get_height(tmp->window) - pts.y, button, tmp->data); | |
| 1473 tmp = NULL; | |
| 1474 } | |
| 1475 } | |
| 1476 break; | |
| 1477 case WM_MOUSEMOVE: | |
| 1478 { | |
| 1479 int (*motionfunc)(HWND, int, int, int, void *) = (int (*)(HWND, int, int, int, void *))tmp->signalfunction; | |
| 1480 | |
| 1481 if(hWnd == tmp->window || WinWindowFromID(tmp->window, FID_CLIENT) == hWnd || WinQueryCapture(HWND_DESKTOP) == tmp->window) | |
| 1482 { | |
| 1483 int keys = 0; | |
| 1484 SHORT x = SHORT1FROMMP(mp1), y = SHORT2FROMMP(mp1); | |
| 1485 | |
| 1486 if (WinGetKeyState(HWND_DESKTOP, VK_BUTTON1) & 0x8000) | |
| 1487 keys = DW_BUTTON1_MASK; | |
| 1488 if (WinGetKeyState(HWND_DESKTOP, VK_BUTTON2) & 0x8000) | |
| 1489 keys |= DW_BUTTON2_MASK; | |
| 1490 if (WinGetKeyState(HWND_DESKTOP, VK_BUTTON3) & 0x8000) | |
| 1491 keys |= DW_BUTTON3_MASK; | |
| 1492 | |
| 1493 result = motionfunc(tmp->window, x, _get_frame_height(tmp->window) - y, keys, tmp->data); | |
| 1494 tmp = NULL; | |
| 1495 } | |
| 1496 } | |
| 1497 break; | |
| 1498 case WM_CHAR: | |
| 1499 { | |
| 1500 int (*keypressfunc)(HWND, int, void *) = (int (*)(HWND, int, void *))tmp->signalfunction; | |
| 1501 | |
| 1502 if(hWnd == tmp->window) | |
| 1503 { | |
| 1504 result = keypressfunc(tmp->window, SHORT1FROMMP(mp2), tmp->data); | |
| 1505 tmp = NULL; | |
| 1506 } | |
| 1507 } | |
| 1508 break; | |
| 1509 case WM_CLOSE: | |
| 1510 { | |
| 1511 int (*closefunc)(HWND, void *) = (int (*)(HWND, void *))tmp->signalfunction; | |
| 1512 | |
| 1513 if(hWnd == tmp->window || hWnd == WinWindowFromID(tmp->window, FID_CLIENT)) | |
| 1514 { | |
| 1515 result = closefunc(tmp->window, tmp->data); | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1516 if(result) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1517 result = FALSE; |
| 3 | 1518 tmp = NULL; |
| 1519 } | |
| 1520 } | |
| 1521 break; | |
| 1522 case WM_PAINT: | |
| 1523 { | |
| 1524 HPS hps; | |
| 1525 DWExpose exp; | |
| 1526 int (*exposefunc)(HWND, DWExpose *, void *) = (int (*)(HWND, DWExpose *, void *))tmp->signalfunction; | |
| 1527 RECTL rc; | |
| 1528 | |
| 1529 if(hWnd == tmp->window) | |
| 1530 { | |
| 1531 int height = _get_height(hWnd); | |
| 1532 | |
| 1533 hps = WinBeginPaint(hWnd, 0L, &rc); | |
| 1534 exp.x = rc.xLeft; | |
| 1535 exp.y = height - rc.yTop - 1; | |
| 1536 exp.width = rc.xRight - rc. xLeft; | |
| 1537 exp.height = rc.yTop - rc.yBottom; | |
| 1538 result = exposefunc(hWnd, &exp, tmp->data); | |
| 1539 WinEndPaint(hps); | |
| 1540 } | |
| 1541 } | |
| 1542 break; | |
| 1543 case WM_COMMAND: | |
| 1544 { | |
| 1545 int (*clickfunc)(HWND, void *) = (int (*)(HWND, void *))tmp->signalfunction; | |
| 1546 ULONG command = COMMANDMSG(&msg)->cmd; | |
| 1547 | |
| 1548 if(tmp->window < 65536 && command == tmp->window) | |
| 1549 { | |
| 1550 result = clickfunc(tmp->window, tmp->data); | |
| 1551 tmp = NULL; | |
| 1552 } | |
| 1553 } | |
| 1554 break; | |
| 1555 case WM_CONTROL: | |
| 1556 if(tmp->message == SHORT2FROMMP(mp1)) | |
| 1557 { | |
| 1558 switch(SHORT2FROMMP(mp1)) | |
| 1559 { | |
| 1560 case CN_ENTER: | |
| 1561 { | |
| 1562 int (*containerselectfunc)(HWND, char *, void *) = (int (*)(HWND, char *, void *))tmp->signalfunction; | |
| 1563 int id = SHORT1FROMMP(mp1); | |
| 1564 HWND conthwnd = dw_window_from_id(hWnd, id); | |
| 1565 char *text = NULL; | |
| 1566 | |
| 1567 if(mp2) | |
| 1568 { | |
| 1569 PRECORDCORE pre; | |
| 1570 | |
| 1571 pre = ((PNOTIFYRECORDENTER)mp2)->pRecord; | |
| 1572 if(pre) | |
| 1573 text = pre->pszIcon; | |
| 1574 } | |
| 1575 | |
| 1576 if(tmp->window == conthwnd) | |
| 1577 { | |
| 1578 result = containerselectfunc(tmp->window, text, tmp->data); | |
| 1579 tmp = NULL; | |
| 1580 } | |
| 1581 } | |
| 1582 break; | |
| 1583 case CN_CONTEXTMENU: | |
| 1584 { | |
| 1585 int (*containercontextfunc)(HWND, char *, int, int, void *) = (int (*)(HWND, char *, int, int, void *))tmp->signalfunction; | |
| 1586 int id = SHORT1FROMMP(mp1); | |
| 1587 HWND conthwnd = dw_window_from_id(hWnd, id); | |
| 1588 char *text = NULL; | |
| 1589 LONG x,y; | |
| 1590 | |
| 1591 if(mp2) | |
| 1592 { | |
| 1593 PRECORDCORE pre; | |
| 1594 | |
| 1595 pre = (PRECORDCORE)mp2; | |
| 1596 text = pre->pszIcon; | |
| 1597 } | |
| 1598 | |
| 1599 | |
| 1600 dw_pointer_query_pos(&x, &y); | |
| 1601 | |
| 1602 if(tmp->window == conthwnd) | |
| 1603 { | |
| 1604 result = containercontextfunc(tmp->window, text, x, y, tmp->data); | |
| 1605 tmp = NULL; | |
| 1606 } | |
| 1607 } | |
| 1608 break; | |
| 1609 case LN_SELECT: | |
| 1610 { | |
| 1611 int (*listboxselectfunc)(HWND, int, void *) = (int (*)(HWND, int, void *))tmp->signalfunction; | |
| 1612 int id = SHORT1FROMMP(mp1); | |
| 1613 HWND conthwnd = dw_window_from_id(hWnd, id); | |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1614 static int _recursing = 0; |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1615 |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1616 if(_recursing == 0 && (tmp->window == conthwnd || (!id && tmp->window == (HWND)mp2))) |
| 3 | 1617 { |
| 1618 char buf1[500], classbuf[100]; | |
| 1619 unsigned int index = dw_listbox_selected(tmp->window); | |
| 1620 | |
| 1621 dw_listbox_query_text(tmp->window, index, buf1, 500); | |
| 1622 | |
| 1623 WinQueryClassName(tmp->window, 99, classbuf); | |
| 1624 | |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1625 _recursing = 1; |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1626 |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1627 if(id && strncmp(classbuf, "#2", 3)==0) |
| 3 | 1628 { |
| 1629 char *buf2; | |
| 1630 | |
| 1631 buf2 = dw_window_get_text(tmp->window); | |
| 1632 | |
| 1633 /* This is to make sure the listboxselect function doesn't | |
| 1634 * get called if the user is modifying the entry text. | |
| 1635 */ | |
| 1636 if(buf2 && *buf2 && *buf1 && strncmp(buf1, buf2, 500) == 0) | |
| 1637 result = listboxselectfunc(tmp->window, index, tmp->data); | |
| 1638 | |
| 1639 if(buf2) | |
| 1640 free(buf2); | |
| 1641 } | |
| 1642 else | |
| 1643 result = listboxselectfunc(tmp->window, index, tmp->data); | |
| 1644 | |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1645 _recursing = 0; |
| 3 | 1646 tmp = NULL; |
| 1647 } | |
| 1648 } | |
| 1649 break; | |
| 1650 } | |
| 1651 } | |
| 1652 break; | |
| 1653 } | |
| 1654 } | |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1655 |
|
31
17a08cfd45d2
Check that tmp is not NULL before checking for tree-select signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
30
diff
changeset
|
1656 if(tmp && origmsg == WM_BUTTON1DOWN) |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1657 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1658 if(tmp->message == WM_USER+1) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1659 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1660 if(tmp->window == hWnd) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1661 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1662 QUERYRECFROMRECT rc; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1663 POINTS pts = (*((POINTS*)&mp1)); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1664 RECORDCORE *prc; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1665 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1666 rc.cb = sizeof(QUERYRECFROMRECT); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1667 rc.rect.xLeft = pts.x; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1668 rc.rect.xRight = pts.x + 1; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1669 rc.rect.yTop = pts.y; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1670 rc.rect.yBottom = pts.y - 1; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1671 rc.fsSearch = CMA_PARTIAL | CMA_ITEMORDER; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1672 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1673 prc = (RECORDCORE *)WinSendMsg(hWnd, CM_QUERYRECORDFROMRECT, (MPARAM)CMA_FIRST, MPFROMP(&rc)); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1674 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1675 if(prc) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1676 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1677 int (*treeselectfunc)(HWND, HWND, char *, void *) = (int (*)(HWND, HWND, char *, void *))tmp->signalfunction; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1678 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1679 result = treeselectfunc(tmp->window, (HWND)prc, prc->pszIcon, tmp->data); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1680 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1681 tmp = NULL; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1682 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1683 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1684 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1685 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1686 |
| 3 | 1687 if(tmp) |
| 1688 tmp = tmp->next; | |
| 1689 | |
| 1690 } | |
| 1691 | |
| 1692 return (MRESULT)result; | |
| 1693 } | |
| 1694 #endif | |
| 1695 | |
| 1696 /* Handles control messages sent to the box (owner). */ | |
| 1697 MRESULT EXPENTRY _controlproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 1698 { | |
| 1699 Box *blah = WinQueryWindowPtr(hWnd, QWP_USER); | |
| 1700 | |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1701 #ifndef NO_SIGNALS |
| 3 | 1702 switch(msg) |
| 1703 { | |
| 1704 case WM_CONTROL: | |
| 1705 _run_event(hWnd, msg, mp1, mp2); | |
| 1706 break; | |
| 1707 } | |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
1708 #endif |
| 3 | 1709 if(blah && blah->oldproc) |
| 1710 { | |
| 1711 return blah->oldproc(hWnd, msg, mp1, mp2); | |
| 1712 } | |
| 1713 | |
| 1714 return WinDefWindowProc(hWnd, msg, mp1, mp2); | |
| 1715 } | |
| 1716 | |
| 1717 /* The main window procedure for Dynamic Windows, all the resizing code is done here. */ | |
| 1718 MRESULT EXPENTRY _wndproc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 1719 { | |
| 1720 int result = -1; | |
| 1721 static int command_active = 0; | |
| 1722 void (* windowfunc)(PVOID) = 0L; | |
| 1723 | |
| 1724 if(filterfunc) | |
| 1725 result = filterfunc(hWnd, msg, mp1, mp2); | |
| 1726 | |
| 1727 #ifndef NO_SIGNALS | |
| 1728 if(result == -1 && !command_active) | |
| 1729 { | |
| 1730 /* Make sure we don't end up in infinite recursion */ | |
| 1731 command_active = 1; | |
| 1732 | |
| 1733 result = (int)_run_event(hWnd, msg, mp1, mp2); | |
| 1734 | |
| 1735 command_active = 0; | |
| 1736 } | |
| 1737 #endif | |
| 1738 | |
| 1739 /* Now that any handlers are done... do normal processing */ | |
| 1740 switch( msg ) | |
| 1741 { | |
| 1742 case WM_ERASEBACKGROUND: | |
| 1743 return 0; | |
| 1744 | |
| 1745 case WM_PAINT: | |
| 1746 { | |
| 1747 HPS hps; | |
| 1748 RECTL rc; | |
| 1749 | |
| 1750 hps = WinBeginPaint( hWnd, 0L, &rc ); | |
| 1751 WinEndPaint( hps ); | |
| 1752 break; | |
| 1753 } | |
| 1754 | |
| 1755 case WM_SIZE: | |
| 1756 { | |
| 1757 Box *mybox = (Box *)WinQueryWindowPtr(hWnd, QWP_USER); | |
| 1758 | |
| 1759 if(!SHORT1FROMMP(mp2) && !SHORT2FROMMP(mp2)) | |
| 1760 return (MPARAM)TRUE; | |
| 1761 | |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1762 if(mybox && mybox->flags != DW_MINIMIZED) |
| 3 | 1763 { |
| 1764 /* Hide the window when recalculating to reduce | |
| 1765 * CPU load. | |
| 1766 */ | |
| 1767 WinShowWindow(hWnd, FALSE); | |
| 1768 | |
| 1769 _do_resize(mybox, SHORT1FROMMP(mp2), SHORT2FROMMP(mp2)); | |
| 1770 | |
| 1771 WinShowWindow(hWnd, TRUE); | |
| 1772 } | |
| 1773 } | |
| 1774 break; | |
| 1775 case WM_MINMAXFRAME: | |
| 1776 { | |
| 1777 Box *mybox = (Box *)WinQueryWindowPtr(hWnd, QWP_USER); | |
| 1778 SWP *swp = (SWP *)mp1; | |
| 1779 | |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1780 if(mybox && (swp->fl & SWP_MINIMIZE)) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1781 mybox->flags = DW_MINIMIZED; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1782 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1783 if(mybox && (swp->fl & SWP_RESTORE)) |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1784 { |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1785 if(!mybox->titlebar && mybox->hwndtitle) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1786 WinSetParent(mybox->hwndtitle, HWND_OBJECT, FALSE); |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1787 mybox->flags = 0; |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
1788 } |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1789 |
| 3 | 1790 if(mybox && (swp->fl & SWP_MAXIMIZE)) |
| 1791 { | |
| 1792 int z; | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1793 SWP swp2; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1794 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1795 WinQueryWindowPos(swp->hwnd, &swp2); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1796 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1797 if(swp2.cx == swp->cx && swp2.cy == swp->cy) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
1798 return FALSE; |
| 3 | 1799 |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1800 mybox->flags = 0; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
1801 |
| 3 | 1802 /* Hide the window when recalculating to reduce |
| 1803 * CPU load. | |
| 1804 */ | |
| 1805 WinShowWindow(hWnd, FALSE); | |
| 1806 | |
| 1807 _do_resize(mybox, swp->cx, swp->cy); | |
| 1808 | |
| 1809 if(mybox->count == 1 && mybox->items[0].type == TYPEBOX) | |
| 1810 { | |
| 1811 mybox = (Box *)WinQueryWindowPtr(mybox->items[0].hwnd, QWP_USER); | |
| 1812 | |
| 1813 for(z=0;z<mybox->count;z++) | |
| 1814 { | |
| 1815 char tmpbuf[100]; | |
| 1816 | |
| 1817 WinQueryClassName(mybox->items[z].hwnd, 99, tmpbuf); | |
| 1818 | |
| 1819 /* If we have a notebook we resize the page again. */ | |
| 1820 if(strncmp(tmpbuf, "#40", 3)==0) | |
| 1821 { | |
| 1822 unsigned long x, y, width, height; | |
| 1823 int page = dw_notebook_page_query(mybox->items[z].hwnd); | |
| 1824 HWND pagehwnd = (HWND)WinSendMsg(mybox->items[z].hwnd, BKM_QUERYPAGEWINDOWHWND, MPFROMLONG(page), 0); | |
| 1825 RECTL rc; | |
| 1826 | |
| 1827 Box *pagebox = (Box *)WinQueryWindowPtr(pagehwnd, QWP_USER); | |
| 1828 if(pagebox) | |
| 1829 { | |
| 1830 dw_window_get_pos_size(mybox->items[z].hwnd, &x, &y, &width, &height); | |
| 1831 | |
| 1832 rc.xLeft = x; | |
| 1833 rc.yBottom = y; | |
| 1834 rc.xRight = x + width; | |
| 1835 rc.yTop = y + height; | |
| 1836 | |
| 1837 WinSendMsg(mybox->items[z].hwnd, BKM_CALCPAGERECT, (MPARAM)&rc, (MPARAM)TRUE); | |
| 1838 | |
| 1839 _do_resize(pagebox, rc.xRight - rc.xLeft, rc.yTop - rc.yBottom); | |
| 1840 } | |
| 1841 | |
| 1842 } | |
| 1843 } | |
| 1844 | |
| 1845 } | |
| 1846 | |
| 1847 WinShowWindow(hWnd, TRUE); | |
| 1848 } | |
| 1849 } | |
| 1850 break; | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1851 case WM_CONTROL: |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1852 switch(SHORT2FROMMP(mp1)) |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1853 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1854 case BKN_PAGESELECTEDPENDING: |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1855 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1856 PAGESELECTNOTIFY *psn = (PAGESELECTNOTIFY *)mp2; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1857 HWND pagehwnd = (HWND)WinSendMsg(psn->hwndBook, BKM_QUERYPAGEWINDOWHWND, MPFROMLONG(psn->ulPageIdNew), 0); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1858 Box *pagebox = (Box *)WinQueryWindowPtr(pagehwnd, QWP_USER); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1859 unsigned long x, y, width, height; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1860 RECTL rc; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1861 |
|
21
c6e76b796b28
Stopped unnecessary redrawing when switching to the same page.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
20
diff
changeset
|
1862 if(pagebox && psn->ulPageIdNew != psn->ulPageIdCur) |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1863 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1864 dw_window_get_pos_size(psn->hwndBook, &x, &y, &width, &height); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1865 |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1866 rc.xLeft = x; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1867 rc.yBottom = y; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1868 rc.xRight = x + width; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1869 rc.yTop = y + height; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1870 |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1871 WinSendMsg(psn->hwndBook, BKM_CALCPAGERECT, (MPARAM)&rc, (MPARAM)TRUE); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1872 |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1873 _do_resize(pagebox, rc.xRight - rc.xLeft, rc.yTop - rc.yBottom); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1874 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1875 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1876 break; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1877 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
1878 break; |
| 3 | 1879 case WM_CLOSE: |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1880 if(result == -1) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1881 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1882 dw_window_destroy(WinQueryWindow(hWnd, QW_PARENT)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1883 return (MRESULT)TRUE; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1884 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1885 break; |
| 3 | 1886 case WM_USER: |
| 1887 windowfunc = (void (*)(void *))mp1; | |
| 1888 | |
| 1889 if(windowfunc) | |
| 1890 windowfunc((void *)mp2); | |
| 1891 break; | |
| 1892 case WM_CHAR: | |
| 1893 if(SHORT1FROMMP(mp2) == '\t') | |
| 1894 { | |
| 1895 _shift_focus(hWnd); | |
| 1896 return FALSE; | |
| 1897 } | |
| 1898 break; | |
| 1899 case WM_DESTROY: | |
| 1900 /* Free memory before destroying */ | |
| 1901 _free_window_memory(hWnd); | |
| 1902 break; | |
| 1903 } | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
1904 if(result != -1) |
| 3 | 1905 return (MRESULT)result; |
| 1906 else | |
| 1907 return WinDefWindowProc(hWnd, msg, mp1, mp2); | |
| 1908 } | |
| 1909 | |
| 1910 void _changebox(Box *thisbox, int percent, int type) | |
| 1911 { | |
| 1912 int z; | |
| 1913 | |
| 1914 for(z=0;z<thisbox->count;z++) | |
| 1915 { | |
| 1916 if(thisbox->items[z].type == TYPEBOX) | |
| 1917 { | |
| 1918 Box *tmp = WinQueryWindowPtr(thisbox->items[z].hwnd, QWP_USER); | |
| 1919 _changebox(tmp, percent, type); | |
| 1920 } | |
| 1921 else | |
| 1922 { | |
| 1923 if(type == BOXHORZ) | |
| 1924 { | |
| 1925 if(thisbox->items[z].hsize == SIZEEXPAND) | |
| 1926 thisbox->items[z].width = (int)(((float)thisbox->items[z].origwidth) * (((float)percent)/((float)100.0))); | |
| 1927 } | |
| 1928 else | |
| 1929 { | |
| 1930 if(thisbox->items[z].vsize == SIZEEXPAND) | |
| 1931 thisbox->items[z].height = (int)(((float)thisbox->items[z].origheight) * (((float)percent)/((float)100.0))); | |
| 1932 } | |
| 1933 } | |
| 1934 } | |
| 1935 } | |
| 1936 | |
| 1937 /* This handles any activity on the splitbars (sizers) */ | |
| 1938 MRESULT EXPENTRY _splitwndproc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 1939 { | |
| 1940 HWND hwndFrame = 0; | |
| 1941 Box *thisbox = 0; | |
| 1942 | |
| 1943 hwndFrame = WinQueryWindow(hwnd, QW_PARENT); | |
| 1944 if(hwndFrame) | |
| 1945 thisbox = WinQueryWindowPtr(hwndFrame, QWL_USER); | |
| 1946 | |
| 1947 switch (msg) | |
| 1948 { | |
| 1949 case WM_ACTIVATE: | |
| 1950 case WM_SETFOCUS: | |
| 1951 return (MRESULT)(FALSE); | |
| 1952 | |
| 1953 case WM_PAINT: | |
| 1954 { | |
| 1955 HPS hpsPaint; | |
| 1956 RECTL rclPaint; | |
| 1957 POINTL ptlStart[SPLITBAR_WIDTH]; | |
| 1958 POINTL ptlEnd[SPLITBAR_WIDTH]; | |
| 1959 USHORT i; | |
| 1960 | |
| 1961 hpsPaint = WinBeginPaint(hwnd, 0, 0); | |
| 1962 WinQueryWindowRect(hwnd, &rclPaint); | |
| 1963 | |
| 1964 if(thisbox->type == BOXHORZ) | |
| 1965 { | |
| 1966 for(i = 0; i < SPLITBAR_WIDTH; i++) | |
| 1967 { | |
| 1968 ptlStart[i].x = rclPaint.xLeft + i; | |
| 1969 ptlStart[i].y = rclPaint.yTop; | |
| 1970 | |
| 1971 ptlEnd[i].x = rclPaint.xLeft + i; | |
| 1972 ptlEnd[i].y = rclPaint.yBottom; | |
| 1973 } | |
| 1974 } | |
| 1975 else | |
| 1976 { | |
| 1977 for(i = 0; i < SPLITBAR_WIDTH; i++) | |
| 1978 { | |
| 1979 ptlStart[i].x = rclPaint.xLeft; | |
| 1980 ptlStart[i].y = rclPaint.yBottom + i; | |
| 1981 | |
| 1982 ptlEnd[i].x = rclPaint.xRight; | |
| 1983 ptlEnd[i].y = rclPaint.yBottom + i; | |
| 1984 } | |
| 1985 } | |
| 1986 | |
| 1987 for(i = 0; i < SPLITBAR_WIDTH; i++) | |
| 1988 { | |
| 1989 GpiSetColor( hpsPaint, lColor[i]); | |
| 1990 GpiMove(hpsPaint, &ptlStart[i]); | |
| 1991 GpiLine(hpsPaint, &ptlEnd[i]); | |
| 1992 } | |
| 1993 WinEndPaint(hpsPaint); | |
| 1994 } | |
| 1995 return MRFROMSHORT(FALSE); | |
| 1996 | |
| 1997 case WM_MOUSEMOVE: | |
| 1998 { | |
| 1999 if(thisbox->type == BOXHORZ) | |
| 2000 WinSetPointer(HWND_DESKTOP, | |
| 2001 WinQuerySysPointer(HWND_DESKTOP, | |
| 2002 SPTR_SIZEWE, | |
| 2003 FALSE)); | |
| 2004 else | |
| 2005 WinSetPointer(HWND_DESKTOP, | |
| 2006 WinQuerySysPointer(HWND_DESKTOP, | |
| 2007 SPTR_SIZENS, | |
| 2008 FALSE)); | |
| 2009 } | |
| 2010 return MRFROMSHORT(FALSE); | |
| 2011 case WM_BUTTON1DOWN: | |
| 2012 { | |
| 2013 APIRET rc; | |
| 2014 RECTL rclFrame; | |
| 2015 RECTL rclBounds; | |
| 2016 RECTL rclStart; | |
| 2017 USHORT startSize, orig, actual; | |
| 2018 | |
| 2019 WinQueryWindowRect(hwnd, &rclFrame); | |
| 2020 WinQueryWindowRect(hwnd, &rclStart); | |
| 2021 | |
| 2022 WinQueryWindowRect(hwndFrame, &rclBounds); | |
| 2023 | |
| 2024 WinMapWindowPoints(hwndFrame, HWND_DESKTOP, | |
| 2025 (PPOINTL)&rclBounds, 2); | |
| 2026 WinMapWindowPoints(hwnd, HWND_DESKTOP, | |
| 2027 (PPOINTL)&rclStart, 2); | |
| 2028 | |
| 2029 { | |
| 2030 int z, pastsplitbar = FALSE, found = FALSE; | |
| 2031 orig = actual = 0; | |
| 2032 | |
| 2033 for(z=0;z<thisbox->count;z++) | |
| 2034 { | |
| 2035 if(thisbox->items[z].hwnd == hwnd) | |
| 2036 pastsplitbar = TRUE; | |
| 2037 else | |
| 2038 { | |
| 2039 if(thisbox->type == BOXHORZ) | |
| 2040 { | |
| 2041 int tmpwidth, tmporigwidth; | |
| 2042 | |
| 2043 if(thisbox->items[z].type == TYPEBOX) | |
| 2044 _count_size(thisbox->items[z].hwnd, BOXHORZ, &tmpwidth, &tmporigwidth); | |
| 2045 else | |
| 2046 { | |
| 2047 tmpwidth = thisbox->items[z].width; | |
| 2048 tmporigwidth = thisbox->items[z].origwidth; | |
| 2049 } | |
| 2050 | |
| 2051 if(thisbox->items[z].hsize != SIZESTATIC && tmpwidth > actual && tmporigwidth) | |
| 2052 { | |
| 2053 found = pastsplitbar; | |
| 2054 orig = tmporigwidth; | |
| 2055 actual = tmpwidth; | |
| 2056 } | |
| 2057 } | |
| 2058 else | |
| 2059 { | |
| 2060 int tmpheight, tmporigheight; | |
| 2061 | |
| 2062 if(thisbox->items[z].type == TYPEBOX) | |
| 2063 _count_size(thisbox->items[z].hwnd, BOXVERT, &tmpheight, &tmporigheight); | |
| 2064 else | |
| 2065 { | |
| 2066 tmpheight = thisbox->items[z].height; | |
| 2067 tmporigheight = thisbox->items[z].origheight; | |
| 2068 } | |
| 2069 | |
| 2070 if(thisbox->items[z].vsize != SIZESTATIC && tmpheight > actual && tmporigheight) | |
| 2071 { | |
| 2072 found = pastsplitbar; | |
| 2073 orig = tmporigheight; | |
| 2074 actual = tmpheight; | |
| 2075 } | |
| 2076 } | |
| 2077 } | |
| 2078 } | |
| 2079 | |
| 2080 /* If we couldn't determine a valid scale... then abort */ | |
| 2081 if(!orig || !actual) | |
| 2082 return MRFROMSHORT(FALSE); | |
| 2083 | |
| 2084 if(thisbox->type == BOXHORZ) | |
| 2085 { | |
| 2086 if(found) | |
| 2087 startSize = (rclStart.xLeft - rclBounds.xLeft) | |
| 2088 * (((float)actual)/((float)orig)); | |
| 2089 else | |
| 2090 startSize = (rclStart.xLeft - rclBounds.xLeft) | |
| 2091 * (((float)orig)/((float)actual)); | |
| 2092 } | |
| 2093 else | |
| 2094 { | |
| 2095 if(found) | |
| 2096 startSize = (rclStart.yBottom - rclBounds.yBottom) | |
| 2097 * (((float)actual)/((float)orig)); | |
| 2098 else | |
| 2099 startSize = (rclStart.yBottom - rclBounds.yBottom) | |
| 2100 * (((float)orig)/((float)actual)); | |
| 2101 } | |
| 2102 } | |
| 2103 | |
| 2104 rc = _TrackRectangle(hwnd, &rclFrame, &rclBounds); | |
| 2105 | |
| 2106 if(rc == TRUE) | |
| 2107 { | |
| 2108 USHORT usNewRB; | |
| 2109 USHORT percent; | |
| 2110 int z; | |
| 2111 | |
| 2112 if(thisbox->type == BOXHORZ) | |
| 2113 { | |
| 2114 usNewRB = rclFrame.xLeft | |
| 2115 - rclBounds.xLeft; | |
| 2116 } | |
| 2117 else | |
| 2118 { | |
| 2119 usNewRB = rclFrame.yBottom | |
| 2120 - rclBounds.yBottom; | |
| 2121 } | |
| 2122 | |
| 2123 /* We don't want the item to disappear completely */ | |
| 2124 if(!usNewRB) | |
| 2125 usNewRB++; | |
| 2126 | |
| 2127 if(!startSize) | |
| 2128 startSize++; | |
| 2129 | |
| 2130 percent = (usNewRB*100)/startSize; | |
| 2131 | |
| 2132 for(z=0;z<thisbox->count;z++) | |
| 2133 { | |
| 2134 if(thisbox->items[z].type == TYPEBOX) | |
| 2135 { | |
| 2136 Box *tmp = WinQueryWindowPtr(thisbox->items[z].hwnd, QWP_USER); | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2137 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2138 if(tmp) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2139 _changebox(tmp, percent, thisbox->type); |
| 3 | 2140 } |
| 2141 else | |
| 2142 { | |
| 2143 if(thisbox->items[z].hwnd == hwnd) | |
| 2144 percent = (startSize*100)/usNewRB; | |
| 2145 | |
| 2146 if(thisbox->type == BOXHORZ) | |
| 2147 { | |
| 2148 if(thisbox->items[z].hsize == SIZEEXPAND) | |
| 2149 thisbox->items[z].width = (int)(((float)thisbox->items[z].origwidth) * (((float)percent)/((float)100.0))); | |
| 2150 } | |
| 2151 else | |
| 2152 { | |
| 2153 if(thisbox->items[z].vsize == SIZEEXPAND) | |
| 2154 thisbox->items[z].height = (int)(((float)thisbox->items[z].origheight) * (((float)percent)/((float)100.0))); | |
| 2155 } | |
| 2156 } | |
| 2157 } | |
| 2158 | |
| 2159 _ResetWindow(WinQueryWindow(hwnd, QW_OWNER)); | |
| 2160 } | |
| 2161 } | |
| 2162 return MRFROMSHORT(FALSE); | |
| 2163 } | |
| 2164 return WinDefWindowProc(hwnd, msg, mp1, mp2); | |
| 2165 } | |
| 2166 | |
| 2167 /* Function: BubbleProc | |
| 2168 * Abstract: Subclass procedure for bubble help | |
| 2169 */ | |
| 2170 MRESULT EXPENTRY _BubbleProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 2171 { | |
| 2172 MRESULT res; | |
| 2173 PFNWP proc = (PFNWP)WinQueryWindowPtr(hwnd, QWL_USER); | |
| 2174 | |
| 2175 if(proc) | |
| 2176 res = proc(hwnd, msg, mp1, mp2); | |
| 2177 else | |
| 2178 res = WinDefWindowProc(hwnd, msg, mp1, mp2); | |
| 2179 | |
| 2180 if(msg == WM_PAINT) | |
| 2181 { | |
| 2182 POINTL ptl; | |
| 2183 HPS hpsTemp; | |
| 2184 RECTL rcl; | |
| 2185 int height, width; | |
| 2186 | |
| 2187 WinQueryWindowRect(hwnd, &rcl); | |
| 2188 height = rcl.yTop - rcl.yBottom - 1; | |
| 2189 width = rcl.xRight - rcl.xLeft - 1; | |
| 2190 | |
| 2191 /* Draw a border around the bubble help */ | |
| 2192 hpsTemp = WinGetPS(hwnd); | |
| 2193 GpiSetColor(hpsTemp, DW_CLR_BLACK); | |
| 2194 ptl.x = ptl.y = 0; | |
| 2195 GpiMove(hpsTemp, &ptl); | |
| 2196 ptl.x = 0; | |
| 2197 ptl.y = height; | |
| 2198 GpiLine(hpsTemp, &ptl); | |
| 2199 ptl.x = ptl.y = 0; | |
| 2200 GpiMove(hpsTemp, &ptl); | |
| 2201 ptl.y = 0; | |
| 2202 ptl.x = width; | |
| 2203 GpiLine(hpsTemp, &ptl); | |
| 2204 ptl.x = width; | |
| 2205 ptl.y = height; | |
| 2206 GpiMove(hpsTemp, &ptl); | |
| 2207 ptl.x = 0; | |
| 2208 ptl.y = height; | |
| 2209 GpiLine(hpsTemp, &ptl); | |
| 2210 ptl.x = width; | |
| 2211 ptl.y = height; | |
| 2212 GpiMove(hpsTemp, &ptl); | |
| 2213 ptl.y = 0; | |
| 2214 ptl.x = width; | |
| 2215 GpiLine(hpsTemp, &ptl); | |
| 2216 WinReleasePS(hpsTemp); | |
| 2217 } | |
| 2218 return res; | |
| 2219 } | |
| 2220 | |
| 2221 /* Function: BtProc | |
| 2222 * Abstract: Subclass procedure for buttons | |
| 2223 */ | |
| 2224 | |
| 2225 MRESULT EXPENTRY _BtProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 2226 { | |
| 2227 BubbleButton *bubble; | |
| 2228 | |
| 2229 bubble = (BubbleButton *)WinQueryWindowPtr(hwnd, QWL_USER); | |
| 2230 | |
| 2231 if(!bubble) | |
| 2232 return WinDefWindowProc(hwnd, msg, mp1, mp2); | |
| 2233 | |
| 2234 switch(msg) | |
| 2235 { | |
| 2236 #ifndef NO_SIGNALS | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2237 case WM_SETFOCUS: |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2238 if(mp2) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2239 _run_event(hwnd, msg, mp1, mp2); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2240 else |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2241 WinSendMsg(hwnd, BM_SETDEFAULT, 0, 0); |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2242 break; |
| 3 | 2243 case WM_BUTTON1UP: |
| 2244 { | |
| 2245 SignalHandler *tmp = Root; | |
| 2246 | |
| 2247 if(WinIsWindowEnabled(hwnd)) | |
| 2248 { | |
| 2249 /* Find any callbacks for this function */ | |
| 2250 while(tmp) | |
| 2251 { | |
| 2252 if(tmp->message == WM_COMMAND) | |
| 2253 { | |
| 2254 /* Make sure it's the right window, and the right ID */ | |
| 2255 if(tmp->window == hwnd) | |
| 2256 { | |
| 2257 /* Due to the fact that if we run the function | |
| 2258 * here, finishing actions on the button will occur | |
| 2259 * after we run the signal handler. So we post the | |
| 2260 * message so the button can finish what it needs to | |
| 2261 * do before we run our handler. | |
| 2262 */ | |
| 2263 WinPostMsg(hwnd, WM_USER, (MPARAM)tmp, 0); | |
| 2264 tmp = NULL; | |
| 2265 } | |
| 2266 } | |
| 2267 if(tmp) | |
| 2268 tmp= tmp->next; | |
| 2269 } | |
| 2270 } | |
| 2271 } | |
| 2272 break; | |
| 2273 case WM_USER: | |
| 2274 { | |
| 2275 SignalHandler *tmp = (SignalHandler *)mp1; | |
| 2276 int (*clickfunc)(HWND, void *) = NULL; | |
| 2277 | |
| 2278 if(tmp) | |
| 2279 { | |
| 2280 clickfunc = (int (*)(HWND, void *))tmp->signalfunction; | |
| 2281 | |
| 2282 clickfunc(tmp->window, tmp->data); | |
| 2283 } | |
| 2284 } | |
| 2285 break; | |
| 2286 #endif | |
| 2287 case WM_CHAR: | |
| 2288 { | |
| 2289 #ifndef NO_SIGNALS | |
| 2290 /* A button press should also occur for an ENTER or SPACE press | |
| 2291 * while the button has the active input focus. | |
| 2292 */ | |
| 2293 if(SHORT1FROMMP(mp2) == '\r' || SHORT1FROMMP(mp2) == ' ') | |
| 2294 { | |
| 2295 SignalHandler *tmp = Root; | |
| 2296 | |
| 2297 /* Find any callbacks for this function */ | |
| 2298 while(tmp) | |
| 2299 { | |
| 2300 if(tmp->message == WM_COMMAND) | |
| 2301 { | |
| 2302 /* Make sure it's the right window, and the right ID */ | |
| 2303 if(tmp->window == hwnd) | |
| 2304 { | |
| 2305 WinPostMsg(hwnd, WM_USER, (MPARAM)tmp, 0); | |
| 2306 tmp = NULL; | |
| 2307 } | |
| 2308 } | |
| 2309 if(tmp) | |
| 2310 tmp= tmp->next; | |
| 2311 } | |
| 2312 } | |
| 2313 #endif | |
| 2314 if(SHORT1FROMMP(mp2) == '\t') | |
| 2315 { | |
| 2316 _shift_focus(hwnd); | |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2317 WinSendMsg(hwnd, BM_SETDEFAULT, 0, 0); |
| 3 | 2318 return FALSE; |
| 2319 } | |
| 2320 } | |
| 2321 break; | |
| 2322 case 0x041f: | |
| 2323 if (hwndBubble) | |
| 2324 { | |
| 2325 WinDestroyWindow(hwndBubble); | |
| 2326 hwndBubble = 0; | |
| 2327 } | |
| 2328 break; | |
| 2329 | |
| 2330 case 0x041e: | |
| 2331 | |
| 2332 if(!*bubble->bubbletext) | |
| 2333 break; | |
| 2334 | |
| 2335 | |
| 2336 if(hwndBubble) | |
| 2337 { | |
| 2338 WinDestroyWindow(hwndBubble); | |
| 2339 hwndBubble = 0; | |
| 2340 } | |
| 2341 | |
| 2342 if(!hwndBubble) | |
| 2343 { | |
| 2344 HPS hpsTemp = 0; | |
| 2345 LONG lHight; | |
| 2346 LONG lWidth; | |
| 2347 POINTL txtPointl[TXTBOX_COUNT]; | |
| 2348 POINTL ptlWork = {0,0}; | |
| 2349 ULONG ulColor = DW_CLR_YELLOW; | |
| 2350 void *blah; | |
| 2351 | |
| 2352 hwndBubbleLast = hwnd; | |
| 2353 hwndBubble = WinCreateWindow(HWND_DESKTOP, | |
| 2354 WC_STATIC, | |
| 2355 "", | |
| 2356 SS_TEXT | | |
| 2357 DT_CENTER | | |
| 2358 DT_VCENTER, | |
| 2359 0,0,0,0, | |
| 2360 HWND_DESKTOP, | |
| 2361 HWND_TOP, | |
| 2362 0, | |
| 2363 NULL, | |
| 2364 NULL); | |
| 2365 | |
| 2366 WinSetPresParam(hwndBubble, | |
| 2367 PP_FONTNAMESIZE, | |
| 2368 sizeof(DefaultFont), | |
| 2369 DefaultFont); | |
| 2370 | |
| 2371 | |
| 2372 WinSetPresParam(hwndBubble, | |
| 2373 PP_BACKGROUNDCOLORINDEX, | |
| 2374 sizeof(ulColor), | |
| 2375 &ulColor); | |
| 2376 | |
| 2377 WinSetWindowText(hwndBubble, | |
| 2378 bubble->bubbletext); | |
| 2379 | |
| 2380 WinMapWindowPoints(hwnd, HWND_DESKTOP, &ptlWork, 1); | |
| 2381 | |
| 2382 hpsTemp = WinGetPS(hwndBubble); | |
| 2383 GpiQueryTextBox(hpsTemp, | |
| 2384 strlen(bubble->bubbletext), | |
| 2385 bubble->bubbletext, | |
| 2386 TXTBOX_COUNT, | |
| 2387 txtPointl); | |
| 2388 WinReleasePS(hpsTemp); | |
| 2389 | |
| 2390 lWidth = txtPointl[TXTBOX_TOPRIGHT].x - | |
| 2391 txtPointl[TXTBOX_TOPLEFT ].x + 8; | |
| 2392 | |
| 2393 lHight = txtPointl[TXTBOX_TOPLEFT].y - | |
| 2394 txtPointl[TXTBOX_BOTTOMLEFT].y + 8; | |
| 2395 | |
| 2396 ptlWork.y -= lHight; | |
| 2397 | |
| 2398 blah = (void *)WinSubclassWindow(hwndBubble, _BubbleProc); | |
| 2399 | |
| 2400 if(blah) | |
| 2401 WinSetWindowPtr(hwndBubble, QWP_USER, blah); | |
| 2402 | |
| 2403 WinSetWindowPos(hwndBubble, | |
| 2404 HWND_TOP, | |
| 2405 ptlWork.x, | |
| 2406 ptlWork.y, | |
| 2407 lWidth, | |
| 2408 lHight, | |
| 2409 SWP_SIZE | SWP_MOVE | SWP_SHOW); | |
| 2410 } | |
| 2411 break; | |
| 2412 } | |
| 2413 | |
| 2414 if(!bubble->pOldProc) | |
| 2415 return WinDefWindowProc(hwnd, msg, mp1, mp2); | |
| 2416 return bubble->pOldProc(hwnd, msg, mp1, mp2); | |
| 2417 } | |
| 2418 | |
| 2419 MRESULT EXPENTRY _RendProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 2420 { | |
| 2421 int res = 0; | |
| 2422 #ifndef NO_SIGNALS | |
| 2423 res = (int)_run_event(hwnd, msg, mp1, mp2); | |
| 2424 #endif | |
| 2425 switch(msg) | |
| 2426 { | |
| 2427 case WM_BUTTON1DOWN: | |
| 2428 case WM_BUTTON2DOWN: | |
| 2429 case WM_BUTTON3DOWN: | |
| 2430 if(!res) | |
| 2431 WinSetFocus(HWND_DESKTOP, hwnd); | |
| 2432 return (MPARAM)TRUE; | |
| 2433 } | |
| 2434 return WinDefWindowProc(hwnd, msg, mp1, mp2); | |
| 2435 } | |
| 2436 | |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2437 MRESULT EXPENTRY _TreeProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2438 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2439 Box *blah = WinQueryWindowPtr(hwnd, QWP_USER); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2440 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2441 #ifndef NO_SIGNALS |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2442 _run_event(hwnd, msg, mp1, mp2); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2443 #endif |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2444 if(blah && blah->oldproc) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2445 return blah->oldproc(hwnd, msg, mp1, mp2); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2446 return WinDefWindowProc(hwnd, msg, mp1, mp2); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2447 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
2448 |
| 3 | 2449 /* |
| 2450 * Initializes the Dynamic Windows engine. | |
| 2451 * Parameters: | |
| 2452 * newthread: True if this is the only thread. | |
| 2453 * False if there is already a message loop running. | |
| 2454 */ | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2455 int dw_init(int newthread, int argc, char *argv[]) |
| 3 | 2456 { |
| 2457 APIRET rc; | |
| 2458 | |
| 2459 if(newthread) | |
| 2460 { | |
| 2461 dwhab = WinInitialize(0); | |
| 2462 dwhmq = WinCreateMsgQueue(dwhab, 0); | |
| 2463 } | |
| 2464 | |
| 2465 rc = WinRegisterClass(dwhab, ClassName, _wndproc, CS_SIZEREDRAW | CS_CLIPCHILDREN, 32); | |
| 2466 rc = WinRegisterClass(dwhab, SplitbarClassName, _splitwndproc, 0L, 32); | |
| 2467 | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
2468 /* Get the OS/2 version. */ |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
2469 DosQuerySysInfo(QSV_VERSION_MAJOR, QSV_MS_COUNT,(void *)aulBuffer, 4*sizeof(ULONG)); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
2470 |
| 3 | 2471 #ifdef DWDEBUG |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2472 f = fopen("dw.log", "w"); |
| 3 | 2473 #endif |
| 2474 return rc; | |
| 2475 } | |
| 2476 | |
| 2477 /* | |
| 2478 * Runs a message loop for Dynamic Windows. | |
| 2479 * Parameters: | |
| 2480 * currenthab: The handle to the current anchor block | |
| 2481 * or NULL if this DW is handling the message loop. | |
| 2482 * func: Function pointer to the message filter function. | |
| 2483 */ | |
| 2484 void dw_main(HAB currenthab, void *func) | |
| 2485 { | |
| 2486 QMSG qmsg; | |
| 2487 HAB habtouse; | |
| 2488 | |
| 2489 if(!currenthab) | |
| 2490 habtouse = dwhab; | |
| 2491 else | |
| 2492 habtouse = currenthab; | |
| 2493 | |
| 2494 /* Setup the filter function */ | |
| 2495 filterfunc = (int (* EXPENTRY)(HWND, ULONG, MPARAM, MPARAM))func; | |
| 2496 | |
| 2497 _dwtid = dw_thread_id(); | |
| 2498 | |
| 2499 while (WinGetMsg(habtouse, &qmsg, 0, 0, 0)) | |
| 2500 WinDispatchMsg(habtouse, &qmsg); | |
| 2501 | |
| 2502 #ifdef DWDEBUG | |
| 2503 fclose(f); | |
| 2504 #endif | |
| 2505 | |
| 2506 if(!currenthab) | |
| 2507 { | |
| 2508 WinDestroyMsgQueue(dwhmq); | |
| 2509 WinTerminate(dwhab); | |
| 2510 } | |
| 2511 } | |
| 2512 | |
| 2513 /* | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2514 * Runs a message loop for Dynamic Windows, for a period of seconds. |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2515 * Parameters: |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2516 * seconds: Number of seconds to run the loop for. |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2517 */ |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2518 void dw_main_sleep(int seconds) |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2519 { |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2520 QMSG qmsg; |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2521 time_t start = time(NULL); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2522 |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2523 while(time(NULL) - start <= seconds) |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2524 { |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2525 if(WinPeekMsg(dwhab, &qmsg, 0, 0, 0, PM_NOREMOVE)) |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2526 { |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2527 WinGetMsg(dwhab, &qmsg, 0, 0, 0); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2528 WinDispatchMsg(dwhab, &qmsg); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2529 } |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2530 else |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2531 DosSleep(1); |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2532 } |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2533 } |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2534 |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
2535 /* |
| 3 | 2536 * Free's memory allocated by dynamic windows. |
| 2537 * Parameters: | |
| 2538 * ptr: Pointer to dynamic windows allocated | |
| 2539 * memory to be free()'d. | |
| 2540 */ | |
| 2541 void dw_free(void *ptr) | |
| 2542 { | |
| 2543 free(ptr); | |
| 2544 } | |
| 2545 | |
| 2546 /* | |
| 2547 * Allocates and initializes a dialog struct. | |
| 2548 * Parameters: | |
| 2549 * data: User defined data to be passed to functions. | |
| 2550 */ | |
| 2551 DWDialog *dw_dialog_new(void *data) | |
| 2552 { | |
| 2553 DWDialog *tmp = malloc(sizeof(DWDialog)); | |
| 2554 | |
| 2555 tmp->eve = dw_event_new(); | |
| 2556 dw_event_reset(tmp->eve); | |
| 2557 tmp->data = data; | |
| 2558 tmp->done = FALSE; | |
| 2559 tmp->result = NULL; | |
| 2560 | |
| 2561 return tmp; | |
| 2562 } | |
| 2563 | |
| 2564 /* | |
| 2565 * Accepts a dialog struct and returns the given data to the | |
| 2566 * initial called of dw_dialog_wait(). | |
| 2567 * Parameters: | |
| 2568 * dialog: Pointer to a dialog struct aquired by dw_dialog_new). | |
| 2569 * result: Data to be returned by dw_dialog_wait(). | |
| 2570 */ | |
| 2571 int dw_dialog_dismiss(DWDialog *dialog, void *result) | |
| 2572 { | |
| 2573 dialog->result = result; | |
| 2574 dw_event_post(dialog->eve); | |
| 2575 dialog->done = TRUE; | |
| 2576 return 0; | |
| 2577 } | |
| 2578 | |
| 2579 /* | |
| 2580 * Accepts a dialog struct waits for dw_dialog_dismiss() to be | |
| 2581 * called by a signal handler with the given dialog struct. | |
| 2582 * Parameters: | |
| 2583 * dialog: Pointer to a dialog struct aquired by dw_dialog_new). | |
| 2584 */ | |
| 2585 void *dw_dialog_wait(DWDialog *dialog) | |
| 2586 { | |
| 2587 QMSG qmsg; | |
| 2588 void *tmp; | |
| 2589 | |
| 2590 while (WinGetMsg(dwhab, &qmsg, 0, 0, 0)) | |
| 2591 { | |
| 2592 WinDispatchMsg(dwhab, &qmsg); | |
| 2593 if(dialog->done) | |
| 2594 break; | |
| 2595 } | |
| 2596 dw_event_close(&dialog->eve); | |
| 2597 tmp = dialog->result; | |
| 2598 free(dialog); | |
| 2599 return tmp; | |
| 2600 } | |
| 2601 | |
| 2602 | |
| 2603 /* | |
| 2604 * Displays a Message Box with given text and title.. | |
| 2605 * Parameters: | |
| 2606 * title: The title of the message box. | |
| 2607 * format: printf style format string. | |
| 2608 * ...: Additional variables for use in the format. | |
| 2609 */ | |
| 2610 int dw_messagebox(char *title, char *format, ...) | |
| 2611 { | |
| 2612 va_list args; | |
| 2613 char outbuf[1024]; | |
| 2614 | |
| 2615 va_start(args, format); | |
| 2616 vsprintf(outbuf, format, args); | |
| 2617 va_end(args); | |
| 2618 | |
| 2619 WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, outbuf, title, 0, MB_OK | MB_INFORMATION | MB_MOVEABLE); | |
| 2620 | |
| 2621 return strlen(outbuf); | |
| 2622 } | |
| 2623 | |
| 2624 /* | |
| 2625 * Displays a Message Box with given text and title.. | |
| 2626 * Parameters: | |
| 2627 * title: The title of the message box. | |
| 2628 * text: The text to display in the box. | |
| 2629 * Returns: | |
| 2630 * True if YES False of NO. | |
| 2631 */ | |
| 2632 int dw_yesno(char *title, char *text) | |
| 2633 { | |
| 2634 if(WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, text, title, 0, MB_YESNO | MB_INFORMATION | MB_MOVEABLE | MB_SYSTEMMODAL)==MBID_YES) | |
| 2635 return TRUE; | |
| 2636 return FALSE; | |
| 2637 } | |
| 2638 | |
| 2639 /* | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2640 * Makes the window topmost. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2641 * Parameters: |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2642 * handle: The window handle to make topmost. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2643 */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2644 int dw_window_raise(HWND handle) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2645 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2646 return WinSetWindowPos(handle, HWND_TOP, 0, 0, 0, 0, SWP_ZORDER); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2647 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2648 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2649 /* |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2650 * Makes the window bottommost. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2651 * Parameters: |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2652 * handle: The window handle to make bottommost. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2653 */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2654 int dw_window_lower(HWND handle) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2655 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2656 return WinSetWindowPos(handle, HWND_BOTTOM, 0, 0, 0, 0, SWP_ZORDER); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2657 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2658 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
2659 /* |
| 3 | 2660 * Makes the window visible. |
| 2661 * Parameters: | |
| 2662 * handle: The window handle to make visible. | |
| 2663 */ | |
| 2664 int dw_window_show(HWND handle) | |
| 2665 { | |
| 2666 int rc = WinSetWindowPos(handle, NULLHANDLE, 0, 0, 0, 0, SWP_SHOW); | |
| 2667 HSWITCH hswitch; | |
| 2668 SWCNTRL swcntrl; | |
| 2669 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
2670 _fix_button_owner(handle, 0); |
| 3 | 2671 WinSetFocus(HWND_DESKTOP, handle); |
| 2672 _initial_focus(handle); | |
| 2673 | |
| 2674 /* If this window has a switch list entry make sure it is visible */ | |
| 2675 hswitch = WinQuerySwitchHandle(handle, 0); | |
| 2676 if(hswitch) | |
| 2677 { | |
| 2678 WinQuerySwitchEntry(hswitch, &swcntrl); | |
| 2679 swcntrl.uchVisibility = SWL_VISIBLE; | |
| 2680 WinChangeSwitchEntry(hswitch, &swcntrl); | |
| 2681 } | |
| 2682 return rc; | |
| 2683 | |
| 2684 } | |
| 2685 | |
| 2686 /* | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2687 * Minimizes or Iconifies a top-level window. |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2688 * Parameters: |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2689 * handle: The window handle to minimize. |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2690 */ |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2691 int dw_window_minimize(HWND handle) |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2692 { |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2693 HWND hwndclient = WinWindowFromID(handle, FID_CLIENT); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2694 |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2695 if(hwndclient) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2696 { |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2697 Box *box = (Box *)WinQueryWindowPtr(hwndclient, QWP_USER); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2698 |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2699 if(box) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2700 { |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2701 if(!box->titlebar && box->hwndtitle) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2702 WinSetParent(box->hwndtitle, handle, FALSE); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2703 } |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2704 } |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2705 |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2706 return WinSetWindowPos(handle, NULLHANDLE, 0, 0, 0, 0, SWP_MINIMIZE); |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2707 } |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2708 |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2709 /* |
| 3 | 2710 * Makes the window invisible. |
| 2711 * Parameters: | |
| 2712 * handle: The window handle to make visible. | |
| 2713 */ | |
| 2714 int dw_window_hide(HWND handle) | |
| 2715 { | |
| 2716 HSWITCH hswitch; | |
| 2717 SWCNTRL swcntrl; | |
| 2718 | |
| 2719 /* If this window has a switch list entry make sure it is invisible */ | |
| 2720 hswitch = WinQuerySwitchHandle(handle, 0); | |
| 2721 if(hswitch) | |
| 2722 { | |
| 2723 WinQuerySwitchEntry(hswitch, &swcntrl); | |
| 2724 swcntrl.uchVisibility = SWL_INVISIBLE; | |
| 2725 WinChangeSwitchEntry(hswitch, &swcntrl); | |
| 2726 } | |
| 2727 return WinShowWindow(handle, FALSE); | |
| 2728 } | |
| 2729 | |
| 2730 /* | |
| 2731 * Destroys a window and all of it's children. | |
| 2732 * Parameters: | |
| 2733 * handle: The window handle to destroy. | |
| 2734 */ | |
| 2735 int dw_window_destroy(HWND handle) | |
| 2736 { | |
| 2737 return WinDestroyWindow(handle); | |
| 2738 } | |
| 2739 | |
| 2740 /* | |
| 2741 * Changes a window's parent to newparent. | |
| 2742 * Parameters: | |
| 2743 * handle: The window handle to destroy. | |
| 2744 * newparent: The window's new parent window. | |
| 2745 */ | |
| 2746 void dw_window_reparent(HWND handle, HWND newparent) | |
| 2747 { | |
| 2748 HWND blah = WinWindowFromID(newparent, FID_CLIENT); | |
| 2749 WinSetParent(handle, blah ? blah : newparent, TRUE); | |
| 2750 } | |
| 2751 | |
| 2752 /* | |
| 2753 * Sets the font used by a specified window (widget) handle. | |
| 2754 * Parameters: | |
| 2755 * handle: The window (widget) handle. | |
| 2756 * fontname: Name and size of the font in the form "size.fontname" | |
| 2757 */ | |
| 2758 int dw_window_set_font(HWND handle, char *fontname) | |
| 2759 { | |
| 2760 return WinSetPresParam(handle, PP_FONTNAMESIZE, strlen(fontname)+1, fontname); | |
| 2761 } | |
| 2762 | |
| 2763 /* | |
| 2764 * Sets the colors used by a specified window (widget) handle. | |
| 2765 * Parameters: | |
| 2766 * handle: The window (widget) handle. | |
| 2767 * fore: Foreground color in DW_RGB format or a default color index. | |
| 2768 * back: Background color in DW_RGB format or a default color index. | |
| 2769 */ | |
| 2770 int dw_window_set_color(HWND handle, ULONG fore, ULONG back) | |
| 2771 { | |
| 2772 if((fore & DW_RGB_COLOR) == DW_RGB_COLOR) | |
| 2773 { | |
| 2774 RGB2 rgb2; | |
| 2775 | |
| 2776 rgb2.bBlue = DW_BLUE_VALUE(fore); | |
| 2777 rgb2.bGreen = DW_GREEN_VALUE(fore); | |
| 2778 rgb2.bRed = DW_RED_VALUE(fore); | |
| 2779 rgb2.fcOptions = 0; | |
| 2780 | |
| 2781 WinSetPresParam(handle, PP_FOREGROUNDCOLOR, sizeof(RGB2), &rgb2); | |
| 2782 | |
| 2783 } | |
| 2784 if((back & DW_RGB_COLOR) == DW_RGB_COLOR) | |
| 2785 { | |
| 2786 RGB2 rgb2; | |
| 2787 | |
| 2788 rgb2.bBlue = DW_BLUE_VALUE(back); | |
| 2789 rgb2.bGreen = DW_GREEN_VALUE(back); | |
| 2790 rgb2.bRed = DW_RED_VALUE(back); | |
| 2791 rgb2.fcOptions = 0; | |
| 2792 | |
| 2793 WinSetPresParam(handle, PP_BACKGROUNDCOLOR, sizeof(RGB2), &rgb2); | |
| 2794 return 0; | |
| 2795 } | |
| 2796 if((fore & DW_RGB_COLOR) == DW_RGB_COLOR) | |
| 2797 return 0; | |
| 2798 | |
| 2799 /* Slight conversion */ | |
| 2800 if(fore == DW_CLR_BLACK) | |
| 2801 fore = CLR_BLACK; | |
| 2802 if(fore == DW_CLR_WHITE) | |
| 2803 fore = CLR_WHITE; | |
| 2804 | |
| 2805 if(back == DW_CLR_BLACK) | |
| 2806 back = CLR_BLACK; | |
| 2807 if(back == DW_CLR_WHITE) | |
| 2808 back = CLR_WHITE; | |
| 2809 | |
| 2810 return (WinSetPresParam(handle, PP_FOREGROUNDCOLORINDEX, sizeof(ULONG), &fore) | | |
| 2811 WinSetPresParam(handle, PP_BACKGROUNDCOLORINDEX, sizeof(ULONG), &back)); | |
| 2812 } | |
| 2813 | |
| 2814 /* | |
| 2815 * Sets the font used by a specified window (widget) handle. | |
| 2816 * Parameters: | |
| 2817 * handle: The window (widget) handle. | |
| 2818 * border: Size of the window border in pixels. | |
| 2819 */ | |
| 2820 int dw_window_set_border(HWND handle, int border) | |
| 2821 { | |
| 2822 WinSendMsg(handle, WM_SETBORDERSIZE, MPFROMSHORT(border), MPFROMSHORT(border)); | |
| 2823 return 0; | |
| 2824 } | |
| 2825 | |
| 2826 /* | |
| 2827 * Captures the mouse input to this window. | |
| 2828 * Parameters: | |
| 2829 * handle: Handle to receive mouse input. | |
| 2830 */ | |
| 2831 void dw_window_capture(HWND handle) | |
| 2832 { | |
| 2833 WinSetCapture(HWND_DESKTOP, handle); | |
| 2834 } | |
| 2835 | |
| 2836 /* | |
| 2837 * Releases previous mouse capture. | |
| 2838 */ | |
| 2839 void dw_window_release(void) | |
| 2840 { | |
| 2841 WinSetCapture(HWND_DESKTOP, NULLHANDLE); | |
| 2842 } | |
| 2843 | |
| 2844 /* | |
| 2845 * Tracks this window movement. | |
| 2846 * Parameters: | |
| 2847 * handle: Handle to frame to be tracked. | |
| 2848 */ | |
| 2849 void dw_window_track(HWND handle) | |
| 2850 { | |
| 2851 WinSendMsg(handle, WM_TRACKFRAME, MPFROMSHORT(TF_MOVE), 0); | |
| 2852 } | |
| 2853 | |
| 2854 /* | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2855 * Changes the appearance of the mouse pointer. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2856 * Parameters: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2857 * handle: Handle to widget for which to change. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2858 * cursortype: ID of the pointer you want. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2859 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2860 void dw_window_pointer(HWND handle, int pointertype) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2861 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2862 WinSetPointer(handle, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2863 WinQuerySysPointer(HWND_DESKTOP, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2864 pointertype, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2865 FALSE)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2866 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2867 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
2868 /* |
| 3 | 2869 * Create a new Window Frame. |
| 2870 * Parameters: | |
| 2871 * owner: The Owner's window handle or HWND_DESKTOP. | |
| 2872 * title: The Window title. | |
| 2873 * flStyle: Style flags, see the PM reference. | |
| 2874 */ | |
| 2875 HWND dw_window_new(HWND hwndOwner, char *title, ULONG flStyle) | |
| 2876 { | |
| 2877 HWND hwndclient = 0, hwndframe; | |
|
8
e22584460709
Switched allocating the box structs with calloc instead of malloc so
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
7
diff
changeset
|
2878 Box *newbox = calloc(1, sizeof(Box)); |
| 3 | 2879 PFNWP *blah = malloc(sizeof(PFNWP)); |
| 2880 | |
| 2881 newbox->pad = 0; | |
| 2882 newbox->type = BOXVERT; | |
| 2883 newbox->count = 0; | |
| 2884 | |
| 2885 flStyle |= FCF_NOBYTEALIGN; | |
| 2886 | |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2887 if(flStyle & DW_FCF_TITLEBAR) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2888 newbox->titlebar = 1; |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2889 else |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2890 flStyle |= FCF_TITLEBAR; |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2891 |
| 3 | 2892 hwndframe = WinCreateStdWindow(hwndOwner, 0L, &flStyle, ClassName, title, 0L, NULLHANDLE, 0L, &hwndclient); |
|
39
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2893 newbox->hwndtitle = WinWindowFromID(hwndframe, FID_TITLEBAR); |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2894 if(!newbox->titlebar && newbox->hwndtitle) |
|
3aa9ef0b3996
Added focus fixes and set-focus fixes on all three platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
38
diff
changeset
|
2895 WinSetParent(newbox->hwndtitle, HWND_OBJECT, FALSE); |
| 3 | 2896 *blah = WinSubclassWindow(hwndframe, _sizeproc); |
| 2897 WinSetWindowPtr(hwndframe, QWP_USER, blah); | |
| 2898 WinSetWindowPtr(hwndclient, QWP_USER, newbox); | |
| 2899 | |
| 2900 return hwndframe; | |
| 2901 } | |
| 2902 | |
| 2903 /* | |
| 2904 * Create a new Box to be packed. | |
| 2905 * Parameters: | |
| 2906 * type: Either BOXVERT (vertical) or BOXHORZ (horizontal). | |
| 2907 * pad: Number of pixels to pad around the box. | |
| 2908 */ | |
| 2909 HWND dw_box_new(int type, int pad) | |
| 2910 { | |
|
8
e22584460709
Switched allocating the box structs with calloc instead of malloc so
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
7
diff
changeset
|
2911 Box *newbox = calloc(1, sizeof(Box)); |
| 3 | 2912 HWND hwndframe; |
| 2913 | |
| 2914 newbox->pad = pad; | |
| 2915 newbox->type = type; | |
| 2916 newbox->count = 0; | |
| 2917 newbox->grouphwnd = NULLHANDLE; | |
| 2918 | |
| 2919 hwndframe = WinCreateWindow(HWND_OBJECT, | |
| 2920 WC_FRAME, | |
| 2921 NULL, | |
| 2922 WS_VISIBLE | WS_CLIPCHILDREN, | |
| 2923 0,0,2000,1000, | |
| 2924 NULLHANDLE, | |
| 2925 HWND_TOP, | |
| 2926 0L, | |
| 2927 NULL, | |
| 2928 NULL); | |
| 2929 | |
| 2930 newbox->oldproc = WinSubclassWindow(hwndframe, _controlproc); | |
| 2931 WinSetWindowPtr(hwndframe, QWP_USER, newbox); | |
| 2932 dw_window_set_color(hwndframe, DW_CLR_PALEGRAY, DW_CLR_PALEGRAY); | |
| 2933 return hwndframe; | |
| 2934 } | |
| 2935 | |
| 2936 /* | |
| 2937 * Create a new Group Box to be packed. | |
| 2938 * Parameters: | |
| 2939 * type: Either BOXVERT (vertical) or BOXHORZ (horizontal). | |
| 2940 * pad: Number of pixels to pad around the box. | |
| 2941 * title: Text to be displayined in the group outline. | |
| 2942 */ | |
| 2943 HWND dw_groupbox_new(int type, int pad, char *title) | |
| 2944 { | |
|
8
e22584460709
Switched allocating the box structs with calloc instead of malloc so
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
7
diff
changeset
|
2945 Box *newbox = calloc(1, sizeof(Box)); |
| 3 | 2946 HWND hwndframe; |
| 2947 | |
| 2948 newbox->pad = pad; | |
| 2949 newbox->type = type; | |
| 2950 newbox->count = 0; | |
| 2951 | |
| 2952 hwndframe = WinCreateWindow(HWND_OBJECT, | |
| 2953 WC_FRAME, | |
| 2954 NULL, | |
| 2955 WS_VISIBLE, | |
| 2956 0,0,2000,1000, | |
| 2957 NULLHANDLE, | |
| 2958 HWND_TOP, | |
| 2959 0L, | |
| 2960 NULL, | |
| 2961 NULL); | |
| 2962 | |
| 2963 newbox->grouphwnd = WinCreateWindow(hwndframe, | |
| 2964 WC_STATIC, | |
| 2965 title, | |
| 2966 WS_VISIBLE | SS_GROUPBOX | | |
| 2967 WS_GROUP, | |
| 2968 0,0,2000,1000, | |
| 2969 NULLHANDLE, | |
| 2970 HWND_TOP, | |
| 2971 0L, | |
| 2972 NULL, | |
| 2973 NULL); | |
| 2974 | |
| 2975 WinSetWindowPtr(hwndframe, QWP_USER, newbox); | |
| 2976 dw_window_set_color(hwndframe, DW_CLR_PALEGRAY, DW_CLR_PALEGRAY); | |
| 2977 dw_window_set_color(newbox->grouphwnd, DW_CLR_BLACK, DW_CLR_PALEGRAY); | |
| 2978 dw_window_set_font(newbox->grouphwnd, DefaultFont); | |
| 2979 return hwndframe; | |
| 2980 } | |
| 2981 | |
| 2982 /* | |
|
14
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2983 * Create a new MDI Frame to be packed. |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2984 * Parameters: |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2985 * id: An ID to be used with dw_window_from_id or 0L. |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2986 */ |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2987 HWND dw_mdi_new(unsigned long id) |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2988 { |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2989 HWND hwndframe; |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2990 |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2991 hwndframe = WinCreateWindow(HWND_OBJECT, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2992 WC_FRAME, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2993 NULL, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2994 WS_VISIBLE | WS_CLIPCHILDREN, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2995 0,0,2000,1000, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2996 NULLHANDLE, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2997 HWND_TOP, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2998 0L, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
2999 NULL, |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
3000 NULL); |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
3001 return hwndframe; |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
3002 } |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
3003 |
|
176cee043f1b
Lots of Windows and Unix bug fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
12
diff
changeset
|
3004 /* |
| 3 | 3005 * Create a bitmap object to be packed. |
| 3006 * Parameters: | |
| 3007 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3008 */ | |
| 3009 HWND dw_bitmap_new(ULONG id) | |
| 3010 { | |
| 3011 return WinCreateWindow(HWND_OBJECT, | |
| 3012 WC_STATIC, | |
| 3013 NULL, | |
| 3014 WS_VISIBLE | SS_TEXT, | |
| 3015 0,0,2000,1000, | |
| 3016 NULLHANDLE, | |
| 3017 HWND_TOP, | |
| 3018 id, | |
| 3019 NULL, | |
| 3020 NULL); | |
| 3021 } | |
| 3022 | |
| 3023 /* | |
| 3024 * Create a notebook object to be packed. | |
| 3025 * Parameters: | |
| 3026 * id: An ID to be used for getting the resource from the | |
| 3027 * resource file. | |
| 3028 */ | |
| 3029 HWND dw_notebook_new(ULONG id, int top) | |
| 3030 { | |
| 3031 ULONG flags; | |
| 3032 HWND tmp; | |
| 3033 | |
| 3034 if(top) | |
| 3035 flags = BKS_MAJORTABTOP; | |
| 3036 else | |
| 3037 flags = BKS_MAJORTABBOTTOM; | |
| 3038 | |
| 3039 tmp = WinCreateWindow(HWND_OBJECT, | |
| 3040 WC_NOTEBOOK, | |
| 3041 NULL, | |
| 3042 WS_VISIBLE | | |
| 3043 BKS_TABBEDDIALOG | | |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3044 flags, |
| 3 | 3045 0,0,2000,1000, |
| 3046 NULLHANDLE, | |
| 3047 HWND_TOP, | |
| 3048 id, | |
| 3049 NULL, | |
| 3050 NULL); | |
| 3051 | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3052 /* Fix tab sizes on Warp 3 */ |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3053 if(!IS_WARP4()) |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3054 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3055 /* best sizes to be determined by trial and error */ |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3056 WinSendMsg(tmp, BKM_SETDIMENSIONS,MPFROM2SHORT(102, 28), MPFROMSHORT( BKA_MAJORTAB)); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3057 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
3058 |
| 3 | 3059 dw_window_set_font(tmp, DefaultFont); |
| 3060 return tmp; | |
| 3061 } | |
| 3062 | |
| 3063 /* | |
| 3064 * Create a menu object to be popped up. | |
| 3065 * Parameters: | |
| 3066 * id: An ID to be used for getting the resource from the | |
| 3067 * resource file. | |
| 3068 */ | |
| 3069 HMENUI dw_menu_new(ULONG id) | |
| 3070 { | |
| 3071 HMENUI tmp = malloc(sizeof(struct _hmenui)); | |
| 3072 | |
| 3073 if(!tmp) | |
| 3074 return NULL; | |
| 3075 | |
| 3076 tmp->menu = WinCreateWindow(HWND_OBJECT, | |
| 3077 WC_MENU, | |
| 3078 NULL, | |
| 3079 WS_VISIBLE, | |
| 3080 0,0,2000,1000, | |
| 3081 NULLHANDLE, | |
| 3082 HWND_TOP, | |
| 3083 id, | |
| 3084 NULL, | |
| 3085 NULL); | |
| 3086 return tmp; | |
| 3087 } | |
| 3088 | |
| 3089 /* | |
| 3090 * Create a menubar on a window. | |
| 3091 * Parameters: | |
| 3092 * location: Handle of a window frame to be attached to. | |
| 3093 */ | |
| 3094 HMENUI dw_menubar_new(HWND location) | |
| 3095 { | |
| 3096 HMENUI tmp = malloc(sizeof(struct _hmenui)); | |
| 3097 | |
| 3098 if(!tmp) | |
| 3099 return NULL; | |
| 3100 | |
| 3101 tmp->menu = WinCreateWindow(location, | |
| 3102 WC_MENU, | |
| 3103 NULL, | |
| 3104 WS_VISIBLE | MS_ACTIONBAR, | |
| 3105 0,0,2000,1000, | |
| 3106 location, | |
| 3107 HWND_TOP, | |
| 3108 FID_MENU, | |
| 3109 NULL, | |
| 3110 NULL); | |
| 3111 return tmp; | |
| 3112 } | |
| 3113 | |
| 3114 /* | |
| 3115 * Destroys a menu created with dw_menubar_new or dw_menu_new. | |
| 3116 * Parameters: | |
| 3117 * menu: Handle of a menu. | |
| 3118 */ | |
| 3119 void dw_menu_destroy(HMENUI *menu) | |
| 3120 { | |
| 3121 if(menu && *menu) | |
| 3122 { | |
| 3123 WinDestroyWindow((*menu)->menu); | |
| 3124 free(*menu); | |
| 3125 *menu = NULL; | |
| 3126 } | |
| 3127 } | |
| 3128 | |
| 3129 /* | |
| 3130 * Adds a menuitem or submenu to an existing menu. | |
| 3131 * Parameters: | |
| 3132 * menu: The handle the the existing menu. | |
| 3133 * title: The title text on the menu item to be added. | |
| 3134 * id: An ID to be used for message passing. | |
| 3135 * flags: Extended attributes to set on the menu. | |
| 3136 * end: If TRUE memu is positioned at the end of the menu. | |
| 3137 * check: If TRUE menu is "check"able. | |
| 3138 * submenu: Handle to an existing menu to be a submenu or NULL. | |
| 3139 */ | |
| 3140 HWND dw_menu_append_item(HMENUI menux, char *title, ULONG id, ULONG flags, int end, int check, HMENUI submenu) | |
| 3141 { | |
| 3142 MENUITEM miSubMenu; | |
| 3143 HWND menu; | |
| 3144 | |
| 3145 if(!menux) | |
| 3146 return NULLHANDLE; | |
| 3147 | |
| 3148 menu = menux->menu; | |
| 3149 | |
| 3150 if(end) | |
| 3151 miSubMenu.iPosition=MIT_END; | |
| 3152 else | |
| 3153 miSubMenu.iPosition=0; | |
| 3154 | |
| 3155 if(strlen(title) == 0) | |
| 3156 miSubMenu.afStyle=MIS_SEPARATOR | flags; | |
| 3157 else | |
| 3158 miSubMenu.afStyle=MIS_TEXT | flags; | |
| 3159 miSubMenu.afAttribute=0; | |
| 3160 miSubMenu.id=id; | |
| 3161 miSubMenu.hwndSubMenu = submenu ? submenu->menu : 0; | |
| 3162 miSubMenu.hItem=NULLHANDLE; | |
| 3163 | |
| 3164 WinSendMsg(menu, | |
| 3165 MM_INSERTITEM, | |
| 3166 MPFROMP(&miSubMenu), | |
| 3167 MPFROMP(title)); | |
| 3168 return (HWND)id; | |
| 3169 } | |
| 3170 | |
| 3171 /* | |
| 3172 * Sets the state of a menu item check. | |
| 3173 * Parameters: | |
| 3174 * menu: The handle the the existing menu. | |
| 3175 * id: Menuitem id. | |
| 3176 * check: TRUE for checked FALSE for not checked. | |
| 3177 */ | |
|
12
26e2130135b9
Many Win32 and GTK fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
9
diff
changeset
|
3178 void dw_menu_item_set_check(HMENUI menux, unsigned long id, int check) |
| 3 | 3179 { |
| 3180 HWND menu; | |
| 3181 | |
| 3182 if(!menux) | |
| 3183 return; | |
| 3184 | |
| 3185 menu = menux->menu; | |
| 3186 | |
| 3187 if(check) | |
| 3188 WinSendMsg(menu, MM_SETITEMATTR, MPFROM2SHORT(id, TRUE), | |
| 3189 MPFROM2SHORT(MIA_CHECKED, MIA_CHECKED)); | |
| 3190 else | |
| 3191 WinSendMsg(menu, MM_SETITEMATTR, MPFROM2SHORT(id, TRUE), | |
| 3192 MPFROM2SHORT(MIA_CHECKED, 0)); | |
| 3193 } | |
| 3194 | |
| 3195 /* | |
| 3196 * Pops up a context menu at given x and y coordinates. | |
| 3197 * Parameters: | |
| 3198 * menu: The handle the the existing menu. | |
| 3199 * parent: Handle to the window initiating the popup. | |
| 3200 * x: X coordinate. | |
| 3201 * y: Y coordinate. | |
| 3202 */ | |
| 3203 void dw_menu_popup(HMENUI *menu, HWND parent, int x, int y) | |
| 3204 { | |
| 3205 if(menu && *menu) | |
| 3206 { | |
| 3207 WinPopupMenu(HWND_DESKTOP, parent, (*menu)->menu, x, dw_screen_height() - y, 0, PU_KEYBOARD | PU_MOUSEBUTTON1 | PU_VCONSTRAIN | PU_HCONSTRAIN); | |
| 3208 free(*menu); | |
| 3209 *menu = NULL; | |
| 3210 } | |
| 3211 } | |
| 3212 | |
| 3213 /* | |
| 3214 * Returns the current X and Y coordinates of the mouse pointer. | |
| 3215 * Parameters: | |
| 3216 * x: Pointer to variable to store X coordinate. | |
| 3217 * y: Pointer to variable to store Y coordinate. | |
| 3218 */ | |
| 3219 void dw_pointer_query_pos(long *x, long *y) | |
| 3220 { | |
| 3221 POINTL ptl; | |
| 3222 | |
| 3223 WinQueryPointerPos(HWND_DESKTOP, &ptl); | |
| 3224 if(x && y) | |
| 3225 { | |
| 3226 *x = ptl.x; | |
| 3227 *y = dw_screen_height() - ptl.y; | |
| 3228 } | |
| 3229 } | |
| 3230 | |
| 3231 /* | |
| 3232 * Sets the X and Y coordinates of the mouse pointer. | |
| 3233 * Parameters: | |
| 3234 * x: X coordinate. | |
| 3235 * y: Y coordinate. | |
| 3236 */ | |
| 3237 void dw_pointer_set_pos(long x, long y) | |
| 3238 { | |
| 3239 WinSetPointerPos(HWND_DESKTOP, x, dw_screen_height() - y); | |
| 3240 } | |
| 3241 | |
| 3242 /* | |
| 3243 * Create a container object to be packed. | |
| 3244 * Parameters: | |
| 3245 * id: An ID to be used for getting the resource from the | |
| 3246 * resource file. | |
| 3247 */ | |
| 3248 HWND dw_container_new(ULONG id) | |
| 3249 { | |
| 3250 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3251 WC_CONTAINER, | |
| 3252 NULL, | |
| 3253 WS_VISIBLE | CCS_READONLY | | |
| 3254 CCS_SINGLESEL | CCS_AUTOPOSITION, | |
| 3255 0,0,2000,1000, | |
| 3256 NULLHANDLE, | |
| 3257 HWND_TOP, | |
| 3258 id, | |
| 3259 NULL, | |
| 3260 NULL); | |
| 3261 dw_window_set_font(tmp, DefaultFont); | |
| 3262 return tmp; | |
| 3263 } | |
| 3264 | |
| 3265 /* | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3266 * Create a tree object to be packed. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3267 * Parameters: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3268 * id: An ID to be used for getting the resource from the |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3269 * resource file. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3270 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3271 HWND dw_tree_new(ULONG id) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3272 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3273 CNRINFO cnrinfo; |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
3274 Box *newbox = calloc(1, sizeof(Box)); |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3275 HWND tmp = WinCreateWindow(HWND_OBJECT, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3276 WC_CONTAINER, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3277 NULL, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3278 WS_VISIBLE | CCS_READONLY | |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3279 CCS_SINGLESEL | CCS_AUTOPOSITION, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3280 0,0,2000,1000, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3281 NULLHANDLE, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3282 HWND_TOP, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3283 id, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3284 NULL, |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3285 NULL); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3286 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3287 cnrinfo.flWindowAttr = CV_TREE | CA_TREELINE; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3288 cnrinfo.slBitmapOrIcon.cx = 16; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3289 cnrinfo.slBitmapOrIcon.cy = 16; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3290 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3291 WinSendMsg(tmp, CM_SETCNRINFO, &cnrinfo, MPFROMLONG(CMA_FLWINDOWATTR | CMA_SLBITMAPORICON)); |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
3292 newbox->oldproc = WinSubclassWindow(tmp, _TreeProc); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
3293 WinSetWindowPtr(tmp, QWP_USER, newbox); |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3294 dw_window_set_font(tmp, DefaultFont); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3295 return tmp; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3296 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3297 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
3298 /* |
| 3 | 3299 * Create a new static text window (widget) to be packed. |
| 3300 * Parameters: | |
| 3301 * text: The text to be display by the static text widget. | |
| 3302 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3303 */ | |
| 3304 HWND dw_text_new(char *text, ULONG id) | |
| 3305 { | |
| 3306 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3307 WC_STATIC, | |
| 3308 text, | |
| 3309 WS_VISIBLE | SS_TEXT, | |
| 3310 0,0,2000,1000, | |
| 3311 NULLHANDLE, | |
| 3312 HWND_TOP, | |
| 3313 id, | |
| 3314 NULL, | |
| 3315 NULL); | |
| 3316 dw_window_set_font(tmp, DefaultFont); | |
| 3317 dw_window_set_color(tmp, DW_CLR_BLACK, DW_CLR_PALEGRAY); | |
| 3318 return tmp; | |
| 3319 } | |
| 3320 | |
| 3321 /* | |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3322 * Create a new status text window (widget) to be packed. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3323 * Parameters: |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3324 * text: The text to be display by the static text widget. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3325 * id: An ID to be used with WinWindowFromID() or 0L. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3326 */ |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3327 HWND dw_status_text_new(char *text, ULONG id) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3328 { |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3329 PFNWP *blah = malloc(sizeof(PFNWP)); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3330 HWND tmp = WinCreateWindow(HWND_OBJECT, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3331 WC_STATIC, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3332 text, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3333 WS_VISIBLE | SS_TEXT, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3334 0,0,2000,1000, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3335 NULLHANDLE, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3336 HWND_TOP, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3337 id, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3338 NULL, |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3339 NULL); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3340 dw_window_set_font(tmp, DefaultFont); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3341 dw_window_set_color(tmp, DW_CLR_BLACK, DW_CLR_PALEGRAY); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3342 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3343 *blah = WinSubclassWindow(tmp, _statusproc); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3344 WinSetWindowPtr(tmp, QWP_USER, blah); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3345 return tmp; |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3346 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3347 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3348 /* |
| 3 | 3349 * Create a new Multiline Editbox window (widget) to be packed. |
| 3350 * Parameters: | |
| 3351 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3352 */ | |
| 3353 HWND dw_mle_new(ULONG id) | |
| 3354 { | |
| 3355 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3356 WC_MLE, | |
| 3357 "", | |
| 3358 WS_VISIBLE | | |
| 3359 MLS_BORDER | MLS_IGNORETAB | | |
| 3360 MLS_READONLY | MLS_VSCROLL, | |
| 3361 0,0,2000,1000, | |
| 3362 NULLHANDLE, | |
| 3363 HWND_TOP, | |
| 3364 id, | |
| 3365 NULL, | |
| 3366 NULL); | |
| 3367 dw_window_set_font(tmp, DefaultFont); | |
| 3368 dw_window_set_font(tmp, DefaultFont); | |
| 3369 return tmp; | |
| 3370 } | |
| 3371 | |
| 3372 /* | |
| 3373 * Create a new Entryfield window (widget) to be packed. | |
| 3374 * Parameters: | |
| 3375 * text: The default text to be in the entryfield widget. | |
| 3376 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3377 */ | |
| 3378 HWND dw_entryfield_new(char *text, ULONG id) | |
| 3379 { | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3380 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3381 WindowData *blah = calloc(1, sizeof(WindowData)); |
| 3 | 3382 HWND tmp = WinCreateWindow(HWND_OBJECT, |
| 3383 WC_ENTRYFIELD, | |
| 3384 text, | |
| 3385 WS_VISIBLE | ES_MARGIN | | |
| 3386 ES_AUTOSCROLL | WS_TABSTOP, | |
| 3387 0,0,2000,1000, | |
| 3388 NULLHANDLE, | |
| 3389 HWND_TOP, | |
| 3390 id, | |
| 3391 NULL, | |
| 3392 NULL); | |
| 3393 dw_window_set_font(tmp, DefaultFont); | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3394 blah->oldproc = WinSubclassWindow(tmp, _entryproc); |
| 3 | 3395 WinSetWindowPtr(tmp, QWP_USER, blah); |
| 3396 return tmp; | |
| 3397 } | |
| 3398 | |
| 3399 /* | |
| 3400 * Create a new Entryfield (password) window (widget) to be packed. | |
| 3401 * Parameters: | |
| 3402 * text: The default text to be in the entryfield widget. | |
| 3403 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3404 */ | |
| 3405 HWND dw_entryfield_password_new(char *text, ULONG id) | |
| 3406 { | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3407 WindowData *blah = calloc(1, sizeof(WindowData)); |
| 3 | 3408 HWND tmp = WinCreateWindow(HWND_OBJECT, |
| 3409 WC_ENTRYFIELD, | |
| 3410 text, | |
| 3411 WS_VISIBLE | ES_MARGIN | ES_UNREADABLE | | |
| 3412 ES_AUTOSCROLL | WS_TABSTOP, | |
| 3413 0,0,2000,1000, | |
| 3414 NULLHANDLE, | |
| 3415 HWND_TOP, | |
| 3416 id, | |
| 3417 NULL, | |
| 3418 NULL); | |
| 3419 dw_window_set_font(tmp, DefaultFont); | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3420 blah->oldproc = WinSubclassWindow(tmp, _entryproc); |
| 3 | 3421 WinSetWindowPtr(tmp, QWP_USER, blah); |
| 3422 return tmp; | |
| 3423 } | |
| 3424 | |
| 3425 /* | |
| 3426 * Create a new Combobox window (widget) to be packed. | |
| 3427 * Parameters: | |
| 3428 * text: The default text to be in the combpbox widget. | |
| 3429 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3430 */ | |
| 3431 HWND dw_combobox_new(char *text, ULONG id) | |
| 3432 { | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3433 WindowData *blah = calloc(1, sizeof(WindowData)); |
| 3 | 3434 HWND tmp = WinCreateWindow(HWND_OBJECT, |
| 3435 WC_COMBOBOX, | |
| 3436 text, | |
| 3437 WS_VISIBLE | CBS_DROPDOWN | WS_GROUP, | |
| 3438 0,0,2000,1000, | |
| 3439 NULLHANDLE, | |
| 3440 HWND_TOP, | |
| 3441 id, | |
| 3442 NULL, | |
| 3443 NULL); | |
| 3444 dw_window_set_font(tmp, DefaultFont); | |
| 3445 dw_window_set_color(tmp, DW_CLR_BLACK, DW_CLR_WHITE); | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
3446 blah->oldproc = WinSubclassWindow(tmp, _comboproc); |
| 3 | 3447 WinSetWindowPtr(tmp, QWP_USER, blah); |
| 3448 return tmp; | |
| 3449 } | |
| 3450 | |
| 3451 /* | |
| 3452 * Create a new button window (widget) to be packed. | |
| 3453 * Parameters: | |
| 3454 * text: The text to be display by the static text widget. | |
| 3455 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3456 */ | |
| 3457 HWND dw_button_new(char *text, ULONG id) | |
| 3458 { | |
| 3459 BubbleButton *bubble = malloc(sizeof(BubbleButton)); | |
| 3460 | |
| 3461 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3462 WC_BUTTON, | |
| 3463 text, | |
| 3464 WS_VISIBLE, | |
| 3465 0,0,2000,1000, | |
| 3466 NULLHANDLE, | |
| 3467 HWND_TOP, | |
| 3468 id, | |
| 3469 NULL, | |
| 3470 NULL); | |
| 3471 | |
| 3472 bubble->id = id; | |
| 3473 bubble->bubbletext[0] = '\0'; | |
| 3474 bubble->pOldProc = WinSubclassWindow(tmp, _BtProc); | |
| 3475 | |
| 3476 WinSetWindowPtr(tmp, QWP_USER, bubble); | |
| 3477 dw_window_set_font(tmp, DefaultFont); | |
| 3478 return tmp; | |
| 3479 } | |
| 3480 | |
| 3481 /* Function: GenResIDStr | |
| 3482 ** Abstract: Generate string '#nnnn' for a given ID for using with Button | |
| 3483 ** controls | |
| 3484 */ | |
| 3485 | |
| 3486 void _GenResIDStr(CHAR *buff, ULONG ulID) | |
| 3487 { | |
| 3488 char *str; | |
| 3489 int slen = 0; | |
| 3490 | |
| 3491 *buff++ = '#'; | |
| 3492 | |
| 3493 str = buff; | |
| 3494 | |
| 3495 do | |
| 3496 { | |
| 3497 *str++ = (ulID % 10) + '0'; | |
| 3498 ulID /= 10; | |
| 3499 slen++; | |
| 3500 } | |
| 3501 while(ulID); | |
| 3502 | |
| 3503 *str-- = 0; | |
| 3504 | |
| 3505 for(; str > buff; str--, buff++) | |
| 3506 { | |
| 3507 *buff ^= *str; | |
| 3508 *str ^= *buff; | |
| 3509 *buff ^= *str; | |
| 3510 } | |
| 3511 } | |
| 3512 | |
| 3513 | |
| 3514 /* | |
| 3515 * Create a new bitmap button window (widget) to be packed. | |
| 3516 * Parameters: | |
| 3517 * text: Bubble help text to be displayed. | |
| 3518 * id: An ID of a bitmap in the resource file. | |
| 3519 */ | |
| 3520 HWND dw_bitmapbutton_new(char *text, ULONG id) | |
| 3521 { | |
| 3522 char idbuf[256]; | |
| 3523 HWND tmp; | |
| 3524 BubbleButton *bubble = malloc(sizeof(BubbleButton)); | |
| 3525 | |
| 3526 _GenResIDStr(idbuf, id); | |
| 3527 | |
| 3528 tmp = WinCreateWindow(HWND_OBJECT, | |
| 3529 WC_BUTTON, | |
| 3530 idbuf, | |
| 3531 WS_VISIBLE | BS_PUSHBUTTON | | |
| 3532 BS_BITMAP | BS_AUTOSIZE | | |
| 3533 BS_NOPOINTERFOCUS, | |
| 3534 0,0,2000,1000, | |
| 3535 NULLHANDLE, | |
| 3536 HWND_TOP, | |
| 3537 id, | |
| 3538 NULL, | |
| 3539 NULL); | |
| 3540 | |
| 3541 bubble->id = id; | |
| 3542 strncpy(bubble->bubbletext, text, BUBBLE_HELP_MAX - 1); | |
| 3543 bubble->bubbletext[BUBBLE_HELP_MAX - 1] = '\0'; | |
| 3544 bubble->pOldProc = WinSubclassWindow(tmp, _BtProc); | |
| 3545 | |
| 3546 WinSetWindowPtr(tmp, QWP_USER, bubble); | |
| 3547 return tmp; | |
| 3548 } | |
| 3549 | |
| 3550 /* | |
| 3551 * Create a new spinbutton window (widget) to be packed. | |
| 3552 * Parameters: | |
| 3553 * text: The text to be display by the static text widget. | |
| 3554 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3555 */ | |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
3556 HWND dw_spinbutton_new(char *text, ULONG id) |
| 3 | 3557 { |
| 3558 PFNWP *blah = malloc(sizeof(PFNWP)); | |
| 3559 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3560 WC_SPINBUTTON, | |
| 3561 text, | |
| 3562 WS_VISIBLE | SPBS_MASTER, | |
| 3563 0,0,2000,1000, | |
| 3564 NULLHANDLE, | |
| 3565 HWND_TOP, | |
| 3566 id, | |
| 3567 NULL, | |
| 3568 NULL); | |
| 3569 dw_window_set_font(tmp, DefaultFont); | |
| 3570 *blah = WinSubclassWindow(tmp, _entryproc); | |
| 3571 WinSetWindowPtr(tmp, QWP_USER, blah); | |
| 3572 return tmp; | |
| 3573 } | |
| 3574 | |
| 3575 /* | |
| 3576 * Create a new radiobutton window (widget) to be packed. | |
| 3577 * Parameters: | |
| 3578 * text: The text to be display by the static text widget. | |
| 3579 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3580 */ | |
| 3581 HWND dw_radiobutton_new(char *text, ULONG id) | |
| 3582 { | |
| 3583 PFNWP *blah = malloc(sizeof(PFNWP)); | |
| 3584 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3585 WC_BUTTON, | |
| 3586 text, | |
| 3587 WS_VISIBLE | | |
| 3588 BS_AUTORADIOBUTTON, | |
| 3589 0,0,2000,1000, | |
| 3590 NULLHANDLE, | |
| 3591 HWND_TOP, | |
| 3592 id, | |
| 3593 NULL, | |
| 3594 NULL); | |
| 3595 dw_window_set_font(tmp, DefaultFont); | |
| 3596 dw_window_set_color(tmp, DW_CLR_BLACK, DW_CLR_PALEGRAY); | |
| 3597 *blah = WinSubclassWindow(tmp, _entryproc); | |
| 3598 WinSetWindowPtr(tmp, QWP_USER, blah); | |
| 3599 return tmp; | |
| 3600 } | |
| 3601 | |
| 3602 /* | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3603 * Create a new percent bar window (widget) to be packed. |
| 3 | 3604 * Parameters: |
| 3605 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3606 */ | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3607 HWND dw_percent_new(ULONG id) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3608 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3609 PercentBar *blah = malloc(sizeof(PercentBar)); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3610 HWND tmp = WinCreateWindow(HWND_OBJECT, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3611 WC_STATIC, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3612 "", |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3613 WS_VISIBLE | SS_TEXT, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3614 0,0,2000,1000, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3615 NULLHANDLE, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3616 HWND_TOP, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3617 id, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3618 NULL, |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3619 NULL); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3620 dw_window_set_font(tmp, DefaultFont); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3621 dw_window_set_color(tmp, DW_CLR_BLUE, DW_CLR_PALEGRAY); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3622 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3623 blah->oldproc = WinSubclassWindow(tmp, _percentproc); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3624 blah->pos = 0; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3625 WinSetWindowPtr(tmp, QWP_USER, blah); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
3626 return tmp; |
| 3 | 3627 } |
| 3628 | |
| 3629 /* | |
| 3630 * Create a new checkbox window (widget) to be packed. | |
| 3631 * Parameters: | |
| 3632 * text: The text to be display by the static text widget. | |
| 3633 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3634 */ | |
| 3635 HWND dw_checkbox_new(char *text, ULONG id) | |
| 3636 { | |
| 3637 PFNWP *blah = malloc(sizeof(PFNWP)); | |
| 3638 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3639 WC_BUTTON, | |
| 3640 text, | |
| 3641 WS_VISIBLE | BS_AUTOCHECKBOX, | |
| 3642 0,0,2000,1000, | |
| 3643 NULLHANDLE, | |
| 3644 HWND_TOP, | |
| 3645 id, | |
| 3646 NULL, | |
| 3647 NULL); | |
| 3648 dw_window_set_font(tmp, DefaultFont); | |
| 3649 dw_window_set_color(tmp, DW_CLR_BLACK, DW_CLR_PALEGRAY); | |
| 3650 *blah = WinSubclassWindow(tmp, _entryproc); | |
| 3651 WinSetWindowPtr(tmp, QWP_USER, blah); | |
| 3652 return tmp; | |
| 3653 } | |
| 3654 | |
| 3655 /* | |
| 3656 * Create a new listbox window (widget) to be packed. | |
| 3657 * Parameters: | |
| 3658 * id: An ID to be used with WinWindowFromID() or 0L. | |
| 3659 * multi: Multiple select TRUE or FALSE. | |
| 3660 */ | |
| 3661 HWND dw_listbox_new(ULONG id, int multi) | |
| 3662 { | |
| 3663 PFNWP *blah = malloc(sizeof(PFNWP)); | |
| 3664 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 3665 WC_LISTBOX, | |
| 3666 NULL, | |
| 3667 WS_VISIBLE | LS_NOADJUSTPOS | | |
| 3668 (multi ? LS_MULTIPLESEL : 0), | |
| 3669 0,0,2000,1000, | |
| 3670 NULLHANDLE, | |
| 3671 HWND_TOP, | |
| 3672 id, | |
| 3673 NULL, | |
| 3674 NULL); | |
| 3675 dw_window_set_font(tmp, DefaultFont); | |
| 3676 *blah = WinSubclassWindow(tmp, _entryproc); | |
| 3677 WinSetWindowPtr(tmp, QWP_USER, blah); | |
| 3678 return tmp; | |
| 3679 } | |
| 3680 | |
| 3681 /* | |
| 3682 * Sets the icon used for a given window. | |
| 3683 * Parameters: | |
| 3684 * handle: Handle to the window. | |
| 3685 * id: An ID to be used to specify the icon. | |
| 3686 */ | |
| 3687 void dw_window_set_icon(HWND handle, ULONG id) | |
| 3688 { | |
| 3689 HPOINTER icon; | |
| 3690 | |
| 3691 icon = WinLoadPointer(HWND_DESKTOP,NULLHANDLE,id); | |
| 3692 WinSendMsg(handle, WM_SETICON, (MPARAM)icon, 0); | |
| 3693 } | |
| 3694 | |
| 3695 /* | |
| 3696 * Sets the bitmap used for a given static window. | |
| 3697 * Parameters: | |
| 3698 * handle: Handle to the window. | |
| 3699 * id: An ID to be used to specify the icon. | |
| 3700 */ | |
| 3701 void dw_window_set_bitmap(HWND handle, ULONG id) | |
| 3702 { | |
| 3703 HBITMAP hbm; | |
| 3704 HPS hps = WinGetPS(handle); | |
| 3705 | |
| 3706 hbm = GpiLoadBitmap(hps, NULLHANDLE, id, 0, 0); | |
| 3707 WinSetWindowBits(handle,QWL_STYLE,SS_BITMAP,SS_BITMAP | 0x7f); | |
| 3708 WinSendMsg( handle, SM_SETHANDLE, MPFROMP(hbm), NULL ); | |
| 3709 /*WinSetWindowULong( hwndDlg, QWL_USER, (ULONG) hbm );*/ | |
| 3710 WinReleasePS(hps); | |
| 3711 } | |
| 3712 | |
| 3713 /* | |
| 3714 * Sets the text used for a given window. | |
| 3715 * Parameters: | |
| 3716 * handle: Handle to the window. | |
| 3717 * text: The text associsated with a given window. | |
| 3718 */ | |
| 3719 void dw_window_set_text(HWND handle, char *text) | |
| 3720 { | |
| 3721 WinSetWindowText(handle, text); | |
| 3722 } | |
| 3723 | |
| 3724 /* | |
| 3725 * Gets the text used for a given window. | |
| 3726 * Parameters: | |
| 3727 * handle: Handle to the window. | |
| 3728 * Returns: | |
| 3729 * text: The text associsated with a given window. | |
| 3730 */ | |
| 3731 char *dw_window_get_text(HWND handle) | |
| 3732 { | |
| 3733 char tempbuf[4096] = ""; | |
| 3734 | |
| 3735 WinQueryWindowText(handle, 4095, tempbuf); | |
| 3736 tempbuf[4095] = 0; | |
| 3737 | |
| 3738 return strdup(tempbuf); | |
| 3739 } | |
| 3740 | |
| 3741 /* | |
| 3742 * Disables given window (widget). | |
| 3743 * Parameters: | |
| 3744 * handle: Handle to the window. | |
| 3745 */ | |
| 3746 void dw_window_disable(HWND handle) | |
| 3747 { | |
| 3748 WinEnableWindow(handle, FALSE); | |
| 3749 } | |
| 3750 | |
| 3751 /* | |
| 3752 * Enables given window (widget). | |
| 3753 * Parameters: | |
| 3754 * handle: Handle to the window. | |
| 3755 */ | |
| 3756 void dw_window_enable(HWND handle) | |
| 3757 { | |
| 3758 WinEnableWindow(handle, TRUE); | |
| 3759 } | |
| 3760 | |
| 3761 /* | |
| 3762 * Gets the child window handle with specified ID. | |
| 3763 * Parameters: | |
| 3764 * handle: Handle to the parent window. | |
| 3765 * id: Integer ID of the child. | |
| 3766 */ | |
| 3767 HWND dw_window_from_id(HWND handle, int id) | |
| 3768 { | |
| 3769 HENUM henum; | |
| 3770 HWND child; | |
| 3771 char tmpbuf[100]; | |
| 3772 | |
| 3773 henum = WinBeginEnumWindows(handle); | |
| 3774 while((child = WinGetNextWindow(henum)) != NULLHANDLE) | |
| 3775 { | |
| 3776 int windowid = WinQueryWindowUShort(child, QWS_ID); | |
| 3777 HWND found; | |
| 3778 | |
| 3779 WinQueryClassName(child, 99, tmpbuf); | |
| 3780 | |
| 3781 /* If the child is a box (frame) then recurse into it */ | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
3782 if(strncmp(tmpbuf, "#1", 3)==0) |
| 3 | 3783 if((found = dw_window_from_id(child, id)) != NULLHANDLE) |
| 3784 return found; | |
| 3785 | |
| 3786 if(windowid && windowid == id) | |
| 3787 { | |
| 3788 WinEndEnumWindows(henum); | |
| 3789 return child; | |
| 3790 } | |
| 3791 } | |
| 3792 WinEndEnumWindows(henum); | |
| 3793 return NULLHANDLE; | |
| 3794 } | |
| 3795 | |
| 3796 /* | |
| 3797 * Pack windows (widgets) into a box from the end (or bottom). | |
| 3798 * Parameters: | |
| 3799 * box: Window handle of the box to be packed into. | |
| 3800 * item: Window handle of the item to be back. | |
| 3801 * width: Width in pixels of the item or -1 to be self determined. | |
| 3802 * height: Height in pixels of the item or -1 to be self determined. | |
| 3803 * hsize: TRUE if the window (widget) should expand horizontally to fill space given. | |
| 3804 * vsize: TRUE if the window (widget) should expand vertically to fill space given. | |
| 3805 * pad: Number of pixels of padding around the item. | |
| 3806 */ | |
| 3807 void dw_box_pack_end(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad) | |
| 3808 { | |
| 3809 Box *thisbox; | |
| 3810 | |
| 3811 if(WinWindowFromID(box, FID_CLIENT)) | |
| 3812 { | |
| 3813 box = WinWindowFromID(box, FID_CLIENT); | |
| 3814 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 3815 } | |
| 3816 else | |
| 3817 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 3818 if(thisbox) | |
| 3819 { | |
| 3820 if(thisbox->type == BOXHORZ) | |
| 3821 dw_box_pack_start_stub(box, item, width, height, hsize, vsize, pad); | |
| 3822 else | |
| 3823 dw_box_pack_end_stub(box, item, width, height, hsize, vsize, pad); | |
| 3824 } | |
| 3825 } | |
| 3826 | |
| 3827 void dw_box_pack_end_stub(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad) | |
| 3828 { | |
| 3829 HWND boxowner = NULLHANDLE; | |
| 3830 Box *thisbox; | |
| 3831 | |
| 3832 if(WinWindowFromID(box, FID_CLIENT)) | |
| 3833 { | |
| 3834 box = WinWindowFromID(box, FID_CLIENT); | |
| 3835 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 3836 hsize = TRUE; | |
| 3837 vsize = TRUE; | |
| 3838 } | |
| 3839 else | |
| 3840 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 3841 if(!thisbox) | |
| 3842 { | |
| 3843 box = WinWindowFromID(box, FID_CLIENT); | |
| 3844 if(box) | |
| 3845 { | |
| 3846 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 3847 hsize = TRUE; | |
| 3848 vsize = TRUE; | |
| 3849 } | |
| 3850 } | |
| 3851 if(thisbox) | |
| 3852 { | |
| 3853 int z; | |
| 3854 Item *tmpitem, *thisitem = thisbox->items; | |
| 3855 char tmpbuf[100]; | |
| 3856 | |
| 3857 tmpitem = malloc(sizeof(Item)*(thisbox->count+1)); | |
| 3858 | |
| 3859 for(z=0;z<thisbox->count;z++) | |
| 3860 { | |
| 3861 tmpitem[z] = thisitem[z]; | |
| 3862 } | |
| 3863 | |
| 3864 WinQueryClassName(item, 99, tmpbuf); | |
| 3865 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
3866 if(strncmp(tmpbuf, "#1", 3)==0) |
| 3 | 3867 tmpitem[thisbox->count].type = TYPEBOX; |
| 3868 else | |
| 3869 tmpitem[thisbox->count].type = TYPEITEM; | |
| 3870 | |
| 3871 tmpitem[thisbox->count].hwnd = item; | |
| 3872 tmpitem[thisbox->count].origwidth = tmpitem[thisbox->count].width = width; | |
| 3873 tmpitem[thisbox->count].origheight = tmpitem[thisbox->count].height = height; | |
| 3874 tmpitem[thisbox->count].pad = pad; | |
| 3875 if(hsize) | |
| 3876 tmpitem[thisbox->count].hsize = SIZEEXPAND; | |
| 3877 else | |
| 3878 tmpitem[thisbox->count].hsize = SIZESTATIC; | |
| 3879 | |
| 3880 if(vsize) | |
| 3881 tmpitem[thisbox->count].vsize = SIZEEXPAND; | |
| 3882 else | |
| 3883 tmpitem[thisbox->count].vsize = SIZESTATIC; | |
| 3884 | |
| 3885 thisbox->items = tmpitem; | |
| 3886 | |
| 3887 if(thisbox->count) | |
| 3888 free(thisitem); | |
| 3889 | |
| 3890 thisbox->count++; | |
| 3891 | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
3892 /* Don't set the ownership if it's an entryfield or spinbutton */ |
| 3 | 3893 WinQueryClassName(item, 99, tmpbuf); |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
3894 if(strncmp(tmpbuf, "#6", 3)!=0 && strncmp(tmpbuf, "#32", 3)!=0) |
| 3 | 3895 { |
| 3896 if((boxowner = WinQueryWindow(box, QW_OWNER)) != 0) | |
| 3897 WinSetOwner(item, boxowner); | |
| 3898 else | |
| 3899 WinSetOwner(item, box); | |
| 3900 } | |
| 3901 WinSetParent(item, box, FALSE); | |
| 3902 } | |
| 3903 } | |
| 3904 | |
| 3905 /* | |
| 3906 * Sets the size of a given window (widget). | |
| 3907 * Parameters: | |
| 3908 * handle: Window (widget) handle. | |
| 3909 * width: New width in pixels. | |
| 3910 * height: New height in pixels. | |
| 3911 */ | |
| 3912 void dw_window_set_usize(HWND handle, ULONG width, ULONG height) | |
| 3913 { | |
| 3914 WinSetWindowPos(handle, NULLHANDLE, 0, 0, width, height, SWP_SHOW | SWP_SIZE); | |
| 3915 } | |
| 3916 | |
| 3917 /* | |
| 3918 * Returns the width of the screen. | |
| 3919 */ | |
| 3920 int dw_screen_width(void) | |
| 3921 { | |
| 3922 return WinQuerySysValue(HWND_DESKTOP,SV_CXSCREEN); | |
| 3923 } | |
| 3924 | |
| 3925 /* | |
| 3926 * Returns the height of the screen. | |
| 3927 */ | |
| 3928 int dw_screen_height(void) | |
| 3929 { | |
| 3930 return WinQuerySysValue(HWND_DESKTOP,SV_CYSCREEN); | |
| 3931 } | |
| 3932 | |
| 3933 /* This should return the current color depth */ | |
| 3934 unsigned long dw_color_depth(void) | |
| 3935 { | |
| 3936 HDC hdc = WinOpenWindowDC(HWND_DESKTOP); | |
| 3937 long colors; | |
| 3938 | |
| 3939 DevQueryCaps(hdc, CAPS_COLOR_BITCOUNT, 1, &colors); | |
| 3940 DevCloseDC(hdc); | |
| 3941 return colors; | |
| 3942 } | |
| 3943 | |
| 3944 | |
| 3945 /* | |
| 3946 * Sets the position of a given window (widget). | |
| 3947 * Parameters: | |
| 3948 * handle: Window (widget) handle. | |
| 3949 * x: X location from the bottom left. | |
| 3950 * y: Y location from the bottom left. | |
| 3951 */ | |
| 3952 void dw_window_set_pos(HWND handle, ULONG x, ULONG y) | |
| 3953 { | |
| 3954 int myy = _get_frame_height(handle) - (y + _get_height(handle)); | |
| 3955 | |
| 3956 WinSetWindowPos(handle, NULLHANDLE, x, myy, 0, 0, SWP_MOVE); | |
| 3957 } | |
| 3958 | |
| 3959 /* | |
| 3960 * Sets the position and size of a given window (widget). | |
| 3961 * Parameters: | |
| 3962 * handle: Window (widget) handle. | |
| 3963 * x: X location from the bottom left. | |
| 3964 * y: Y location from the bottom left. | |
| 3965 * width: Width of the widget. | |
| 3966 * height: Height of the widget. | |
| 3967 */ | |
| 3968 void dw_window_set_pos_size(HWND handle, ULONG x, ULONG y, ULONG width, ULONG height) | |
| 3969 { | |
| 3970 int myy = _get_frame_height(handle) - (y + height); | |
| 3971 | |
| 3972 WinSetWindowPos(handle, NULLHANDLE, x, myy, width, height, SWP_MOVE | SWP_SIZE | SWP_SHOW); | |
| 3973 } | |
| 3974 | |
| 3975 /* | |
| 3976 * Gets the position and size of a given window (widget). | |
| 3977 * Parameters: | |
| 3978 * handle: Window (widget) handle. | |
| 3979 * x: X location from the bottom left. | |
| 3980 * y: Y location from the bottom left. | |
| 3981 * width: Width of the widget. | |
| 3982 * height: Height of the widget. | |
| 3983 */ | |
| 3984 void dw_window_get_pos_size(HWND handle, ULONG *x, ULONG *y, ULONG *width, ULONG *height) | |
| 3985 { | |
| 3986 SWP swp; | |
| 3987 WinQueryWindowPos(handle, &swp); | |
| 3988 if(x) | |
| 3989 *x = swp.x; | |
| 3990 if(y) | |
| 3991 *y = _get_frame_height(handle) - (swp.y + swp.cy); | |
| 3992 if(width) | |
| 3993 *width = swp.cx; | |
| 3994 if(height) | |
| 3995 *height = swp.cy; | |
| 3996 } | |
| 3997 | |
| 3998 /* | |
| 3999 * Sets the style of a given window (widget). | |
| 4000 * Parameters: | |
| 4001 * handle: Window (widget) handle. | |
| 4002 * width: New width in pixels. | |
| 4003 * height: New height in pixels. | |
| 4004 */ | |
| 4005 void dw_window_set_style(HWND handle, ULONG style, ULONG mask) | |
| 4006 { | |
| 4007 WinSetWindowBits(handle, QWL_STYLE, style, mask); | |
| 4008 } | |
| 4009 | |
| 4010 /* | |
| 4011 * Adds a new page to specified notebook. | |
| 4012 * Parameters: | |
| 4013 * handle: Window (widget) handle. | |
| 4014 * flags: Any additional page creation flags. | |
| 4015 * front: If TRUE page is added at the beginning. | |
| 4016 */ | |
| 4017 ULONG dw_notebook_page_new(HWND handle, ULONG flags, int front) | |
| 4018 { | |
| 4019 if(front) | |
| 4020 return (ULONG)WinSendMsg(handle, BKM_INSERTPAGE, 0L, | |
| 4021 MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR | flags), BKA_FIRST)); | |
| 4022 return (ULONG)WinSendMsg(handle, BKM_INSERTPAGE, 0L, | |
| 4023 MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR | flags), BKA_LAST)); | |
| 4024 } | |
| 4025 | |
| 4026 /* | |
| 4027 * Remove a page from a notebook. | |
| 4028 * Parameters: | |
| 4029 * handle: Handle to the notebook widget. | |
| 4030 * pageid: ID of the page to be destroyed. | |
| 4031 */ | |
| 4032 void dw_notebook_page_destroy(HWND handle, unsigned int pageid) | |
| 4033 { | |
| 4034 WinSendMsg(handle, BKM_DELETEPAGE, | |
| 4035 MPFROMLONG(pageid), (MPARAM)BKA_SINGLE); | |
| 4036 } | |
| 4037 | |
| 4038 /* | |
| 4039 * Queries the currently visible page ID. | |
| 4040 * Parameters: | |
| 4041 * handle: Handle to the notebook widget. | |
| 4042 */ | |
| 4043 unsigned int dw_notebook_page_query(HWND handle) | |
| 4044 { | |
| 4045 return (int)WinSendMsg(handle, BKM_QUERYPAGEID,0L, MPFROM2SHORT(BKA_TOP, BKA_MAJOR)); | |
| 4046 } | |
| 4047 | |
| 4048 /* | |
| 4049 * Sets the currently visibale page ID. | |
| 4050 * Parameters: | |
| 4051 * handle: Handle to the notebook widget. | |
| 4052 * pageid: ID of the page to be made visible. | |
| 4053 */ | |
| 4054 void dw_notebook_page_set(HWND handle, unsigned int pageid) | |
| 4055 { | |
| 4056 WinSendMsg(handle, BKM_TURNTOPAGE, MPFROMLONG(pageid), 0L); | |
| 4057 } | |
| 4058 | |
| 4059 /* | |
| 4060 * Sets the text on the specified notebook tab. | |
| 4061 * Parameters: | |
| 4062 * handle: Notebook handle. | |
| 4063 * pageid: Page ID of the tab to set. | |
| 4064 * text: Pointer to the text to set. | |
| 4065 */ | |
| 4066 void dw_notebook_page_set_text(HWND handle, ULONG pageid, char *text) | |
| 4067 { | |
| 4068 WinSendMsg(handle, BKM_SETTABTEXT, | |
| 4069 MPFROMLONG(pageid), MPFROMP(text)); | |
| 4070 } | |
| 4071 | |
| 4072 /* | |
| 4073 * Sets the text on the specified notebook tab status area. | |
| 4074 * Parameters: | |
| 4075 * handle: Notebook handle. | |
| 4076 * pageid: Page ID of the tab to set. | |
| 4077 * text: Pointer to the text to set. | |
| 4078 */ | |
| 4079 void dw_notebook_page_set_status_text(HWND handle, ULONG pageid, char *text) | |
| 4080 { | |
| 4081 WinSendMsg(handle, BKM_SETSTATUSLINETEXT, | |
| 4082 MPFROMLONG(pageid), MPFROMP(text)); | |
| 4083 } | |
| 4084 | |
| 4085 /* | |
| 4086 * Packs the specified box into the notebook page. | |
| 4087 * Parameters: | |
| 4088 * handle: Handle to the notebook to be packed. | |
| 4089 * pageid: Page ID in the notebook which is being packed. | |
| 4090 * page: Box handle to be packed. | |
| 4091 */ | |
| 4092 void dw_notebook_pack(HWND handle, ULONG pageid, HWND page) | |
| 4093 { | |
| 4094 HWND tmpbox = dw_box_new(BOXVERT, 0); | |
| 4095 | |
| 4096 dw_box_pack_start(tmpbox, page, 0, 0, TRUE, TRUE, 0); | |
| 4097 WinSubclassWindow(tmpbox, _wndproc); | |
| 4098 WinSendMsg(handle, BKM_SETPAGEWINDOWHWND, | |
| 4099 MPFROMLONG(pageid), MPFROMHWND(tmpbox)); | |
| 4100 } | |
| 4101 | |
| 4102 /* | |
| 4103 * Appends the specified text to the listbox's (or combobox) entry list. | |
| 4104 * Parameters: | |
| 4105 * handle: Handle to the listbox to be appended to. | |
| 4106 * text: Text to append into listbox. | |
| 4107 */ | |
| 4108 void dw_listbox_append(HWND handle, char *text) | |
| 4109 { | |
| 4110 WinSendMsg(handle, | |
| 4111 LM_INSERTITEM, | |
| 4112 MPFROMSHORT(LIT_END), | |
| 4113 MPFROMP(text)); | |
| 4114 } | |
| 4115 | |
| 4116 /* | |
| 4117 * Clears the listbox's (or combobox) list of all entries. | |
| 4118 * Parameters: | |
| 4119 * handle: Handle to the listbox to be cleared. | |
| 4120 */ | |
| 4121 void dw_listbox_clear(HWND handle) | |
| 4122 { | |
| 4123 WinSendMsg(handle, | |
| 4124 LM_DELETEALL, 0L, 0L); | |
| 4125 } | |
| 4126 | |
| 4127 /* | |
| 4128 * Returns the listbox's item count. | |
| 4129 * Parameters: | |
| 4130 * handle: Handle to the listbox to be cleared. | |
| 4131 */ | |
| 4132 int dw_listbox_count(HWND handle) | |
| 4133 { | |
| 4134 return (int)WinSendMsg(handle, | |
| 4135 LM_QUERYITEMCOUNT,0L, 0L); | |
| 4136 } | |
| 4137 | |
| 4138 /* | |
| 4139 * Sets the topmost item in the viewport. | |
| 4140 * Parameters: | |
| 4141 * handle: Handle to the listbox to be cleared. | |
| 4142 * top: Index to the top item. | |
| 4143 */ | |
| 4144 void dw_listbox_set_top(HWND handle, int top) | |
| 4145 { | |
| 4146 WinSendMsg(handle, | |
| 4147 LM_SETTOPINDEX, | |
| 4148 MPFROMSHORT(top), | |
| 4149 0L); | |
| 4150 } | |
| 4151 | |
| 4152 /* | |
| 4153 * Copies the given index item's text into buffer. | |
| 4154 * Parameters: | |
| 4155 * handle: Handle to the listbox to be queried. | |
| 4156 * index: Index into the list to be queried. | |
| 4157 * buffer: Buffer where text will be copied. | |
| 4158 * length: Length of the buffer (including NULL). | |
| 4159 */ | |
| 4160 void dw_listbox_query_text(HWND handle, unsigned int index, char *buffer, unsigned int length) | |
| 4161 { | |
| 4162 WinSendMsg(handle, LM_QUERYITEMTEXT, MPFROM2SHORT(index, length), (MPARAM)buffer); | |
| 4163 } | |
| 4164 | |
| 4165 /* | |
| 4166 * Sets the text of a given listbox entry. | |
| 4167 * Parameters: | |
| 4168 * handle: Handle to the listbox to be queried. | |
| 4169 * index: Index into the list to be queried. | |
| 4170 * buffer: Buffer where text will be copied. | |
| 4171 */ | |
| 4172 void dw_listbox_set_text(HWND handle, unsigned int index, char *buffer) | |
| 4173 { | |
| 4174 WinSendMsg(handle, LM_SETITEMTEXT, MPFROMSHORT(index), (MPARAM)buffer); | |
| 4175 } | |
| 4176 | |
| 4177 /* | |
| 4178 * Returns the index to the item in the list currently selected. | |
| 4179 * Parameters: | |
| 4180 * handle: Handle to the listbox to be queried. | |
| 4181 */ | |
| 4182 unsigned int dw_listbox_selected(HWND handle) | |
| 4183 { | |
| 4184 return (unsigned int)WinSendMsg(handle, | |
|
18
f1002d51d959
Fixed a container problem on OS/2 with separator set to 0.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
16
diff
changeset
|
4185 LM_QUERYSELECTION, |
|
f1002d51d959
Fixed a container problem on OS/2 with separator set to 0.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
16
diff
changeset
|
4186 MPFROMSHORT(LIT_CURSOR), |
|
f1002d51d959
Fixed a container problem on OS/2 with separator set to 0.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
16
diff
changeset
|
4187 0); |
| 3 | 4188 } |
| 4189 | |
| 4190 /* | |
| 4191 * Returns the index to the current selected item or -1 when done. | |
| 4192 * Parameters: | |
| 4193 * handle: Handle to the listbox to be queried. | |
| 4194 * where: Either the previous return or -1 to restart. | |
| 4195 */ | |
| 4196 int dw_listbox_selected_multi(HWND handle, int where) | |
| 4197 { | |
| 4198 int place = where; | |
| 4199 | |
| 4200 if(where == -1) | |
| 4201 place = LIT_FIRST; | |
| 4202 | |
| 4203 place = (int)WinSendMsg(handle, | |
| 4204 LM_QUERYSELECTION, | |
| 4205 MPFROMSHORT(place),0L); | |
| 4206 if(place == LIT_NONE) | |
| 4207 return -1; | |
| 4208 return place; | |
| 4209 } | |
| 4210 | |
| 4211 /* | |
| 4212 * Sets the selection state of a given index. | |
| 4213 * Parameters: | |
| 4214 * handle: Handle to the listbox to be set. | |
| 4215 * index: Item index. | |
| 4216 * state: TRUE if selected FALSE if unselected. | |
| 4217 */ | |
| 4218 void dw_listbox_select(HWND handle, int index, int state) | |
| 4219 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4220 char tmpbuf[100]; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4221 |
| 3 | 4222 WinSendMsg(handle, LM_SELECTITEM, MPFROMSHORT(index), (MPARAM)state); |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4223 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4224 WinQueryClassName(handle, 99, tmpbuf); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4225 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4226 /* If we are setting a combobox call the event handler manually */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4227 if(strncmp(tmpbuf, "#6", 3)==0) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4228 _run_event(handle, WM_CONTROL, MPFROM2SHORT(0, LN_SELECT), (MPARAM)handle); |
| 3 | 4229 } |
| 4230 | |
| 4231 /* | |
| 4232 * Deletes the item with given index from the list. | |
| 4233 * Parameters: | |
| 4234 * handle: Handle to the listbox to be set. | |
| 4235 * index: Item index. | |
| 4236 */ | |
| 4237 void dw_listbox_delete(HWND handle, int index) | |
| 4238 { | |
| 4239 WinSendMsg(handle, LM_DELETEITEM, MPFROMSHORT(index), 0); | |
| 4240 } | |
| 4241 | |
| 4242 /* | |
| 4243 * Adds text to an MLE box and returns the current point. | |
| 4244 * Parameters: | |
| 4245 * handle: Handle to the MLE to be queried. | |
| 4246 * buffer: Text buffer to be imported. | |
| 4247 * startpoint: Point to start entering text. | |
| 4248 */ | |
| 4249 unsigned int dw_mle_import(HWND handle, char *buffer, int startpoint) | |
| 4250 { | |
| 4251 unsigned long point = startpoint; | |
| 4252 PBYTE mlebuf; | |
| 4253 | |
| 4254 /* Work around 64K limit */ | |
| 4255 if(!DosAllocMem((PPVOID) &mlebuf, 65536, PAG_COMMIT | PAG_READ | PAG_WRITE | OBJ_TILE)) | |
| 4256 { | |
| 4257 int amount, len = strlen(buffer), written = 0; | |
| 4258 | |
| 4259 while(written < len) | |
| 4260 { | |
| 4261 if((len - written) > 65535) | |
| 4262 amount = 65535; | |
| 4263 else | |
| 4264 amount = len - written; | |
| 4265 | |
| 4266 memcpy(mlebuf, &buffer[written], amount); | |
| 4267 mlebuf[amount] = '\0'; | |
| 4268 | |
| 4269 WinSendMsg(handle, MLM_SETIMPORTEXPORT, MPFROMP(mlebuf), MPFROMLONG(amount+1)); | |
| 4270 WinSendMsg(handle, MLM_IMPORT, MPFROMP(&point), MPFROMLONG(amount + 1)); | |
| 4271 dw_mle_delete(handle, point, 1); | |
| 4272 | |
| 4273 written += amount; | |
| 4274 } | |
| 4275 DosFreeMem(mlebuf); | |
| 4276 } | |
| 4277 return point - 1; | |
| 4278 } | |
| 4279 | |
| 4280 /* | |
| 4281 * Grabs text from an MLE box. | |
| 4282 * Parameters: | |
| 4283 * handle: Handle to the MLE to be queried. | |
| 4284 * buffer: Text buffer to be exported. | |
| 4285 * startpoint: Point to start grabbing text. | |
| 4286 * length: Amount of text to be grabbed. | |
| 4287 */ | |
| 4288 void dw_mle_export(HWND handle, char *buffer, int startpoint, int length) | |
| 4289 { | |
| 4290 PBYTE mlebuf; | |
| 4291 | |
| 4292 /* Work around 64K limit */ | |
| 4293 if(!DosAllocMem((PPVOID) &mlebuf, 65535, PAG_COMMIT | PAG_READ | PAG_WRITE | OBJ_TILE)) | |
| 4294 { | |
| 4295 int amount, copied, written = 0; | |
| 4296 | |
| 4297 while(written < length) | |
| 4298 { | |
| 4299 if((length - written) > 65535) | |
| 4300 amount = 65535; | |
| 4301 else | |
| 4302 amount = length - written; | |
| 4303 | |
| 4304 WinSendMsg(handle, MLM_SETIMPORTEXPORT, MPFROMP(mlebuf), MPFROMLONG(amount)); | |
| 4305 copied = (int)WinSendMsg(handle, MLM_EXPORT, MPFROMP(&startpoint), MPFROMLONG(&amount)); | |
| 4306 | |
| 4307 if(copied) | |
| 4308 { | |
| 4309 memcpy(&buffer[written], mlebuf, copied); | |
| 4310 | |
| 4311 written += copied; | |
| 4312 } | |
| 4313 else | |
| 4314 break; | |
| 4315 } | |
| 4316 DosFreeMem(mlebuf); | |
| 4317 } | |
| 4318 } | |
| 4319 | |
| 4320 /* | |
| 4321 * Obtains information about an MLE box. | |
| 4322 * Parameters: | |
| 4323 * handle: Handle to the MLE to be queried. | |
| 4324 * bytes: A pointer to a variable to return the total bytes. | |
| 4325 * lines: A pointer to a variable to return the number of lines. | |
| 4326 */ | |
| 4327 void dw_mle_query(HWND handle, unsigned long *bytes, unsigned long *lines) | |
| 4328 { | |
| 4329 if(bytes) | |
| 4330 *bytes = (unsigned long)WinSendMsg(handle, MLM_QUERYTEXTLENGTH, 0, 0); | |
| 4331 if(lines) | |
| 4332 *lines = (unsigned long)WinSendMsg(handle, MLM_QUERYLINECOUNT, 0, 0); | |
| 4333 } | |
| 4334 | |
| 4335 /* | |
| 4336 * Deletes text from an MLE box. | |
| 4337 * Parameters: | |
| 4338 * handle: Handle to the MLE to be deleted from. | |
| 4339 * startpoint: Point to start deleting text. | |
| 4340 * length: Amount of text to be deleted. | |
| 4341 */ | |
| 4342 void dw_mle_delete(HWND handle, int startpoint, int length) | |
| 4343 { | |
| 4344 char *buf = malloc(length+1); | |
| 4345 int z, dellen = length; | |
| 4346 | |
| 4347 dw_mle_export(handle, buf, startpoint, length); | |
| 4348 | |
| 4349 for(z=0;z<length-1;z++) | |
| 4350 { | |
| 4351 if(strncmp(&buf[z], "\r\n", 2) == 0) | |
| 4352 dellen--; | |
| 4353 } | |
| 4354 WinSendMsg(handle, MLM_DELETE, MPFROMLONG(startpoint), MPFROMLONG(dellen)); | |
| 4355 free(buf); | |
| 4356 } | |
| 4357 | |
| 4358 /* | |
| 4359 * Clears all text from an MLE box. | |
| 4360 * Parameters: | |
| 4361 * handle: Handle to the MLE to be cleared. | |
| 4362 */ | |
| 4363 void dw_mle_clear(HWND handle) | |
| 4364 { | |
| 4365 unsigned long bytes; | |
| 4366 | |
| 4367 dw_mle_query(handle, &bytes, NULL); | |
| 4368 | |
| 4369 WinSendMsg(handle, MLM_DELETE, MPFROMLONG(0), MPFROMLONG(bytes)); | |
| 4370 } | |
| 4371 | |
| 4372 /* | |
| 4373 * Sets the visible line of an MLE box. | |
| 4374 * Parameters: | |
| 4375 * handle: Handle to the MLE to be positioned. | |
| 4376 * line: Line to be visible. | |
| 4377 */ | |
| 4378 void dw_mle_set_visible(HWND handle, int line) | |
| 4379 { | |
| 4380 int tmppnt; | |
| 4381 | |
| 4382 if(line > 10) | |
| 4383 { | |
| 4384 tmppnt = (int)WinSendMsg(handle, MLM_CHARFROMLINE, MPFROMLONG(line - 10), 0); | |
| 4385 WinSendMsg(handle, MLM_SETFIRSTCHAR, MPFROMLONG(tmppnt), 0); | |
| 4386 } | |
| 4387 } | |
| 4388 | |
| 4389 /* | |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4390 * Sets the editablity of an MLE box. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4391 * Parameters: |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4392 * handle: Handle to the MLE. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4393 * state: TRUE if it can be edited, FALSE for readonly. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4394 */ |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4395 void dw_mle_set_editable(HWND handle, int state) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4396 { |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4397 WinSendMsg(handle, MLM_SETREADONLY, MPFROMLONG(state ? FALSE : TRUE), 0); |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4398 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4399 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4400 /* |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4401 * Sets the word wrap state of an MLE box. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4402 * Parameters: |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4403 * handle: Handle to the MLE. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4404 * state: TRUE if it wraps, FALSE if it doesn't. |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4405 */ |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4406 void dw_mle_set_word_wrap(HWND handle, int state) |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4407 { |
|
16
ca7a8215487a
Removed structure packing option to fix a crash in dw_mle_search() when
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
15
diff
changeset
|
4408 WinSendMsg(handle, MLM_SETWRAP, MPFROMLONG(state), 0); |
|
7
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4409 } |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4410 |
|
005fa766e8c2
Updates to latest build.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
3
diff
changeset
|
4411 /* |
| 3 | 4412 * Sets the current cursor position of an MLE box. |
| 4413 * Parameters: | |
| 4414 * handle: Handle to the MLE to be positioned. | |
| 4415 * point: Point to position cursor. | |
| 4416 */ | |
| 4417 void dw_mle_set(HWND handle, int point) | |
| 4418 { | |
| 4419 WinSendMsg(handle, MLM_SETSEL, MPFROMLONG(point), MPFROMLONG(point)); | |
| 4420 } | |
| 4421 | |
| 4422 /* | |
| 4423 * Finds text in an MLE box. | |
| 4424 * Parameters: | |
| 4425 * handle: Handle to the MLE to be cleared. | |
| 4426 * text: Text to search for. | |
| 4427 * point: Start point of search. | |
| 4428 * flags: Search specific flags. | |
| 4429 */ | |
| 4430 int dw_mle_search(HWND handle, char *text, int point, unsigned long flags) | |
| 4431 { | |
| 4432 MLE_SEARCHDATA msd; | |
| 4433 | |
|
16
ca7a8215487a
Removed structure packing option to fix a crash in dw_mle_search() when
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
15
diff
changeset
|
4434 /* This code breaks with structure packing set to 1 (/Sp1 in VAC) |
|
ca7a8215487a
Removed structure packing option to fix a crash in dw_mle_search() when
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
15
diff
changeset
|
4435 * if this is needed we need to add a pragma here. |
|
ca7a8215487a
Removed structure packing option to fix a crash in dw_mle_search() when
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
15
diff
changeset
|
4436 */ |
| 3 | 4437 msd.cb = sizeof(msd); |
| 4438 msd.pchFind = text; | |
| 4439 msd.pchReplace = NULL; | |
| 4440 msd.cchFind = strlen(text); | |
| 4441 msd.cchReplace = 0; | |
| 4442 msd.iptStart = point; | |
| 4443 msd.iptStop = -1; | |
| 4444 | |
| 4445 if(WinSendMsg(handle, MLM_SEARCH, MPFROMLONG(MLFSEARCH_SELECTMATCH | flags), (MPARAM)&msd)) | |
| 4446 return (int)WinSendMsg(handle, MLM_QUERYSEL,(MPARAM)MLFQS_MAXSEL, 0); | |
| 4447 return 0; | |
| 4448 } | |
| 4449 | |
| 4450 /* | |
| 4451 * Stops redrawing of an MLE box. | |
| 4452 * Parameters: | |
| 4453 * handle: Handle to the MLE to freeze. | |
| 4454 */ | |
| 4455 void dw_mle_freeze(HWND handle) | |
| 4456 { | |
| 4457 WinSendMsg(handle, MLM_DISABLEREFRESH, 0, 0); | |
| 4458 } | |
| 4459 | |
| 4460 /* | |
| 4461 * Resumes redrawing of an MLE box. | |
| 4462 * Parameters: | |
| 4463 * handle: Handle to the MLE to thaw. | |
| 4464 */ | |
| 4465 void dw_mle_thaw(HWND handle) | |
| 4466 { | |
| 4467 WinSendMsg(handle, MLM_ENABLEREFRESH, 0, 0); | |
| 4468 } | |
| 4469 | |
| 4470 /* | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4471 * Returns the range of the percent bar. |
| 3 | 4472 * Parameters: |
| 4473 * handle: Handle to the slider to be queried. | |
| 4474 */ | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4475 unsigned int dw_percent_query_range(HWND handle) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4476 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4477 unsigned long width; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4478 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4479 dw_window_get_pos_size(handle, 0, 0, &width, 0); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4480 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4481 if(width - 6 < 1) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4482 return 1; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4483 return width - 6; |
| 3 | 4484 } |
| 4485 | |
| 4486 /* | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4487 * Sets the percent bar position. |
| 3 | 4488 * Parameters: |
| 4489 * handle: Handle to the slider to be set. | |
| 4490 * position: Position of the slider withing the range. | |
| 4491 */ | |
|
33
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4492 void dw_percent_set_pos(HWND handle, unsigned int position) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4493 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4494 PercentBar *pb = (PercentBar *)WinQueryWindowPtr(handle, 0); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4495 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4496 if(pb) |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4497 { |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4498 RECTL rcl; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4499 |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4500 pb->pos = position; |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4501 WinQueryWindowRect(handle, &rcl); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4502 WinInvalidateRect(handle, &rcl, FALSE); |
|
72675de7d229
Renamed slider class to percent class. Implemented my own percent widget
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
31
diff
changeset
|
4503 } |
| 3 | 4504 } |
| 4505 | |
| 4506 /* | |
| 4507 * Sets the spinbutton value. | |
| 4508 * Parameters: | |
| 4509 * handle: Handle to the spinbutton to be set. | |
| 4510 * position: Current value of the spinbutton. | |
| 4511 */ | |
| 4512 void dw_spinbutton_set_pos(HWND handle, long position) | |
| 4513 { | |
| 4514 WinSendMsg(handle, SPBM_SETCURRENTVALUE, MPFROMLONG((long)position), 0L); | |
| 4515 } | |
| 4516 | |
| 4517 /* | |
| 4518 * Sets the spinbutton limits. | |
| 4519 * Parameters: | |
| 4520 * handle: Handle to the spinbutton to be set. | |
| 4521 * upper: Upper limit. | |
| 4522 * lower: Lower limit. | |
| 4523 */ | |
| 4524 void dw_spinbutton_set_limits(HWND handle, long upper, long lower) | |
| 4525 { | |
| 4526 WinSendMsg(handle, SPBM_SETLIMITS, MPFROMLONG(upper), MPFROMLONG(lower)); | |
| 4527 } | |
| 4528 | |
| 4529 /* | |
| 4530 * Sets the entryfield character limit. | |
| 4531 * Parameters: | |
| 4532 * handle: Handle to the spinbutton to be set. | |
| 4533 * limit: Number of characters the entryfield will take. | |
| 4534 */ | |
| 4535 void dw_entryfield_set_limit(HWND handle, ULONG limit) | |
| 4536 { | |
| 4537 WinSendMsg(handle, EM_SETTEXTLIMIT, (MPARAM)limit, (MPARAM)0); | |
| 4538 } | |
| 4539 | |
| 4540 | |
| 4541 /* | |
| 4542 * Returns the current value of the spinbutton. | |
| 4543 * Parameters: | |
| 4544 * handle: Handle to the spinbutton to be queried. | |
| 4545 */ | |
| 4546 long dw_spinbutton_query(HWND handle) | |
| 4547 { | |
| 4548 long tmpval = 0L; | |
| 4549 | |
| 4550 WinSendMsg(handle, SPBM_QUERYVALUE, (MPARAM)&tmpval,0L); | |
| 4551 return tmpval; | |
| 4552 } | |
| 4553 | |
| 4554 /* | |
| 4555 * Returns the state of the checkbox. | |
| 4556 * Parameters: | |
| 4557 * handle: Handle to the checkbox to be queried. | |
| 4558 */ | |
| 4559 int dw_checkbox_query(HWND handle) | |
| 4560 { | |
| 4561 return (int)WinSendMsg(handle,BM_QUERYCHECK,0,0); | |
| 4562 } | |
| 4563 | |
| 4564 /* | |
| 4565 * Sets the state of the checkbox. | |
| 4566 * Parameters: | |
| 4567 * handle: Handle to the checkbox to be queried. | |
| 4568 * value: TRUE for checked, FALSE for unchecked. | |
| 4569 */ | |
| 4570 void dw_checkbox_set(HWND handle, int value) | |
| 4571 { | |
| 4572 WinSendMsg(handle,BM_SETCHECK,MPFROMSHORT(value),0); | |
| 4573 } | |
| 4574 | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4575 typedef struct _CNRITEM |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4576 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4577 MINIRECORDCORE rc; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4578 HPOINTER hptrIcon; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4579 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4580 } CNRITEM, *PCNRITEM; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4581 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4582 /* |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4583 * Inserts an item into a tree window (widget). |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4584 * Parameters: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4585 * handle: Handle to the tree to be inserted. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4586 * title: The text title of the entry. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4587 * icon: Handle to coresponding icon. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4588 * parent: Parent handle or 0 if root. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4589 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4590 HWND dw_tree_insert(HWND handle, char *title, unsigned long icon, HWND parent) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4591 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4592 ULONG cbExtra; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4593 PCNRITEM pci; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4594 RECORDINSERT ri; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4595 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4596 /* Calculate extra bytes needed for each record besides that needed for the |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4597 * MINIRECORDCORE structure |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4598 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4599 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4600 cbExtra = sizeof(CNRITEM) - sizeof(MINIRECORDCORE); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4601 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4602 /* Allocate memory for the parent record */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4603 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4604 pci = WinSendMsg(handle, CM_ALLOCRECORD, MPFROMLONG(cbExtra), MPFROMSHORT(1)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4605 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4606 /* Fill in the parent record data */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4607 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4608 pci->rc.cb = sizeof(MINIRECORDCORE); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4609 pci->rc.pszIcon = title; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4610 pci->rc.hptrIcon = icon; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4611 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4612 pci->hptrIcon = icon; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4613 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4614 memset(&ri, 0, sizeof(RECORDINSERT)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4615 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4616 ri.cb = sizeof(RECORDINSERT); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4617 ri.pRecordOrder = (PRECORDCORE)CMA_END; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4618 ri.pRecordParent = (PRECORDCORE)NULL; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4619 ri.zOrder = (USHORT)CMA_TOP; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4620 ri.cRecordsInsert = 1; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4621 ri.fInvalidateRecord = TRUE; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4622 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4623 /* We are about to insert the child records. Set the parent record to be |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4624 * the one we just inserted. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4625 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4626 ri.pRecordParent = (PRECORDCORE)parent; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4627 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4628 /* Insert the record */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4629 WinSendMsg(handle, CM_INSERTRECORD, MPFROMP(pci), MPFROMP(&ri)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4630 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4631 return (HWND)pci; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4632 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4633 |
|
30
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4634 /* |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4635 * Removes all nodes from a tree. |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4636 * Parameters: |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4637 * handle: Handle to the window (widget) to be cleared. |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4638 */ |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4639 void dw_tree_clear(HWND handle) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4640 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4641 WinSendMsg(handle, CM_REMOVERECORD, (MPARAM)0L, MPFROM2SHORT(0, CMA_INVALIDATE | CMA_FREE)); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4642 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4643 |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4644 /* |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4645 * Removes a node from a tree. |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4646 * Parameters: |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4647 * handle: Handle to the window (widget) to be cleared. |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4648 * item: Handle to node to be deleted. |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4649 */ |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4650 void dw_tree_delete(HWND handle, HWND item) |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4651 { |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4652 PCNRITEM pci = (PCNRITEM)item; |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4653 WinSendMsg(handle, CM_REMOVERECORD, (MPARAM)&pci, MPFROM2SHORT(1, CMA_INVALIDATE | CMA_FREE)); |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4654 } |
|
b1d7e8a28dfa
Added tree view functions and signal.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
24
diff
changeset
|
4655 |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4656 /* Some OS/2 specific container structs */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4657 typedef struct _containerinfo { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4658 int count; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4659 void *data; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4660 HWND handle; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4661 } ContainerInfo; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4662 |
| 3 | 4663 /* |
| 4664 * Sets up the container columns. | |
| 4665 * Parameters: | |
| 4666 * handle: Handle to the container to be configured. | |
| 4667 * flags: An array of unsigned longs with column flags. | |
| 4668 * titles: An array of strings with column text titles. | |
| 4669 * count: The number of columns (this should match the arrays). | |
| 4670 * separator: The column number that contains the main separator. | |
| 4671 * (this item may only be used in OS/2) | |
| 4672 */ | |
| 4673 int dw_container_setup(HWND handle, unsigned long *flags, char **titles, int count, int separator) | |
| 4674 { | |
| 4675 PFIELDINFO details, first, left = NULL; | |
| 4676 FIELDINFOINSERT detin; | |
| 4677 CNRINFO cnri; | |
| 4678 int z; | |
| 4679 ULONG size = sizeof(RECORDCORE); | |
| 4680 ULONG *offStruct = malloc(count * sizeof(ULONG)); | |
| 4681 ULONG *tempflags = malloc((count+1) * sizeof(ULONG)); | |
| 4682 ULONG *oldflags = (ULONG *)WinQueryWindowPtr(handle, 0); | |
| 4683 | |
| 4684 if(!offStruct || !tempflags) | |
| 4685 return FALSE; | |
| 4686 | |
| 4687 memcpy(tempflags, flags, count * sizeof(ULONG)); | |
| 4688 tempflags[count] = 0; | |
| 4689 | |
| 4690 WinSetWindowPtr(handle, 0, tempflags); | |
| 4691 | |
| 4692 if(oldflags) | |
| 4693 free(oldflags); | |
| 4694 | |
| 4695 while((first = (PFIELDINFO)WinSendMsg(handle, CM_QUERYDETAILFIELDINFO, 0, MPFROMSHORT(CMA_FIRST))) != NULL) | |
| 4696 { | |
| 4697 WinSendMsg(handle, CM_REMOVEDETAILFIELDINFO, (MPARAM)&first, MPFROM2SHORT(1, CMA_FREE)); | |
| 4698 } | |
| 4699 | |
| 4700 /* Figure out the offsets to the items in the struct */ | |
| 4701 for(z=0;z<count;z++) | |
| 4702 { | |
| 4703 offStruct[z] = size; | |
| 4704 if(flags[z] & DW_CFA_BITMAPORICON) | |
| 4705 size += sizeof(HPOINTER); | |
| 4706 else if(flags[z] & DW_CFA_STRING) | |
| 4707 size += sizeof(char *); | |
| 4708 else if(flags[z] & DW_CFA_ULONG) | |
| 4709 size += sizeof(ULONG); | |
| 4710 else if(flags[z] & DW_CFA_DATE) | |
| 4711 size += sizeof(CDATE); | |
| 4712 else if(flags[z] & DW_CFA_TIME) | |
| 4713 size += sizeof(CTIME); | |
| 4714 } | |
| 4715 | |
| 4716 first = details = (PFIELDINFO)WinSendMsg(handle, CM_ALLOCDETAILFIELDINFO, MPFROMLONG(count), 0L); | |
| 4717 | |
| 4718 if(!first) | |
| 4719 { | |
| 4720 free(offStruct); | |
| 4721 return FALSE; | |
| 4722 } | |
| 4723 | |
| 4724 for(z=0;z<count;z++) | |
| 4725 { | |
| 4726 if(z==separator-1) | |
| 4727 left=details; | |
| 4728 details->cb = sizeof(FIELDINFO); | |
| 4729 details->flData = flags[z]; | |
| 4730 details->flTitle = CFA_FITITLEREADONLY; | |
| 4731 details->pTitleData = titles[z]; | |
| 4732 details->offStruct = offStruct[z]; | |
| 4733 details = details->pNextFieldInfo; | |
| 4734 } | |
| 4735 | |
| 4736 detin.cb = sizeof(FIELDINFOINSERT); | |
| 4737 detin.fInvalidateFieldInfo = FALSE; | |
| 4738 detin.pFieldInfoOrder = (PFIELDINFO) CMA_FIRST; | |
| 4739 detin.cFieldInfoInsert = (ULONG)count; | |
| 4740 | |
| 4741 WinSendMsg(handle, CM_INSERTDETAILFIELDINFO, MPFROMP(first), MPFROMP(&detin)); | |
| 4742 | |
|
18
f1002d51d959
Fixed a container problem on OS/2 with separator set to 0.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
16
diff
changeset
|
4743 if(count > separator && separator > 0) |
| 3 | 4744 { |
| 4745 cnri.cb = sizeof(CNRINFO); | |
| 4746 cnri.pFieldInfoLast = left; | |
| 4747 cnri.xVertSplitbar = 150; | |
| 4748 | |
| 4749 WinSendMsg(handle, CM_SETCNRINFO, MPFROMP(&cnri), MPFROMLONG(CMA_PFIELDINFOLAST | CMA_XVERTSPLITBAR)); | |
| 4750 } | |
| 4751 | |
| 4752 free(offStruct); | |
| 4753 return TRUE; | |
| 4754 } | |
| 4755 | |
| 4756 /* | |
| 4757 * Sets up the filesystem columns, note: filesystem always has an icon/filename field. | |
| 4758 * Parameters: | |
| 4759 * handle: Handle to the container to be configured. | |
| 4760 * flags: An array of unsigned longs with column flags. | |
| 4761 * titles: An array of strings with column text titles. | |
| 4762 * count: The number of columns (this should match the arrays). | |
| 4763 */ | |
| 4764 int dw_filesystem_setup(HWND handle, unsigned long *flags, char **titles, int count) | |
| 4765 { | |
| 4766 char **newtitles = malloc(sizeof(char *) * (count + 2)); | |
| 4767 unsigned long *newflags = malloc(sizeof(unsigned long) * (count + 2)); | |
| 4768 | |
| 4769 newtitles[0] = "Icon"; | |
| 4770 newtitles[1] = "Filename"; | |
| 4771 | |
| 4772 newflags[0] = DW_CFA_BITMAPORICON | DW_CFA_CENTER | DW_CFA_HORZSEPARATOR | DW_CFA_SEPARATOR; | |
| 4773 newflags[1] = DW_CFA_STRING | DW_CFA_LEFT | DW_CFA_HORZSEPARATOR; | |
| 4774 | |
| 4775 memcpy(&newtitles[2], titles, sizeof(char *) * count); | |
| 4776 memcpy(&newflags[2], flags, sizeof(unsigned long) * count); | |
| 4777 | |
| 4778 dw_container_setup(handle, newflags, newtitles, count + 2, 2); | |
| 4779 | |
| 4780 free(newtitles); | |
| 4781 free(newflags); | |
| 4782 return TRUE; | |
| 4783 } | |
| 4784 | |
| 4785 /* | |
| 4786 * Obtains an icon from a module (or header in GTK). | |
| 4787 * Parameters: | |
| 4788 * module: Handle to module (DLL) in OS/2 and Windows. | |
| 4789 * id: A unsigned long id int the resources on OS/2 and | |
| 4790 * Windows, on GTK this is converted to a pointer | |
| 4791 * to an embedded XPM. | |
| 4792 */ | |
| 4793 unsigned long dw_icon_load(unsigned long module, unsigned long id) | |
| 4794 { | |
| 4795 return WinLoadPointer(HWND_DESKTOP,module,id); | |
| 4796 } | |
| 4797 | |
| 4798 /* | |
| 4799 * Frees a loaded resource in OS/2 and Windows. | |
| 4800 * Parameters: | |
| 4801 * handle: Handle to icon returned by dw_icon_load(). | |
| 4802 */ | |
| 4803 void dw_icon_free(unsigned long handle) | |
| 4804 { | |
| 4805 WinDestroyPointer(handle); | |
| 4806 } | |
| 4807 | |
| 4808 /* | |
| 4809 * Allocates memory used to populate a container. | |
| 4810 * Parameters: | |
| 4811 * handle: Handle to the container window (widget). | |
| 4812 * rowcount: The number of items to be populated. | |
| 4813 */ | |
| 4814 void *dw_container_alloc(HWND handle, int rowcount) | |
| 4815 { | |
| 4816 ULONG *flags = (ULONG *)WinQueryWindowPtr(handle, 0); | |
| 4817 int z, size = 0, totalsize, count = 0; | |
| 4818 PRECORDCORE temp; | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4819 ContainerInfo *ci; |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4820 void *blah = NULL; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4821 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4822 if(!flags || rowcount < 1) |
| 3 | 4823 return NULL; |
| 4824 | |
| 4825 while(flags[count]) | |
| 4826 count++; | |
| 4827 | |
| 4828 /* Figure out the offsets to the items in the struct */ | |
| 4829 for(z=0;z<count;z++) | |
| 4830 { | |
| 4831 if(flags[z] & DW_CFA_BITMAPORICON) | |
| 4832 size += sizeof(HPOINTER); | |
| 4833 else if(flags[z] & DW_CFA_STRING) | |
| 4834 size += sizeof(char *); | |
| 4835 else if(flags[z] & DW_CFA_ULONG) | |
| 4836 size += sizeof(ULONG); | |
| 4837 else if(flags[z] & DW_CFA_DATE) | |
| 4838 size += sizeof(CDATE); | |
| 4839 else if(flags[z] & DW_CFA_TIME) | |
| 4840 size += sizeof(CTIME); | |
| 4841 } | |
| 4842 | |
| 4843 totalsize = size + sizeof(RECORDCORE); | |
| 4844 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4845 z = 0; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4846 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4847 while((blah = (void *)WinSendMsg(handle, CM_ALLOCRECORD, MPFROMLONG(size), MPFROMLONG(rowcount))) == NULL) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4848 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4849 z++; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4850 if(z > 5000000) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4851 break; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4852 DosSleep(1); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4853 } |
| 3 | 4854 |
| 4855 if(!blah) | |
| 4856 return NULL; | |
| 4857 | |
| 4858 temp = (PRECORDCORE)blah; | |
| 4859 | |
| 4860 for(z=0;z<rowcount;z++) | |
| 4861 { | |
| 4862 temp->cb = totalsize; | |
| 4863 temp = temp->preccNextRecord; | |
| 4864 } | |
| 4865 | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4866 ci = malloc(sizeof(struct _containerinfo)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4867 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4868 ci->count = rowcount; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4869 ci->data = blah; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4870 ci->handle = handle; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4871 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4872 return (void *)ci; |
| 3 | 4873 } |
| 4874 | |
| 4875 /* | |
| 4876 * Sets an item in specified row and column to the given data. | |
| 4877 * Parameters: | |
| 4878 * handle: Handle to the container window (widget). | |
| 4879 * pointer: Pointer to the allocated memory in dw_container_alloc(). | |
| 4880 * column: Zero based column of data being set. | |
| 4881 * row: Zero based row of data being set. | |
| 4882 * data: Pointer to the data to be added. | |
| 4883 */ | |
| 4884 void dw_container_set_item(HWND handle, void *pointer, int column, int row, void *data) | |
| 4885 { | |
| 4886 ULONG totalsize, size = 0, *flags = (ULONG *)WinQueryWindowPtr(handle, 0); | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4887 int z, currentcount; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4888 ContainerInfo *ci = (ContainerInfo *)pointer; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4889 PRECORDCORE temp; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4890 CNRINFO cnr; |
| 3 | 4891 void *dest; |
| 4892 | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4893 if(!ci) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4894 return; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4895 |
| 3 | 4896 if(!flags) |
| 4897 return; | |
| 4898 | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4899 temp = (PRECORDCORE)ci->data; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4900 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4901 WinSendMsg(handle, CM_QUERYCNRINFO, (MPARAM)&cnr, MPFROMSHORT(sizeof(CNRINFO))); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4902 currentcount = cnr.cRecords; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4903 |
| 3 | 4904 /* Figure out the offsets to the items in the struct */ |
| 4905 for(z=0;z<column;z++) | |
| 4906 { | |
| 4907 if(flags[z] & DW_CFA_BITMAPORICON) | |
| 4908 size += sizeof(HPOINTER); | |
| 4909 else if(flags[z] & DW_CFA_STRING) | |
| 4910 size += sizeof(char *); | |
| 4911 else if(flags[z] & DW_CFA_ULONG) | |
| 4912 size += sizeof(ULONG); | |
| 4913 else if(flags[z] & DW_CFA_DATE) | |
| 4914 size += sizeof(CDATE); | |
| 4915 else if(flags[z] & DW_CFA_TIME) | |
| 4916 size += sizeof(CTIME); | |
| 4917 } | |
| 4918 | |
| 4919 totalsize = size + sizeof(RECORDCORE); | |
| 4920 | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4921 for(z=0;z<(row-currentcount);z++) |
| 3 | 4922 temp = temp->preccNextRecord; |
| 4923 | |
| 4924 dest = (void *)(((ULONG)temp)+((ULONG)totalsize)); | |
| 4925 | |
| 4926 if(flags[column] & DW_CFA_BITMAPORICON) | |
| 4927 memcpy(dest, data, sizeof(HPOINTER)); | |
| 4928 else if(flags[column] & DW_CFA_STRING) | |
| 4929 memcpy(dest, data, sizeof(char *)); | |
| 4930 else if(flags[column] & DW_CFA_ULONG) | |
| 4931 memcpy(dest, data, sizeof(ULONG)); | |
| 4932 else if(flags[column] & DW_CFA_DATE) | |
| 4933 memcpy(dest, data, sizeof(CDATE)); | |
| 4934 else if(flags[column] & DW_CFA_TIME) | |
| 4935 memcpy(dest, data, sizeof(CTIME)); | |
| 4936 } | |
| 4937 | |
| 4938 /* | |
| 4939 * Sets an item in specified row and column to the given data. | |
| 4940 * Parameters: | |
| 4941 * handle: Handle to the container window (widget). | |
| 4942 * pointer: Pointer to the allocated memory in dw_container_alloc(). | |
| 4943 * column: Zero based column of data being set. | |
| 4944 * row: Zero based row of data being set. | |
| 4945 * data: Pointer to the data to be added. | |
| 4946 */ | |
| 4947 void dw_filesystem_set_file(HWND handle, void *pointer, int row, char *filename, unsigned long icon) | |
| 4948 { | |
| 4949 dw_container_set_item(handle, pointer, 0, row, (void *)&icon); | |
| 4950 dw_container_set_item(handle, pointer, 1, row, (void *)&filename); | |
| 4951 } | |
| 4952 | |
| 4953 /* | |
| 4954 * Sets an item in specified row and column to the given data. | |
| 4955 * Parameters: | |
| 4956 * handle: Handle to the container window (widget). | |
| 4957 * pointer: Pointer to the allocated memory in dw_container_alloc(). | |
| 4958 * column: Zero based column of data being set. | |
| 4959 * row: Zero based row of data being set. | |
| 4960 * data: Pointer to the data to be added. | |
| 4961 */ | |
| 4962 void dw_filesystem_set_item(HWND handle, void *pointer, int column, int row, void *data) | |
| 4963 { | |
| 4964 dw_container_set_item(handle, pointer, column + 2, row, data); | |
| 4965 } | |
| 4966 | |
| 4967 /* | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4968 * Sets the width of a column in the container. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4969 * Parameters: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4970 * handle: Handle to window (widget) of container. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4971 * column: Zero based column of width being set. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4972 * width: Width of column in pixels. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4973 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4974 void dw_container_set_column_width(HWND handle, int column, int width) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4975 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4976 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4977 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4978 /* |
| 3 | 4979 * Sets the title of a row in the container. |
| 4980 * Parameters: | |
| 4981 * pointer: Pointer to the allocated memory in dw_container_alloc(). | |
| 4982 * row: Zero based row of data being set. | |
| 4983 * title: String title of the item. | |
| 4984 */ | |
| 4985 void dw_container_set_row_title(void *pointer, int row, char *title) | |
| 4986 { | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4987 ContainerInfo *ci = (ContainerInfo *)pointer; |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4988 PRECORDCORE temp; |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4989 int z, currentcount; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4990 CNRINFO cnr; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4991 |
|
23
2932f9d2c7d5
New OS/2 code from FX changes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
22
diff
changeset
|
4992 if(!ci) |
|
2932f9d2c7d5
New OS/2 code from FX changes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
22
diff
changeset
|
4993 return; |
|
2932f9d2c7d5
New OS/2 code from FX changes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
22
diff
changeset
|
4994 |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4995 temp = (PRECORDCORE)ci->data; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
4996 |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4997 WinSendMsg(ci->handle, CM_QUERYCNRINFO, (MPARAM)&cnr, MPFROMSHORT(sizeof(CNRINFO))); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4998 currentcount = cnr.cRecords; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
4999 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5000 for(z=0;z<(row-currentcount);z++) |
| 3 | 5001 temp = temp->preccNextRecord; |
| 5002 | |
| 5003 temp->pszIcon = title; | |
| 5004 temp->pszName = title; | |
| 5005 temp->pszText = title; | |
| 5006 } | |
| 5007 | |
| 5008 /* | |
| 5009 * Sets the title of a row in the container. | |
| 5010 * Parameters: | |
| 5011 * handle: Handle to the container window (widget). | |
| 5012 * pointer: Pointer to the allocated memory in dw_container_alloc(). | |
| 5013 * rowcount: The number of rows to be inserted. | |
| 5014 */ | |
| 5015 void dw_container_insert(HWND handle, void *pointer, int rowcount) | |
| 5016 { | |
| 5017 RECORDINSERT recin; | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5018 ContainerInfo *ci = (ContainerInfo *)pointer; |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5019 int z; |
| 3 | 5020 |
|
23
2932f9d2c7d5
New OS/2 code from FX changes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
22
diff
changeset
|
5021 if(!ci) |
|
2932f9d2c7d5
New OS/2 code from FX changes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
22
diff
changeset
|
5022 return; |
|
2932f9d2c7d5
New OS/2 code from FX changes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
22
diff
changeset
|
5023 |
| 3 | 5024 recin.cb = sizeof(RECORDINSERT); |
| 5025 recin.pRecordOrder = (PRECORDCORE)CMA_END; | |
| 5026 recin.pRecordParent = NULL; | |
| 5027 recin.zOrder = CMA_TOP; | |
| 5028 recin.fInvalidateRecord = TRUE; | |
| 5029 recin.cRecordsInsert = rowcount; | |
| 5030 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5031 z = 0; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5032 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5033 while(WinSendMsg(handle, CM_INSERTRECORD, MPFROMP(ci->data), MPFROMP(&recin)) == 0) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5034 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5035 z++; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5036 if(z > 5000000) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5037 break; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5038 DosSleep(1); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5039 } |
| 3 | 5040 } |
| 5041 | |
| 5042 /* | |
| 5043 * Removes all rows from a container. | |
| 5044 * Parameters: | |
| 5045 * handle: Handle to the window (widget) to be cleared. | |
| 5046 */ | |
| 5047 void dw_container_clear(HWND handle) | |
| 5048 { | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5049 int z = 0; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5050 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5051 while((int)WinSendMsg(handle, CM_REMOVERECORD, (MPARAM)0L, MPFROM2SHORT(0, CMA_INVALIDATE | CMA_FREE)) == -1) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5052 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5053 z++; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5054 if(z > 5000000) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5055 break; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5056 DosSleep(1); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5057 } |
| 3 | 5058 } |
| 5059 | |
| 5060 /* | |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5061 * Removes the first x rows from a container. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5062 * Parameters: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5063 * handle: Handle to the window (widget) to be deleted from. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5064 * rowcount: The number of rows to be deleted. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5065 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5066 void dw_container_delete(HWND handle, int rowcount) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5067 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5068 RECORDCORE *last, **prc = malloc(sizeof(RECORDCORE *) * rowcount); |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5069 int current = 1, z; |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5070 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5071 prc[0] = last = (RECORDCORE *)WinSendMsg(handle, CM_QUERYRECORD, (MPARAM)0L, MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5072 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5073 while(last && current < rowcount) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5074 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5075 prc[current] = last = (RECORDCORE *)WinSendMsg(handle, CM_QUERYRECORD, (MPARAM)last, MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5076 current++; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5077 } |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5078 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5079 z = 0; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5080 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5081 while((int)WinSendMsg(handle, CM_REMOVERECORD, (MPARAM)prc, MPFROM2SHORT(current, CMA_INVALIDATE | CMA_FREE)) == -1) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5082 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5083 z++; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5084 if(z > 5000000) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5085 break; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5086 DosSleep(1); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5087 } |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5088 |
|
22
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5089 free(prc); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5090 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5091 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5092 /* |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5093 * Scrolls container up or down. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5094 * Parameters: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5095 * handle: Handle to the window (widget) to be scrolled. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5096 * direction: DW_SCROLL_UP, DW_SCROLL_DOWN, DW_SCROLL_TOP or |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5097 * DW_SCROLL_BOTTOM. (rows is ignored for last two) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5098 * rows: The number of rows to be scrolled. |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5099 */ |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5100 void dw_container_scroll(HWND handle, int direction, long rows) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5101 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5102 switch(direction) |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5103 { |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5104 case DW_SCROLL_TOP: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5105 WinSendMsg(handle, CM_SCROLLWINDOW, MPFROMSHORT(CMA_VERTICAL), MPFROMLONG(-10000000)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5106 break; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5107 case DW_SCROLL_BOTTOM: |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5108 WinSendMsg(handle, CM_SCROLLWINDOW, MPFROMSHORT(CMA_VERTICAL), MPFROMLONG(10000000)); |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5109 break; |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5110 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5111 } |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5112 |
|
6a246b3bb14f
Added tree widgets, fixed some delete event processing, fixed a layout bug
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
21
diff
changeset
|
5113 /* |
| 3 | 5114 * Removes all rows from a container. |
| 5115 * Parameters: | |
| 5116 * handle: Handle to the window (widget) to be cleared. | |
| 5117 */ | |
| 5118 void dw_container_set_view(HWND handle, unsigned long flags, int iconwidth, int iconheight) | |
| 5119 { | |
| 5120 CNRINFO cnrinfo; | |
| 5121 | |
| 5122 cnrinfo.flWindowAttr = flags; | |
| 5123 cnrinfo.slBitmapOrIcon.cx = iconwidth; | |
| 5124 cnrinfo.slBitmapOrIcon.cy = iconheight; | |
| 5125 | |
| 5126 WinSendMsg(handle, CM_SETCNRINFO, &cnrinfo, MPFROMLONG(CMA_FLWINDOWATTR | CMA_SLBITMAPORICON)); | |
| 5127 } | |
| 5128 | |
| 5129 /* | |
| 5130 * Starts a new query of a container. | |
| 5131 * Parameters: | |
| 5132 * handle: Handle to the window (widget) to be queried. | |
| 5133 * flags: If this parameter is DW_CRA_SELECTED it will only | |
| 5134 * return items that are currently selected. Otherwise | |
| 5135 * it will return all records in the container. | |
| 5136 */ | |
| 5137 char *dw_container_query_start(HWND handle, unsigned long flags) | |
| 5138 { | |
| 5139 pCore = WinSendMsg(handle, CM_QUERYRECORD, (MPARAM)0L, MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER)); | |
| 5140 if(pCore) | |
| 5141 { | |
| 5142 if(flags) | |
| 5143 { | |
| 5144 while(pCore) | |
| 5145 { | |
| 5146 if(pCore->flRecordAttr & CRA_SELECTED) | |
| 5147 return pCore->pszIcon; | |
| 5148 pCore = WinSendMsg(handle, CM_QUERYRECORD, (MPARAM)pCore, MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER)); | |
| 5149 } | |
| 5150 } | |
| 5151 else | |
| 5152 return pCore->pszIcon; | |
| 5153 } | |
| 5154 return NULL; | |
| 5155 } | |
| 5156 | |
| 5157 /* | |
| 5158 * Continues an existing query of a container. | |
| 5159 * Parameters: | |
| 5160 * handle: Handle to the window (widget) to be queried. | |
| 5161 * flags: If this parameter is DW_CRA_SELECTED it will only | |
| 5162 * return items that are currently selected. Otherwise | |
| 5163 * it will return all records in the container. | |
| 5164 */ | |
| 5165 char *dw_container_query_next(HWND handle, unsigned long flags) | |
| 5166 { | |
| 5167 pCore = WinSendMsg(handle, CM_QUERYRECORD, (MPARAM)pCore, MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER)); | |
| 5168 if(pCore) | |
| 5169 { | |
| 5170 if(flags) | |
| 5171 { | |
| 5172 while(pCore) | |
| 5173 { | |
| 5174 if(pCore->flRecordAttr & CRA_SELECTED) | |
| 5175 return pCore->pszIcon; | |
| 5176 | |
| 5177 pCore = WinSendMsg(handle, CM_QUERYRECORD, (MPARAM)pCore, MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER)); | |
| 5178 } | |
| 5179 } | |
| 5180 else | |
| 5181 return pCore->pszIcon; | |
| 5182 } | |
| 5183 return NULL; | |
| 5184 } | |
| 5185 | |
| 5186 /* | |
| 5187 * Creates a rendering context widget (window) to be packed. | |
| 5188 * Parameters: | |
| 5189 * id: An id to be used with dw_window_from_id. | |
| 5190 * Returns: | |
| 5191 * A handle to the widget or NULL on failure. | |
| 5192 */ | |
| 5193 HWND dw_render_new(unsigned long id) | |
| 5194 { | |
| 5195 HWND hwndframe = WinCreateWindow(HWND_OBJECT, | |
| 5196 WC_FRAME, | |
| 5197 NULL, | |
| 5198 WS_VISIBLE, | |
| 5199 0,0,2000,1000, | |
| 5200 NULLHANDLE, | |
| 5201 HWND_TOP, | |
| 5202 id, | |
| 5203 NULL, | |
| 5204 NULL); | |
| 5205 WinSubclassWindow(hwndframe, _RendProc); | |
| 5206 return hwndframe; | |
| 5207 } | |
| 5208 | |
| 5209 /* Sets the current foreground drawing color. | |
| 5210 * Parameters: | |
| 5211 * red: red value. | |
| 5212 * green: green value. | |
| 5213 * blue: blue value. | |
| 5214 */ | |
| 5215 void dw_color_foreground_set(unsigned long value) | |
| 5216 { | |
| 5217 _foreground = DW_RED_VALUE(value) << 16 | DW_GREEN_VALUE(value) << 8 | DW_BLUE_VALUE(value); | |
| 5218 } | |
| 5219 | |
| 5220 /* Sets the current background drawing color. | |
| 5221 * Parameters: | |
| 5222 * red: red value. | |
| 5223 * green: green value. | |
| 5224 * blue: blue value. | |
| 5225 */ | |
| 5226 void dw_color_background_set(unsigned long value) | |
| 5227 { | |
| 5228 _background = DW_RED_VALUE(value) << 16 | DW_GREEN_VALUE(value) << 8 | DW_BLUE_VALUE(value); | |
| 5229 } | |
| 5230 | |
| 5231 HPS _set_hps(HPS hps) | |
| 5232 { | |
| 5233 LONG alTable[18]; | |
| 5234 | |
| 5235 GpiQueryLogColorTable(hps, 0L, 0L, 18L, alTable); | |
| 5236 | |
| 5237 alTable[16] = _foreground; | |
| 5238 alTable[17] = _background; | |
| 5239 | |
| 5240 GpiCreateLogColorTable(hps, | |
| 5241 0L, | |
| 5242 LCOLF_CONSECRGB, | |
| 5243 0L, | |
| 5244 18, | |
| 5245 alTable); | |
| 5246 GpiSetColor(hps, 16); | |
| 5247 GpiSetBackColor(hps, 17); | |
| 5248 return hps; | |
| 5249 } | |
| 5250 | |
| 5251 HPS _set_colors(HWND handle) | |
| 5252 { | |
| 5253 HPS hps = WinGetPS(handle); | |
| 5254 | |
| 5255 _set_hps(hps); | |
| 5256 return hps; | |
| 5257 } | |
| 5258 | |
| 5259 /* Draw a point on a window (preferably a render window). | |
| 5260 * Parameters: | |
| 5261 * handle: Handle to the window. | |
| 5262 * pixmap: Handle to the pixmap. (choose only one of these) | |
| 5263 * x: X coordinate. | |
| 5264 * y: Y coordinate. | |
| 5265 */ | |
| 5266 void dw_draw_point(HWND handle, HPIXMAP pixmap, int x, int y) | |
| 5267 { | |
| 5268 HPS hps; | |
| 5269 int height; | |
| 5270 POINTL ptl; | |
| 5271 | |
| 5272 if(handle) | |
| 5273 { | |
| 5274 hps = _set_colors(handle); | |
| 5275 height = _get_height(handle); | |
| 5276 } | |
| 5277 else if(pixmap) | |
| 5278 { | |
| 5279 hps = _set_hps(pixmap->hps); | |
| 5280 height = pixmap->height; | |
| 5281 } | |
| 5282 else | |
| 5283 return; | |
| 5284 | |
| 5285 ptl.x = x; | |
| 5286 ptl.y = height - y - 1; | |
| 5287 | |
| 5288 GpiSetPel(hps, &ptl); | |
| 5289 if(!pixmap) | |
| 5290 WinReleasePS(hps); | |
| 5291 } | |
| 5292 | |
| 5293 /* Draw a line on a window (preferably a render window). | |
| 5294 * Parameters: | |
| 5295 * handle: Handle to the window. | |
| 5296 * pixmap: Handle to the pixmap. (choose only one of these) | |
| 5297 * x1: First X coordinate. | |
| 5298 * y1: First Y coordinate. | |
| 5299 * x2: Second X coordinate. | |
| 5300 * y2: Second Y coordinate. | |
| 5301 */ | |
| 5302 void dw_draw_line(HWND handle, HPIXMAP pixmap, int x1, int y1, int x2, int y2) | |
| 5303 { | |
| 5304 HPS hps; | |
| 5305 int height; | |
| 5306 POINTL ptl[2]; | |
| 5307 | |
| 5308 if(handle) | |
| 5309 { | |
| 5310 hps = _set_colors(handle); | |
| 5311 height = _get_height(handle); | |
| 5312 } | |
| 5313 else if(pixmap) | |
| 5314 { | |
| 5315 hps = _set_hps(pixmap->hps); | |
| 5316 height = pixmap->height; | |
| 5317 } | |
| 5318 else | |
| 5319 return; | |
| 5320 | |
| 5321 ptl[0].x = x1; | |
| 5322 ptl[0].y = height - y1 - 1; | |
| 5323 ptl[1].x = x2; | |
| 5324 ptl[1].y = height - y2 - 1; | |
| 5325 | |
| 5326 GpiMove(hps, &ptl[0]); | |
| 5327 GpiLine(hps, &ptl[1]); | |
| 5328 | |
| 5329 if(!pixmap) | |
| 5330 WinReleasePS(hps); | |
| 5331 } | |
| 5332 | |
| 5333 | |
|
9
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5334 void _CopyFontSettings(HPS hpsSrc, HPS hpsDst) |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5335 { |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5336 FONTMETRICS fm; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5337 FATTRS fat; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5338 SIZEF sizf; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5339 |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5340 GpiQueryFontMetrics(hpsSrc, sizeof(FONTMETRICS), &fm); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5341 |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5342 memset(&fat, 0, sizeof(fat)); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5343 |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5344 fat.usRecordLength = sizeof(FATTRS); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5345 fat.lMatch = fm.lMatch; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5346 strcpy(fat.szFacename, fm.szFacename); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5347 |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5348 GpiCreateLogFont(hpsDst, 0, 1L, &fat); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5349 GpiSetCharSet(hpsDst, 1L); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5350 |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5351 sizf.cx = MAKEFIXED(fm.lEmInc,0); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5352 sizf.cy = MAKEFIXED(fm.lMaxBaselineExt,0); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5353 GpiSetCharBox(hpsDst, &sizf ); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5354 } |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5355 |
| 3 | 5356 /* Draw text on a window (preferably a render window). |
| 5357 * Parameters: | |
| 5358 * handle: Handle to the window. | |
| 5359 * pixmap: Handle to the pixmap. (choose only one of these) | |
| 5360 * x: X coordinate. | |
| 5361 * y: Y coordinate. | |
| 5362 * text: Text to be displayed. | |
| 5363 */ | |
| 5364 void dw_draw_text(HWND handle, HPIXMAP pixmap, int x, int y, char *text) | |
| 5365 { | |
| 5366 HPS hps; | |
|
9
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5367 int size = 9, z, height; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5368 RECTL rcl; |
| 3 | 5369 char fontname[128]; |
| 5370 | |
| 5371 if(handle) | |
| 5372 { | |
| 5373 hps = _set_colors(handle); | |
| 5374 height = _get_height(handle); | |
| 5375 _GetPPFont(handle, fontname); | |
| 5376 } | |
| 5377 else if(pixmap) | |
| 5378 { | |
|
9
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5379 HPS pixmaphps = WinGetPS(pixmap->handle); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5380 |
| 3 | 5381 hps = _set_hps(pixmap->hps); |
| 5382 height = pixmap->height; | |
| 5383 _GetPPFont(pixmap->handle, fontname); | |
|
9
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5384 _CopyFontSettings(pixmaphps, hps); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5385 WinReleasePS(pixmaphps); |
| 3 | 5386 } |
| 5387 else | |
| 5388 return; | |
| 5389 | |
| 5390 for(z=0;z<strlen(fontname);z++) | |
| 5391 { | |
| 5392 if(fontname[z]=='.') | |
| 5393 break; | |
| 5394 } | |
| 5395 size = atoi(fontname); | |
| 5396 | |
|
9
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5397 rcl.xLeft = x; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5398 rcl.yTop = height - y; |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5399 rcl.yBottom = rcl.yTop - (size*2); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5400 rcl.xRight = rcl.xLeft + (size * strlen(text)); |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5401 |
|
3383ed751a7e
New font rendering code in dw_draw_text(). Slightly less flexible but
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
8
diff
changeset
|
5402 WinDrawText(hps, -1, text, &rcl, DT_TEXTATTRS, DT_TEXTATTRS, DT_VCENTER | DT_LEFT | DT_TEXTATTRS); |
| 3 | 5403 |
| 5404 if(!pixmap) | |
| 5405 WinReleasePS(hps); | |
| 5406 } | |
| 5407 | |
| 5408 | |
| 5409 | |
| 5410 | |
| 5411 /* Draw a rectangle on a window (preferably a render window). | |
| 5412 * Parameters: | |
| 5413 * handle: Handle to the window. | |
| 5414 * pixmap: Handle to the pixmap. (choose only one of these) | |
| 5415 * fill: Fill box TRUE or FALSE. | |
| 5416 * x: X coordinate. | |
| 5417 * y: Y coordinate. | |
| 5418 * width: Width of rectangle. | |
| 5419 * height: Height of rectangle. | |
| 5420 */ | |
| 5421 void dw_draw_rect(HWND handle, HPIXMAP pixmap, int fill, int x, int y, int width, int height) | |
| 5422 { | |
| 5423 HPS hps; | |
| 5424 int thisheight; | |
| 5425 POINTL ptl[2]; | |
| 5426 | |
| 5427 if(handle) | |
| 5428 { | |
| 5429 hps = _set_colors(handle); | |
| 5430 thisheight = _get_height(handle); | |
| 5431 } | |
| 5432 else if(pixmap) | |
| 5433 { | |
| 5434 hps = _set_hps(pixmap->hps); | |
| 5435 thisheight = pixmap->height; | |
| 5436 } | |
| 5437 else | |
| 5438 return; | |
| 5439 | |
| 5440 ptl[0].x = x; | |
| 5441 ptl[0].y = thisheight - y - 1; | |
| 5442 ptl[1].x = x + width - 1; | |
| 5443 ptl[1].y = thisheight - y - height; | |
| 5444 | |
| 5445 GpiMove(hps, &ptl[0]); | |
| 5446 GpiBox(hps, fill ? DRO_OUTLINEFILL : DRO_OUTLINE, &ptl[1], 0, 0); | |
| 5447 | |
| 5448 if(!pixmap) | |
| 5449 WinReleasePS(hps); | |
| 5450 } | |
| 5451 | |
| 5452 /* Call this after drawing to the screen to make sure | |
| 5453 * anything you have drawn is visible. | |
| 5454 */ | |
| 5455 void dw_flush(void) | |
| 5456 { | |
| 5457 } | |
| 5458 | |
| 5459 /* | |
| 5460 * Creates a pixmap with given parameters. | |
| 5461 * Parameters: | |
| 5462 * handle: Window handle the pixmap is associated with. | |
| 5463 * width: Width of the pixmap in pixels. | |
| 5464 * height: Height of the pixmap in pixels. | |
| 5465 * depth: Color depth of the pixmap. | |
| 5466 * Returns: | |
| 5467 * A handle to a pixmap or NULL on failure. | |
| 5468 */ | |
| 5469 HPIXMAP dw_pixmap_new(HWND handle, unsigned long width, unsigned long height, int depth) | |
| 5470 { | |
| 5471 BITMAPINFOHEADER bmih; | |
| 5472 SIZEL sizl = { 0, 0 }; | |
| 5473 HPIXMAP pixmap; | |
| 5474 HDC hdc; | |
| 5475 HPS hps; | |
| 5476 ULONG ulFlags; | |
| 5477 LONG cPlanes, cBitCount; | |
| 5478 | |
| 5479 if (!(pixmap = calloc(1,sizeof(struct _hpixmap)))) | |
| 5480 return NULL; | |
| 5481 | |
| 5482 hps = WinGetPS(handle); | |
| 5483 | |
| 5484 hdc = GpiQueryDevice(hps); | |
| 5485 ulFlags = GpiQueryPS(hps, &sizl); | |
| 5486 | |
| 5487 pixmap->handle = handle; | |
| 5488 pixmap->hdc = DevOpenDC(dwhab, OD_MEMORY, "*", 0L, NULL, hdc); | |
| 5489 pixmap->hps = GpiCreatePS (dwhab, pixmap->hdc, &sizl, ulFlags | GPIA_ASSOC); | |
| 5490 | |
| 5491 DevQueryCaps(hdc, CAPS_COLOR_PLANES , 1L, &cPlanes); | |
| 5492 if (!depth) | |
| 5493 { | |
| 5494 DevQueryCaps(hdc, CAPS_COLOR_BITCOUNT, 1L, &cBitCount); | |
| 5495 depth = cBitCount; | |
| 5496 } | |
| 5497 | |
| 5498 memset(&bmih, 0, sizeof(BITMAPINFOHEADER)); | |
| 5499 bmih.cbFix = sizeof(BITMAPINFOHEADER); | |
| 5500 bmih.cx = (SHORT)width; | |
| 5501 bmih.cy = (SHORT)height; | |
| 5502 bmih.cPlanes = (SHORT)cPlanes; | |
| 5503 bmih.cBitCount = (SHORT)depth; | |
| 5504 | |
| 5505 pixmap->width = width; pixmap->height = height; | |
| 5506 | |
| 5507 pixmap->hbm = GpiCreateBitmap(pixmap->hps, (PBITMAPINFOHEADER2)&bmih, 0L, NULL, NULL); | |
| 5508 | |
| 5509 GpiSetBitmap(pixmap->hps, pixmap->hbm); | |
| 5510 | |
| 5511 if (depth>8) | |
| 5512 GpiCreateLogColorTable(pixmap->hps, LCOL_PURECOLOR, LCOLF_RGB, 0, 0, NULL ); | |
| 5513 | |
| 5514 WinReleasePS(hps); | |
| 5515 | |
| 5516 return pixmap; | |
| 5517 } | |
| 5518 | |
| 5519 /* | |
| 5520 * Creates a pixmap from internal resource graphic specified by id. | |
| 5521 * Parameters: | |
| 5522 * handle: Window handle the pixmap is associated with. | |
| 5523 * id: Resource ID associated with requested pixmap. | |
| 5524 * Returns: | |
| 5525 * A handle to a pixmap or NULL on failure. | |
| 5526 */ | |
| 5527 HPIXMAP dw_pixmap_grab(HWND handle, ULONG id) | |
| 5528 { | |
| 5529 BITMAPINFOHEADER bmih; | |
| 5530 SIZEL sizl = { 0, 0 }; | |
| 5531 HPIXMAP pixmap; | |
| 5532 HDC hdc; | |
| 5533 HPS hps; | |
| 5534 ULONG ulFlags; | |
| 5535 | |
| 5536 if (!(pixmap = calloc(1,sizeof(struct _hpixmap)))) | |
| 5537 return NULL; | |
| 5538 | |
| 5539 hps = WinGetPS(handle); | |
| 5540 | |
| 5541 hdc = GpiQueryDevice(hps); | |
| 5542 ulFlags = GpiQueryPS(hps, &sizl); | |
| 5543 | |
| 5544 pixmap->hdc = DevOpenDC(dwhab, OD_MEMORY, "*", 0L, NULL, hdc); | |
| 5545 pixmap->hps = GpiCreatePS (dwhab, pixmap->hdc, &sizl, ulFlags | GPIA_ASSOC); | |
| 5546 | |
| 5547 pixmap->hbm = GpiLoadBitmap(pixmap->hps, NULLHANDLE, id, 0, 0); | |
| 5548 | |
| 5549 GpiQueryBitmapParameters(pixmap->hbm, &bmih); | |
| 5550 | |
| 5551 GpiSetBitmap(pixmap->hps, pixmap->hbm); | |
| 5552 | |
| 5553 pixmap->width = bmih.cx; pixmap->height = bmih.cy; | |
| 5554 | |
| 5555 WinReleasePS(hps); | |
| 5556 | |
| 5557 return pixmap; | |
| 5558 } | |
| 5559 | |
| 5560 /* | |
| 5561 * Destroys an allocated pixmap. | |
| 5562 * Parameters: | |
| 5563 * pixmap: Handle to a pixmap returned by | |
| 5564 * dw_pixmap_new.. | |
| 5565 */ | |
| 5566 void dw_pixmap_destroy(HPIXMAP pixmap) | |
| 5567 { | |
| 5568 GpiSetBitmap(pixmap->hps, NULLHANDLE); | |
| 5569 GpiDeleteBitmap(pixmap->hbm); | |
| 5570 GpiAssociate(pixmap->hps, NULLHANDLE); | |
| 5571 GpiDestroyPS(pixmap->hps); | |
| 5572 DevCloseDC(pixmap->hdc); | |
| 5573 free(pixmap); | |
| 5574 } | |
| 5575 | |
| 5576 /* | |
| 5577 * Copies from one item to another. | |
| 5578 * Parameters: | |
| 5579 * dest: Destination window handle. | |
| 5580 * destp: Destination pixmap. (choose only one). | |
| 5581 * xdest: X coordinate of destination. | |
| 5582 * ydest: Y coordinate of destination. | |
| 5583 * width: Width of area to copy. | |
| 5584 * height: Height of area to copy. | |
| 5585 * src: Source window handle. | |
| 5586 * srcp: Source pixmap. (choose only one). | |
| 5587 * xsrc: X coordinate of source. | |
| 5588 * ysrc: Y coordinate of source. | |
| 5589 */ | |
| 5590 void dw_pixmap_bitblt(HWND dest, HPIXMAP destp, int xdest, int ydest, int width, int height, HWND src, HPIXMAP srcp, int xsrc, int ysrc) | |
| 5591 { | |
| 5592 HPS hpsdest; | |
| 5593 HPS hpssrc; | |
| 5594 POINTL ptl[4]; | |
| 5595 int destheight, srcheight; | |
| 5596 | |
| 5597 if(dest) | |
| 5598 { | |
| 5599 hpsdest = WinGetPS(dest); | |
| 5600 destheight = _get_height(dest); | |
| 5601 } | |
| 5602 else if(destp) | |
| 5603 { | |
| 5604 hpsdest = destp->hps; | |
| 5605 destheight = destp->height; | |
| 5606 } | |
| 5607 else | |
| 5608 return; | |
| 5609 | |
| 5610 if(src) | |
| 5611 { | |
| 5612 hpssrc = WinGetPS(src); | |
| 5613 srcheight = _get_height(src); | |
| 5614 } | |
| 5615 else if(srcp) | |
| 5616 { | |
| 5617 hpssrc = srcp->hps; | |
| 5618 srcheight = srcp->height; | |
| 5619 } | |
| 5620 else | |
| 5621 { | |
| 5622 if(!destp) | |
| 5623 WinReleasePS(hpsdest); | |
| 5624 return; | |
| 5625 } | |
| 5626 | |
| 5627 ptl[0].x = xdest; | |
| 5628 ptl[0].y = (destheight - ydest) - height; | |
| 5629 ptl[1].x = ptl[0].x + width; | |
| 5630 ptl[1].y = destheight - ydest; | |
| 5631 ptl[2].x = xsrc; | |
| 5632 ptl[2].y = srcheight - (ysrc + height); | |
| 5633 ptl[3].x = ptl[2].x + width; | |
| 5634 ptl[3].y = ptl[2].y + height; | |
| 5635 | |
| 5636 GpiBitBlt(hpsdest, hpssrc, 4, ptl, ROP_SRCCOPY, BBO_IGNORE); | |
| 5637 | |
| 5638 if(!destp) | |
| 5639 WinReleasePS(hpsdest); | |
| 5640 if(!srcp) | |
| 5641 WinReleasePS(hpssrc); | |
| 5642 } | |
| 5643 | |
| 5644 /* | |
| 5645 * Emits a beep. | |
| 5646 * Parameters: | |
| 5647 * freq: Frequency. | |
| 5648 * dur: Duration. | |
| 5649 */ | |
| 5650 void dw_beep(int freq, int dur) | |
| 5651 { | |
| 5652 DosBeep(freq, dur); | |
| 5653 } | |
| 5654 | |
| 5655 /* | |
| 5656 * Returns the handle to an unnamed mutex semaphore. | |
| 5657 */ | |
| 5658 HMTX dw_mutex_new(void) | |
| 5659 { | |
| 5660 HMTX mutex; | |
| 5661 | |
| 5662 DosCreateMutexSem(NULL, &mutex, 0, FALSE); | |
| 5663 return mutex; | |
| 5664 } | |
| 5665 | |
| 5666 /* | |
| 5667 * Closes a semaphore created by dw_mutex_new(). | |
| 5668 * Parameters: | |
| 5669 * mutex: The handle to the mutex returned by dw_mutex_new(). | |
| 5670 */ | |
| 5671 void dw_mutex_close(HMTX mutex) | |
| 5672 { | |
| 5673 DosCloseMutexSem(mutex); | |
| 5674 } | |
| 5675 | |
| 5676 /* | |
| 5677 * Tries to gain access to the semaphore, if it can't it blocks. | |
| 5678 * Parameters: | |
| 5679 * mutex: The handle to the mutex returned by dw_mutex_new(). | |
| 5680 */ | |
| 5681 void dw_mutex_lock(HMTX mutex) | |
| 5682 { | |
| 5683 DosRequestMutexSem(mutex, SEM_INDEFINITE_WAIT); | |
| 5684 } | |
| 5685 | |
| 5686 /* | |
| 5687 * Reliquishes the access to the semaphore. | |
| 5688 * Parameters: | |
| 5689 * mutex: The handle to the mutex returned by dw_mutex_new(). | |
| 5690 */ | |
| 5691 void dw_mutex_unlock(HMTX mutex) | |
| 5692 { | |
| 5693 DosReleaseMutexSem(mutex); | |
| 5694 } | |
| 5695 | |
| 5696 /* | |
| 5697 * Returns the handle to an unnamed event semaphore. | |
| 5698 */ | |
| 5699 HEV dw_event_new(void) | |
| 5700 { | |
| 5701 HEV blah; | |
| 5702 | |
| 5703 if(DosCreateEventSem (NULL, &blah, 0L, FALSE)) | |
| 5704 return 0; | |
| 5705 | |
| 5706 return blah; | |
| 5707 } | |
| 5708 | |
| 5709 /* | |
| 5710 * Resets a semaphore created by dw_event_new(). | |
| 5711 * Parameters: | |
| 5712 * eve: The handle to the event returned by dw_event_new(). | |
| 5713 */ | |
| 5714 int dw_event_reset(HEV eve) | |
| 5715 { | |
| 5716 ULONG count; | |
| 5717 | |
| 5718 if(DosResetEventSem(eve, &count)) | |
| 5719 return FALSE; | |
| 5720 return TRUE; | |
| 5721 } | |
| 5722 | |
| 5723 /* | |
| 5724 * Posts a semaphore created by dw_event_new(). Causing all threads | |
| 5725 * waiting on this event in dw_event_wait to continue. | |
| 5726 * Parameters: | |
| 5727 * eve: The handle to the event returned by dw_event_new(). | |
| 5728 */ | |
| 5729 int dw_event_post(HEV eve) | |
| 5730 { | |
| 5731 if(DosPostEventSem(eve)) | |
| 5732 return FALSE; | |
| 5733 return TRUE; | |
| 5734 } | |
| 5735 | |
| 5736 | |
| 5737 /* | |
| 5738 * Waits on a semaphore created by dw_event_new(), until the | |
| 5739 * event gets posted or until the timeout expires. | |
| 5740 * Parameters: | |
| 5741 * eve: The handle to the event returned by dw_event_new(). | |
| 5742 */ | |
| 5743 int dw_event_wait(HEV eve, unsigned long timeout) | |
| 5744 { | |
| 5745 int rc = DosWaitEventSem(eve, timeout); | |
| 5746 if(!rc) | |
| 5747 return 1; | |
| 5748 if(rc == ERROR_TIMEOUT) | |
| 5749 return -1; | |
| 5750 return 0; | |
| 5751 } | |
| 5752 | |
| 5753 /* | |
| 5754 * Closes a semaphore created by dw_event_new(). | |
| 5755 * Parameters: | |
| 5756 * eve: The handle to the event returned by dw_event_new(). | |
| 5757 */ | |
| 5758 int dw_event_close(HEV *eve) | |
| 5759 { | |
| 5760 if(!eve || ~DosCloseEventSem(*eve)) | |
| 5761 return FALSE; | |
| 5762 return TRUE; | |
| 5763 } | |
| 5764 | |
| 5765 /* | |
| 5766 * Encapsulate the message queues on OS/2. | |
| 5767 */ | |
| 5768 void _dwthreadstart(void *data) | |
| 5769 { | |
| 5770 HAB thishab = WinInitialize(0); | |
| 5771 HMQ thishmq = WinCreateMsgQueue(dwhab, 0); | |
| 5772 void (*threadfunc)(void *) = NULL; | |
| 5773 void **tmp = (void **)data; | |
| 5774 | |
| 5775 threadfunc = (void (*)(void *))tmp[0]; | |
| 5776 threadfunc(tmp[1]); | |
| 5777 | |
| 5778 free(tmp); | |
| 5779 | |
| 5780 WinDestroyMsgQueue(thishmq); | |
| 5781 WinTerminate(thishab); | |
| 5782 } | |
| 5783 | |
| 5784 /* | |
| 5785 * Creates a new thread with a starting point of func. | |
| 5786 * Parameters: | |
| 5787 * func: Function which will be run in the new thread. | |
| 5788 * data: Parameter(s) passed to the function. | |
| 5789 * stack: Stack size of new thread (OS/2 and Windows only). | |
| 5790 */ | |
| 5791 DWTID dw_thread_new(void *func, void *data, int stack) | |
| 5792 { | |
| 5793 void **tmp = malloc(sizeof(void *) * 2); | |
| 5794 | |
| 5795 tmp[0] = func; | |
| 5796 tmp[1] = data; | |
| 5797 | |
| 5798 return (DWTID)_beginthread((void (*)(void *))_dwthreadstart, NULL, stack, (void *)tmp); | |
| 5799 } | |
| 5800 | |
| 5801 /* | |
| 5802 * Ends execution of current thread immediately. | |
| 5803 */ | |
| 5804 void dw_thread_end(void) | |
| 5805 { | |
| 5806 _endthread(); | |
| 5807 } | |
| 5808 | |
| 5809 /* | |
| 5810 * Returns the current thread's ID. | |
| 5811 */ | |
| 5812 DWTID dw_thread_id(void) | |
| 5813 { | |
| 5814 return (DWTID)_threadid; | |
| 5815 } | |
| 5816 | |
| 5817 /* | |
| 5818 * Cleanly terminates a DW session, should be signal handler safe. | |
| 5819 * Parameters: | |
| 5820 * exitcode: Exit code reported to the operating system. | |
| 5821 */ | |
| 5822 void dw_exit(int exitcode) | |
| 5823 { | |
| 5824 /* In case we are in a signal handler, don't | |
| 5825 * try to free memory that could possibly be | |
| 5826 * free()'d by the runtime already. | |
| 5827 */ | |
| 5828 #ifndef NO_SIGNALS | |
| 5829 Root = NULL; | |
| 5830 #endif | |
| 5831 exit(exitcode); | |
| 5832 } | |
| 5833 | |
| 5834 /* | |
| 5835 * Pack a splitbar (sizer) into the specified box from the start. | |
| 5836 * Parameters: | |
| 5837 * box: Window handle of the box to be packed into. | |
| 5838 */ | |
| 5839 void dw_box_pack_splitbar_start(HWND box) | |
| 5840 { | |
| 5841 Box *thisbox; | |
| 5842 | |
| 5843 if(WinWindowFromID(box, FID_CLIENT)) | |
| 5844 { | |
| 5845 box = WinWindowFromID(box, FID_CLIENT); | |
| 5846 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5847 } | |
| 5848 else | |
| 5849 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5850 if(thisbox) | |
| 5851 { | |
| 5852 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 5853 SplitbarClassName, | |
| 5854 NULL, | |
| 5855 WS_VISIBLE, | |
| 5856 0,0,2000,1000, | |
| 5857 NULLHANDLE, | |
| 5858 HWND_TOP, | |
| 5859 0L, | |
| 5860 NULL, | |
| 5861 NULL); | |
| 5862 if(thisbox->type == BOXVERT) | |
| 5863 dw_box_pack_start(box, tmp, 1, SPLITBAR_WIDTH, TRUE, FALSE, 0); | |
| 5864 else | |
| 5865 dw_box_pack_start(box, tmp, SPLITBAR_WIDTH, 1, FALSE, TRUE, 0); | |
| 5866 | |
| 5867 } | |
| 5868 } | |
| 5869 | |
| 5870 /* | |
| 5871 * Pack a splitbar (sizer) into the specified box from the end. | |
| 5872 * Parameters: | |
| 5873 * box: Window handle of the box to be packed into. | |
| 5874 */ | |
| 5875 void dw_box_pack_splitbar_end(HWND box) | |
| 5876 { | |
| 5877 Box *thisbox; | |
| 5878 | |
| 5879 if(WinWindowFromID(box, FID_CLIENT)) | |
| 5880 { | |
| 5881 box = WinWindowFromID(box, FID_CLIENT); | |
| 5882 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5883 } | |
| 5884 else | |
| 5885 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5886 if(thisbox) | |
| 5887 { | |
| 5888 HWND tmp = WinCreateWindow(HWND_OBJECT, | |
| 5889 SplitbarClassName, | |
| 5890 NULL, | |
| 5891 WS_VISIBLE, | |
| 5892 0,0,2000,1000, | |
| 5893 NULLHANDLE, | |
| 5894 HWND_TOP, | |
| 5895 0L, | |
| 5896 NULL, | |
| 5897 NULL); | |
| 5898 if(thisbox->type == BOXVERT) | |
| 5899 dw_box_pack_end(box, tmp, 1, SPLITBAR_WIDTH, TRUE, FALSE, 0); | |
| 5900 else | |
| 5901 dw_box_pack_end(box, tmp, SPLITBAR_WIDTH, 1, FALSE, TRUE, 0); | |
| 5902 | |
| 5903 } | |
| 5904 } | |
| 5905 | |
| 5906 /* | |
| 5907 * Pack windows (widgets) into a box from the start (or top). | |
| 5908 * Parameters: | |
| 5909 * box: Window handle of the box to be packed into. | |
| 5910 * item: Window handle of the item to be back. | |
| 5911 * width: Width in pixels of the item or -1 to be self determined. | |
| 5912 * height: Height in pixels of the item or -1 to be self determined. | |
| 5913 * hsize: TRUE if the window (widget) should expand horizontally to fill space given. | |
| 5914 * vsize: TRUE if the window (widget) should expand vertically to fill space given. | |
| 5915 * pad: Number of pixels of padding around the item. | |
| 5916 */ | |
| 5917 void dw_box_pack_start(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad) | |
| 5918 { | |
| 5919 Box *thisbox; | |
| 5920 | |
| 5921 if(WinWindowFromID(box, FID_CLIENT)) | |
| 5922 { | |
| 5923 box = WinWindowFromID(box, FID_CLIENT); | |
| 5924 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5925 } | |
| 5926 else | |
| 5927 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5928 if(thisbox) | |
| 5929 { | |
| 5930 if(thisbox->type == BOXHORZ) | |
| 5931 dw_box_pack_end_stub(box, item, width, height, hsize, vsize, pad); | |
| 5932 else | |
| 5933 dw_box_pack_start_stub(box, item, width, height, hsize, vsize, pad); | |
| 5934 } | |
| 5935 } | |
| 5936 | |
| 5937 void dw_box_pack_start_stub(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad) | |
| 5938 { | |
| 5939 HWND boxowner = NULLHANDLE; | |
| 5940 Box *thisbox; | |
| 5941 | |
| 5942 if(WinWindowFromID(box, FID_CLIENT)) | |
| 5943 { | |
| 5944 box = WinWindowFromID(box, FID_CLIENT); | |
| 5945 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5946 hsize = TRUE; | |
| 5947 vsize = TRUE; | |
| 5948 } | |
| 5949 else | |
| 5950 thisbox = WinQueryWindowPtr(box, QWP_USER); | |
| 5951 if(thisbox) | |
| 5952 { | |
| 5953 int z; | |
| 5954 Item *tmpitem, *thisitem = thisbox->items; | |
| 5955 char tmpbuf[100]; | |
| 5956 | |
| 5957 tmpitem = malloc(sizeof(Item)*(thisbox->count+1)); | |
| 5958 | |
| 5959 for(z=0;z<thisbox->count;z++) | |
| 5960 { | |
| 5961 tmpitem[z+1] = thisitem[z]; | |
| 5962 } | |
| 5963 | |
| 5964 WinQueryClassName(item, 99, tmpbuf); | |
| 5965 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
5966 if(strncmp(tmpbuf, "#1", 3)==0) |
| 3 | 5967 tmpitem[0].type = TYPEBOX; |
| 5968 else | |
| 5969 tmpitem[0].type = TYPEITEM; | |
| 5970 | |
| 5971 tmpitem[0].hwnd = item; | |
| 5972 tmpitem[0].origwidth = tmpitem[0].width = width; | |
| 5973 tmpitem[0].origheight = tmpitem[0].height = height; | |
| 5974 tmpitem[0].pad = pad; | |
| 5975 if(hsize) | |
| 5976 tmpitem[0].hsize = SIZEEXPAND; | |
| 5977 else | |
| 5978 tmpitem[0].hsize = SIZESTATIC; | |
| 5979 | |
| 5980 if(vsize) | |
| 5981 tmpitem[0].vsize = SIZEEXPAND; | |
| 5982 else | |
| 5983 tmpitem[0].vsize = SIZESTATIC; | |
| 5984 | |
| 5985 thisbox->items = tmpitem; | |
| 5986 | |
| 5987 if(thisbox->count) | |
| 5988 free(thisitem); | |
| 5989 | |
| 5990 thisbox->count++; | |
| 5991 | |
| 5992 WinQueryClassName(item, 99, tmpbuf); | |
|
37
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
5993 /* Don't set the ownership if it's an entryfield or spinbutton */ |
|
360bc6a5f1c9
Sync with latest Dynamic Windows code.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
34
diff
changeset
|
5994 if(strncmp(tmpbuf, "#6", 3)!=0 && strncmp(tmpbuf, "#32", 3)!=0) |
| 3 | 5995 { |
| 5996 if((boxowner = WinQueryWindow(box, QW_OWNER)) != 0) | |
| 5997 WinSetOwner(item, boxowner); | |
| 5998 else | |
| 5999 WinSetOwner(item, box); | |
| 6000 } | |
| 6001 WinSetParent(item, box, FALSE); | |
| 6002 } | |
| 6003 } | |
| 6004 | |
| 6005 /* The following two functions graciously contributed by Peter Nielsen. */ | |
| 6006 static ULONG _ParseBuildLevel (char* pchBuffer, ULONG ulSize) { | |
| 6007 char* pchStart = pchBuffer; | |
| 6008 char* pchEnd = pchStart + ulSize - 2; | |
| 6009 | |
| 6010 while (pchEnd >= pchStart) | |
| 6011 { | |
| 6012 if ((pchEnd[0] == '#') && (pchEnd[1] == '@')) | |
| 6013 { | |
| 6014 *pchEnd-- = '\0'; | |
| 6015 while (pchEnd >= pchStart) | |
| 6016 { | |
| 6017 if ((pchEnd[0] == '@') && (pchEnd[1] == '#')) | |
| 6018 { | |
| 6019 ULONG ulMajor = 0; | |
| 6020 ULONG ulMinor = 0; | |
| 6021 | |
| 6022 char* pch = pchEnd + 2; | |
| 6023 while (!isdigit (*pch) && *pch) | |
| 6024 pch++; | |
| 6025 | |
| 6026 while (isdigit (*pch)) | |
| 6027 ulMajor = ulMajor * 10 + *pch++ - '0'; | |
| 6028 | |
| 6029 if (*pch == '.') | |
| 6030 { | |
| 6031 while (isdigit (*++pch)) | |
| 6032 ulMinor = ulMinor * 10 + *pch - '0'; | |
| 6033 } | |
| 6034 return ((ulMajor << 16) | ulMinor); | |
| 6035 } | |
| 6036 pchEnd--; | |
| 6037 } | |
| 6038 } | |
| 6039 pchEnd--; | |
| 6040 } | |
| 6041 return (0); | |
| 6042 } | |
| 6043 | |
| 6044 ULONG _GetSystemBuildLevel(void) { | |
| 6045 /* The build level info is normally available in the end of the OS2KRNL file. However, this is not the case in some beta versions of OS/2. | |
| 6046 * We first try to find the info in the 256 last bytes of the file. If that fails, we load the entire file and search it completely. | |
| 6047 */ | |
| 6048 ULONG ulBootDrive = 0; | |
| 6049 ULONG ulBuild = 0; | |
| 6050 if (DosQuerySysInfo (QSV_BOOT_DRIVE, QSV_BOOT_DRIVE, &ulBootDrive, sizeof (ulBootDrive)) == NO_ERROR) | |
| 6051 { | |
| 6052 char achFileName[11] = { (char)('A'+ulBootDrive-1),':','\\','O','S','2','K','R','N','L','\0' }; | |
| 6053 HFILE hfile; | |
| 6054 ULONG ulResult; | |
| 6055 if (DosOpen (achFileName, &hfile, &ulResult, 0, 0, OPEN_ACTION_FAIL_IF_NEW | OPEN_ACTION_OPEN_IF_EXISTS, OPEN_FLAGS_FAIL_ON_ERROR | OPEN_FLAGS_NO_CACHE | OPEN_FLAGS_SEQUENTIAL | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READONLY, NULL) == NO_ERROR) | |
| 6056 { | |
| 6057 ULONG ulFileSize = 0; | |
| 6058 if (DosSetFilePtr (hfile, 0, FILE_END, &ulFileSize) == NO_ERROR) | |
| 6059 { | |
| 6060 const ULONG ulFirstTry = min (256, ulFileSize); | |
| 6061 if (DosSetFilePtr (hfile, -(LONG)ulFirstTry, FILE_END, &ulResult) == NO_ERROR) | |
| 6062 { | |
| 6063 char *pchBuffer = malloc(ulFirstTry); | |
| 6064 if (DosRead (hfile, pchBuffer, ulFirstTry, &ulResult) == NO_ERROR) | |
| 6065 { | |
| 6066 ulBuild = _ParseBuildLevel (pchBuffer, ulFirstTry); | |
| 6067 if (ulBuild == 0) | |
| 6068 { | |
| 6069 if (DosSetFilePtr (hfile, 0, FILE_BEGIN, &ulResult) == NO_ERROR) | |
| 6070 { | |
| 6071 free(pchBuffer); | |
| 6072 pchBuffer = malloc(ulFileSize); | |
| 6073 | |
| 6074 if (DosRead (hfile, pchBuffer, ulFileSize, &ulResult) == NO_ERROR) | |
| 6075 ulBuild = _ParseBuildLevel (pchBuffer, ulFileSize); | |
| 6076 } | |
| 6077 } | |
| 6078 } | |
| 6079 free(pchBuffer); | |
| 6080 } | |
| 6081 } | |
| 6082 DosClose (hfile); | |
| 6083 } | |
| 6084 } | |
| 6085 return (ulBuild); | |
| 6086 } | |
| 6087 | |
|
34
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6088 /* |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6089 * Sets the default focus item for a window/dialog. |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6090 * Parameters: |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6091 * window: Toplevel window or dialog. |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6092 * defaultitem: Handle to the dialog item to be default. |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6093 */ |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6094 void dw_window_default(HWND window, HWND defaultitem) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6095 { |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6096 Box *thisbox = NULL; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6097 HWND box; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6098 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6099 box = WinWindowFromID(window, FID_CLIENT); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6100 if(box) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6101 thisbox = WinQueryWindowPtr(box, QWP_USER); |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6102 |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6103 if(thisbox) |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6104 thisbox->defaultitem = defaultitem; |
|
b03b24bb95f8
Added dw_window_default() to set the default focus widget in a dialog.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
33
diff
changeset
|
6105 } |
| 3 | 6106 |
| 6107 /* | |
|
40
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6108 * Sets window to click the default dialog item when an ENTER is pressed. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6109 * Parameters: |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6110 * window: Window (widget) to look for the ENTER press. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6111 * next: Window (widget) to move to next (or click) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6112 */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6113 void dw_window_click_default(HWND window, HWND next) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6114 { |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6115 WindowData *blah = (WindowData *)WinQueryWindowPtr(window, QWP_USER); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6116 char tmpbuf[100]; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6117 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6118 WinQueryClassName(window, 99, tmpbuf); |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6119 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6120 /* These are the window classes which can |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6121 * obtain input focus. |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6122 */ |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6123 if(strncmp(tmpbuf, "#6", 3) == 0 && blah) |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6124 blah->clickdefault = next; |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6125 } |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6126 |
|
88c9c7410c22
Lots of fixes and new functions on all platforms.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
39
diff
changeset
|
6127 /* |
| 3 | 6128 * Returns some information about the current operating environment. |
| 6129 * Parameters: | |
| 6130 * env: Pointer to a DWEnv struct. | |
| 6131 */ | |
| 6132 void dw_environment_query(DWEnv *env) | |
| 6133 { | |
| 6134 ULONG Build; | |
| 6135 | |
| 6136 if(!env) | |
| 6137 return; | |
| 6138 | |
| 6139 /* The default is OS/2 2.0 */ | |
| 6140 strcpy(env->osName,"OS/2"); | |
| 6141 env->MajorVersion = 2; | |
| 6142 env->MinorVersion = 0; | |
| 6143 | |
| 6144 Build = _GetSystemBuildLevel(); | |
| 6145 env->MinorBuild = Build & 0xFFFF; | |
| 6146 env->MajorBuild = Build >> 16; | |
| 6147 | |
| 6148 if (aulBuffer[0] == 20) | |
| 6149 { | |
| 6150 int i = (unsigned int)aulBuffer[1]; | |
| 6151 if (i > 20) | |
| 6152 { | |
| 6153 strcpy(env->osName,"Warp"); | |
| 6154 env->MajorVersion = (int)i/10; | |
| 6155 env->MinorVersion = i-(((int)i/10)*10); | |
| 6156 } | |
| 6157 else if (i == 10) | |
| 6158 env->MinorVersion = 1; | |
| 6159 } | |
|
15
81833f25b1aa
Added new Dynamic Windows build information to the DWEnv struct.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
14
diff
changeset
|
6160 strcpy(env->buildDate, __DATE__); |
|
81833f25b1aa
Added new Dynamic Windows build information to the DWEnv struct.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
14
diff
changeset
|
6161 strcpy(env->buildTime, __TIME__); |
|
81833f25b1aa
Added new Dynamic Windows build information to the DWEnv struct.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
14
diff
changeset
|
6162 env->DWMajorVersion = DW_MAJOR_VERSION; |
|
81833f25b1aa
Added new Dynamic Windows build information to the DWEnv struct.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
14
diff
changeset
|
6163 env->DWMinorVersion = DW_MINOR_VERSION; |
|
81833f25b1aa
Added new Dynamic Windows build information to the DWEnv struct.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
14
diff
changeset
|
6164 env->DWSubVersion = DW_SUB_VERSION; |
| 3 | 6165 } |
| 6166 | |
| 6167 /* | |
| 6168 * Opens a file dialog and queries user selection. | |
| 6169 * Parameters: | |
| 6170 * title: Title bar text for dialog. | |
| 6171 * defpath: The default path of the open dialog. | |
| 6172 * ext: Default file extention. | |
| 6173 * flags: DW_FILE_OPEN or DW_FILE_SAVE. | |
| 6174 * Returns: | |
| 6175 * NULL on error. A malloced buffer containing | |
| 6176 * the file path on success. | |
| 6177 * | |
| 6178 */ | |
| 6179 char *dw_file_browse(char *title, char *defpath, char *ext, int flags) | |
| 6180 { | |
| 6181 FILEDLG fild; | |
| 6182 HWND hwndFile; | |
| 6183 int len; | |
| 6184 | |
| 6185 if(defpath) | |
| 6186 strcpy(fild.szFullFile, defpath); | |
| 6187 else | |
| 6188 strcpy(fild.szFullFile, ""); | |
| 6189 | |
| 6190 len = strlen(fild.szFullFile); | |
| 6191 | |
| 6192 if(len) | |
| 6193 { | |
| 6194 if(fild.szFullFile[len-1] != '\\') | |
| 6195 strcat(fild.szFullFile, "\\"); | |
| 6196 } | |
| 6197 strcat(fild.szFullFile, "*"); | |
| 6198 | |
| 6199 if(ext) | |
| 6200 { | |
| 6201 strcat(fild.szFullFile, "."); | |
| 6202 strcat(fild.szFullFile, ext); | |
| 6203 } | |
| 6204 | |
| 6205 fild.cbSize = sizeof(FILEDLG); | |
| 6206 fild.fl = /*FDS_HELPBUTTON |*/ FDS_CENTER | FDS_OPEN_DIALOG; | |
| 6207 fild.pszTitle = title; | |
| 6208 fild.pszOKButton = ((flags & DW_FILE_SAVE) ? "Save" : "Open"); | |
| 6209 fild.ulUser = 0L; | |
| 6210 fild.pfnDlgProc = (PFNWP)WinDefFileDlgProc; | |
| 6211 fild.lReturn = 0L; | |
| 6212 fild.lSRC = 0L; | |
| 6213 fild.hMod = 0; | |
| 6214 fild.x = 0; | |
| 6215 fild.y = 0; | |
| 6216 fild.pszIType = (PSZ)NULL; | |
| 6217 fild.papszITypeList = (PAPSZ)NULL; | |
| 6218 fild.pszIDrive = (PSZ)NULL; | |
| 6219 fild.papszIDriveList= (PAPSZ)NULL; | |
| 6220 fild.sEAType = (SHORT)0; | |
| 6221 fild.papszFQFilename= (PAPSZ)NULL; | |
| 6222 fild.ulFQFCount = 0L; | |
| 6223 | |
| 6224 hwndFile = WinFileDlg(HWND_DESKTOP, HWND_DESKTOP, &fild); | |
| 6225 if(hwndFile) | |
| 6226 { | |
| 6227 switch(fild.lReturn) | |
| 6228 { | |
| 6229 case DID_OK: | |
| 6230 return strdup(fild.szFullFile); | |
| 6231 case DID_CANCEL: | |
| 6232 return NULL; | |
| 6233 } | |
| 6234 } | |
| 6235 return NULL; | |
| 6236 } | |
| 6237 | |
| 6238 /* | |
| 6239 * Execute and external program in a seperate session. | |
| 6240 * Parameters: | |
| 6241 * program: Program name with optional path. | |
| 6242 * type: Either DW_EXEC_CON or DW_EXEC_GUI. | |
| 6243 * params: An array of pointers to string arguements. | |
| 6244 * Returns: | |
| 6245 * -1 on error. | |
| 6246 */ | |
| 6247 int dw_exec(char *program, int type, char **params) | |
| 6248 { | |
| 6249 return spawnvp(P_NOWAIT, program, params); | |
| 6250 } | |
| 6251 | |
| 6252 /* | |
| 6253 * Loads a web browser pointed at the given URL. | |
| 6254 * Parameters: | |
| 6255 * url: Uniform resource locator. | |
| 6256 */ | |
| 6257 int dw_browse(char *url) | |
| 6258 { | |
| 6259 /* Is there a way to find the webbrowser in Unix? */ | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6260 char *execargs[3], browser[1024], *newurl = NULL; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6261 int len; |
| 3 | 6262 |
| 6263 PrfQueryProfileString(HINI_USERPROFILE, "WPURLDEFAULTSETTINGS", | |
| 6264 "DefaultBrowserExe", NULL, browser, 1024); | |
| 6265 | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6266 len = strlen(browser) - strlen("explore.exe"); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6267 |
| 3 | 6268 execargs[0] = browser; |
| 6269 execargs[1] = url; | |
| 6270 execargs[2] = NULL; | |
| 6271 | |
|
20
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6272 /* Special case for Web Explorer, it requires file:/// instead |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6273 * of file:// so I am handling it here. |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6274 */ |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6275 if(len > 0) |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6276 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6277 if(stricmp(&browser[len], "explore.exe") == 0) |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6278 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6279 int newlen, z; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6280 newurl = alloca(strlen(url) + 2); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6281 sprintf(newurl, "file:///%s", &url[7]); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6282 newlen = strlen(newurl); |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6283 for(z=8;z<(newlen-8);z++) |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6284 { |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6285 if(newurl[z] == '|') |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6286 newurl[z] = ':'; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6287 if(newurl[z] == '/') |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6288 newurl[z] = '\\'; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6289 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6290 execargs[1] = newurl; |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6291 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6292 } |
|
38295c8d06d5
Added notebook, Warp 3 and WebExplorer fixes.
bsmith@81767d24-ef19-dc11-ae90-00e081727c95
parents:
18
diff
changeset
|
6293 |
| 3 | 6294 return dw_exec(browser, DW_EXEC_GUI, execargs); |
| 6295 } | |
| 6296 | |
| 6297 /* | |
| 6298 * Returns a pointer to a static buffer which containes the | |
| 6299 * current user directory. Or the root directory (C:\ on | |
| 6300 * OS/2 and Windows). | |
| 6301 */ | |
| 6302 char *dw_user_dir(void) | |
| 6303 { | |
| 6304 static char _user_dir[1024] = ""; | |
| 6305 | |
| 6306 if(!_user_dir[0]) | |
| 6307 { | |
| 6308 char *home = getenv("HOME"); | |
| 6309 | |
| 6310 if(home) | |
| 6311 strcpy(_user_dir, home); | |
| 6312 else | |
| 6313 strcpy(_user_dir, "C:\\"); | |
| 6314 } | |
| 6315 return _user_dir; | |
| 6316 } | |
| 6317 | |
| 6318 /* | |
| 6319 * Call a function from the window (widget)'s context. | |
| 6320 * Parameters: | |
| 6321 * handle: Window handle of the widget. | |
| 6322 * function: Function pointer to be called. | |
| 6323 * data: Pointer to the data to be passed to the function. | |
| 6324 */ | |
| 6325 void dw_window_function(HWND handle, void *function, void *data) | |
| 6326 { | |
| 6327 WinSendMsg(handle, WM_USER, (MPARAM)function, (MPARAM)data); | |
| 6328 } | |
| 6329 | |
| 6330 #ifndef NO_SIGNALS | |
| 6331 /* | |
| 6332 * Add a callback to a window event. | |
| 6333 * Parameters: | |
| 6334 * window: Window handle of signal to be called back. | |
| 6335 * signame: A string pointer identifying which signal to be hooked. | |
| 6336 * sigfunc: The pointer to the function to be used as the callback. | |
| 6337 * data: User data to be passed to the handler function. | |
| 6338 */ | |
| 6339 void dw_signal_connect(HWND window, char *signame, void *sigfunc, void *data) | |
| 6340 { | |
| 6341 ULONG message = 0L; | |
| 6342 | |
| 6343 if(window && signame && sigfunc) | |
| 6344 { | |
| 6345 if((message = _findsigmessage(signame)) != 0) | |
| 6346 _new_signal(message, window, sigfunc, data); | |
| 6347 } | |
| 6348 } | |
| 6349 | |
| 6350 /* | |
| 6351 * Removes callbacks for a given window with given name. | |
| 6352 * Parameters: | |
| 6353 * window: Window handle of callback to be removed. | |
| 6354 */ | |
| 6355 void dw_signal_disconnect_by_name(HWND window, char *signame) | |
| 6356 { | |
| 6357 SignalHandler *prev = NULL, *tmp = Root; | |
| 6358 ULONG message; | |
| 6359 | |
| 6360 if(!window || !signame || (message = _findsigmessage(signame)) == 0) | |
| 6361 return; | |
| 6362 | |
| 6363 while(tmp) | |
| 6364 { | |
| 6365 if(tmp->window == window && tmp->message == message) | |
| 6366 { | |
| 6367 if(prev) | |
| 6368 { | |
| 6369 prev->next = tmp->next; | |
| 6370 free(tmp); | |
| 6371 tmp = prev->next; | |
| 6372 } | |
| 6373 else | |
| 6374 { | |
| 6375 Root = tmp->next; | |
| 6376 free(tmp); | |
| 6377 tmp = Root; | |
| 6378 } | |
| 6379 } | |
| 6380 else | |
| 6381 { | |
| 6382 prev = tmp; | |
| 6383 tmp = tmp->next; | |
| 6384 } | |
| 6385 } | |
| 6386 } | |
| 6387 | |
| 6388 /* | |
| 6389 * Removes all callbacks for a given window. | |
| 6390 * Parameters: | |
| 6391 * window: Window handle of callback to be removed. | |
| 6392 */ | |
| 6393 void dw_signal_disconnect_by_window(HWND window) | |
| 6394 { | |
| 6395 SignalHandler *prev = NULL, *tmp = Root; | |
| 6396 | |
| 6397 while(tmp) | |
| 6398 { | |
| 6399 if(tmp->window == window) | |
| 6400 { | |
| 6401 if(prev) | |
| 6402 { | |
| 6403 prev->next = tmp->next; | |
| 6404 free(tmp); | |
| 6405 tmp = prev->next; | |
| 6406 } | |
| 6407 else | |
| 6408 { | |
| 6409 Root = tmp->next; | |
| 6410 free(tmp); | |
| 6411 tmp = Root; | |
| 6412 } | |
| 6413 } | |
| 6414 else | |
| 6415 { | |
| 6416 prev = tmp; | |
| 6417 tmp = tmp->next; | |
| 6418 } | |
| 6419 } | |
| 6420 } | |
| 6421 | |
| 6422 /* | |
| 6423 * Removes all callbacks for a given window with specified data. | |
| 6424 * Parameters: | |
| 6425 * window: Window handle of callback to be removed. | |
| 6426 * data: Pointer to the data to be compared against. | |
| 6427 */ | |
| 6428 void dw_signal_disconnect_by_data(HWND window, void *data) | |
| 6429 { | |
| 6430 SignalHandler *prev = NULL, *tmp = Root; | |
| 6431 | |
| 6432 while(tmp) | |
| 6433 { | |
| 6434 if(tmp->window == window && tmp->data == data) | |
| 6435 { | |
| 6436 if(prev) | |
| 6437 { | |
| 6438 prev->next = tmp->next; | |
| 6439 free(tmp); | |
| 6440 tmp = prev->next; | |
| 6441 } | |
| 6442 else | |
| 6443 { | |
| 6444 Root = tmp->next; | |
| 6445 free(tmp); | |
| 6446 tmp = Root; | |
| 6447 } | |
| 6448 } | |
| 6449 else | |
| 6450 { | |
| 6451 prev = tmp; | |
| 6452 tmp = tmp->next; | |
| 6453 } | |
| 6454 } | |
| 6455 } | |
| 6456 #endif | |
| 6457 | |
| 6458 #ifdef TEST | |
| 6459 HWND mainwindow, | |
| 6460 listbox, | |
| 6461 okbutton, | |
| 6462 cancelbutton, | |
| 6463 lbbox, | |
| 6464 stext, | |
| 6465 buttonbox, | |
| 6466 testwindow, | |
| 6467 testbox, | |
| 6468 testok, | |
| 6469 testcancel, | |
| 6470 testbox2, | |
| 6471 testok2, | |
| 6472 testcancel2, | |
| 6473 notebook; | |
| 6474 int count = 2; | |
| 6475 | |
| 6476 #ifdef USE_FILTER | |
| 6477 /* Do any handling you need in the filter function */ | |
| 6478 LONG testfilter(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | |
| 6479 { | |
| 6480 switch(msg) | |
| 6481 { | |
| 6482 case WM_COMMAND: | |
| 6483 switch (COMMANDMSG(&msg)->cmd) | |
| 6484 { | |
| 6485 case 1001L: | |
| 6486 case 1002L: | |
| 6487 dw_window_destroy(mainwindow);; | |
| 6488 count--; | |
| 6489 break; | |
| 6490 case 1003L: | |
| 6491 case 1004L: | |
| 6492 dw_window_destroy(testwindow);; | |
| 6493 count--; | |
| 6494 break; | |
| 6495 } | |
| 6496 if(!count) | |
| 6497 exit(0); | |
| 6498 break; | |
| 6499 } | |
| 6500 /* Return -1 to allow the default handlers to return. */ | |
| 6501 return TRUE; | |
| 6502 } | |
| 6503 #else | |
| 6504 int test_callback(HWND window, void *data) | |
| 6505 { | |
| 6506 dw_window_destroy((HWND)data); | |
| 6507 /* Return -1 to allow the default handlers to return. */ | |
| 6508 count--; | |
| 6509 if(!count) | |
| 6510 exit(0); | |
| 6511 return -1; | |
| 6512 } | |
| 6513 #endif | |
| 6514 | |
| 6515 /* | |
| 6516 * Let's demonstrate the functionality of this library. :) | |
| 6517 */ | |
| 6518 int main(void) | |
| 6519 { | |
| 6520 ULONG flStyle = DW_FCF_SYSMENU | DW_FCF_TITLEBAR | | |
| 6521 DW_FCF_SHELLPOSITION | DW_FCF_TASKLIST | DW_FCF_DLGBORDER; | |
| 6522 int pageid; | |
| 6523 | |
| 6524 dw_init(TRUE); | |
| 6525 | |
| 6526 /* Try a little server dialog. :) */ | |
| 6527 mainwindow = dw_window_new(HWND_DESKTOP, "Server", flStyle | DW_FCF_SIZEBORDER | DW_FCF_MINMAX); | |
| 6528 | |
| 6529 lbbox = dw_box_new(BOXVERT, 10); | |
| 6530 | |
| 6531 dw_box_pack_start(mainwindow, lbbox, 0, 0, TRUE, TRUE, 0); | |
| 6532 | |
| 6533 stext = dw_text_new("Choose a server:", 0); | |
| 6534 | |
| 6535 dw_window_set_style(stext, DW_DT_VCENTER, DW_DT_VCENTER); | |
| 6536 | |
| 6537 dw_box_pack_start(lbbox, stext, 130, 15, FALSE, FALSE, 10); | |
| 6538 | |
| 6539 listbox = dw_listbox_new(100L, FALSE); | |
| 6540 | |
| 6541 dw_box_pack_start(lbbox, listbox, 130, 200, TRUE, TRUE, 10); | |
| 6542 | |
| 6543 buttonbox = dw_box_new(BOXHORZ, 0); | |
| 6544 | |
| 6545 dw_box_pack_start(lbbox, buttonbox, 0, 0, TRUE, TRUE, 0); | |
| 6546 | |
| 6547 okbutton = dw_button_new("Ok", 1001L); | |
| 6548 | |
| 6549 dw_box_pack_start(buttonbox, okbutton, 50, 30, TRUE, TRUE, 5); | |
| 6550 | |
| 6551 cancelbutton = dw_button_new("Cancel", 1002L); | |
| 6552 | |
| 6553 dw_box_pack_start(buttonbox, cancelbutton, 50, 30, TRUE, TRUE, 5); | |
| 6554 | |
| 6555 /* Set some nice fonts and colors */ | |
| 6556 dw_window_set_color(lbbox, DW_CLR_PALEGRAY, DW_CLR_PALEGRAY); | |
| 6557 dw_window_set_color(buttonbox, DW_CLR_PALEGRAY, DW_CLR_PALEGRAY); | |
| 6558 dw_window_set_font(stext, "9.WarpSans"); | |
| 6559 dw_window_set_color(stext, DW_CLR_BLACK, DW_CLR_PALEGRAY); | |
| 6560 dw_window_set_font(listbox, "9.WarpSans"); | |
| 6561 dw_window_set_font(okbutton, "9.WarpSans"); | |
| 6562 dw_window_set_font(cancelbutton, "9.WarpSans"); | |
| 6563 | |
| 6564 dw_window_show(mainwindow); | |
| 6565 | |
| 6566 dw_window_set_usize(mainwindow, 170, 340); | |
| 6567 | |
| 6568 /* Another small example */ | |
| 6569 flStyle |= FCF_MINMAX | FCF_SIZEBORDER; | |
| 6570 | |
| 6571 testwindow = dw_window_new(HWND_DESKTOP, "Wow a test dialog! :) yay!", flStyle); | |
| 6572 | |
| 6573 testbox = dw_box_new(BOXVERT, 0); | |
| 6574 | |
| 6575 dw_box_pack_start(testwindow, testbox, 0, 0, TRUE, TRUE, 0); | |
| 6576 | |
| 6577 notebook = dw_notebook_new(1010L, TRUE); | |
| 6578 | |
| 6579 dw_box_pack_start(testbox, notebook, 100, 100, TRUE, TRUE, 0); | |
| 6580 | |
| 6581 testbox = dw_box_new(BOXVERT, 10); | |
| 6582 | |
| 6583 pageid = dw_notebook_page_new(notebook, 0L, FALSE); | |
| 6584 | |
| 6585 dw_notebook_page_set_text(notebook, pageid, "Test page"); | |
| 6586 dw_notebook_page_set_status_text(notebook, pageid, "Test page"); | |
| 6587 | |
| 6588 dw_notebook_pack(notebook, pageid, testbox); | |
| 6589 | |
| 6590 testok = dw_button_new("Ok", 1003L); | |
| 6591 | |
| 6592 dw_box_pack_start(testbox, testok, 60, 40, TRUE, TRUE, 10); | |
| 6593 | |
| 6594 testcancel = dw_button_new("Cancel", 1004L); | |
| 6595 | |
| 6596 dw_box_pack_start(testbox, testcancel, 60, 40, TRUE, TRUE, 10); | |
| 6597 | |
| 6598 testbox2 = dw_box_new(BOXHORZ, 0); | |
| 6599 | |
| 6600 dw_box_pack_start(testbox, testbox2, 0, 0, TRUE, TRUE, 0); | |
| 6601 | |
| 6602 testok2 = dw_button_new("Ok", 1003L); | |
| 6603 | |
| 6604 dw_box_pack_start(testbox2, testok2, 60, 40, TRUE, TRUE, 10); | |
| 6605 | |
| 6606 dw_box_pack_splitbar_start(testbox2); | |
| 6607 | |
| 6608 testcancel2 = dw_button_new("Cancel", 1004L); | |
| 6609 | |
| 6610 dw_box_pack_start(testbox2, testcancel2, 60, 40, TRUE, TRUE, 10); | |
| 6611 | |
| 6612 /* Set some nice fonts and colors */ | |
| 6613 dw_window_set_color(testbox, DW_CLR_PALEGRAY, DW_CLR_PALEGRAY); | |
| 6614 dw_window_set_color(testbox2, DW_CLR_PALEGRAY, DW_CLR_PALEGRAY); | |
| 6615 dw_window_set_font(testok, "9.WarpSans"); | |
| 6616 dw_window_set_font(testcancel, "9.WarpSans"); | |
| 6617 dw_window_set_font(testok2, "9.WarpSans"); | |
| 6618 dw_window_set_font(testcancel2, "9.WarpSans"); | |
| 6619 | |
| 6620 dw_window_show(testwindow); | |
| 6621 | |
| 6622 #ifdef USE_FILTER | |
| 6623 dw_main(0L, (void *)testfilter); | |
| 6624 #else | |
| 6625 /* Setup the function callbacks */ | |
| 6626 dw_signal_connect(okbutton, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)mainwindow); | |
| 6627 dw_signal_connect(cancelbutton, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)mainwindow); | |
| 6628 dw_signal_connect(testok, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)testwindow); | |
| 6629 dw_signal_connect(testcancel, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)testwindow); | |
| 6630 dw_signal_connect(testok2, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)testwindow); | |
| 6631 dw_signal_connect(testcancel2, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)testwindow); | |
| 6632 dw_signal_connect(mainwindow, "delete_event", DW_SIGNAL_FUNC(test_callback), (void *)mainwindow); | |
| 6633 dw_signal_connect(testwindow, "delete_event", DW_SIGNAL_FUNC(test_callback), (void *)testwindow); | |
| 6634 | |
| 6635 dw_main(0L, NULL); | |
| 6636 #endif | |
| 6637 | |
| 6638 return 0; | |
| 6639 } | |
| 6640 #endif |