/* * COMMDLG functions * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine */ #include #include #include #include "win.h" #include "heap.h" #include "message.h" #include "commdlg.h" #include "dialog.h" #include "dlgs.h" #include "module.h" #include "resource.h" #include "drive.h" #include "stddebug.h" #include "debug.h" static DWORD CommDlgLastError = 0; static HBITMAP16 hFolder = 0; static HBITMAP16 hFolder2 = 0; static HBITMAP16 hFloppy = 0; static HBITMAP16 hHDisk = 0; static HBITMAP16 hCDRom = 0; static HBITMAP16 hBitmapTT = 0; /*********************************************************************** * FileDlg_Init [internal] */ static BOOL32 FileDlg_Init() { static BOOL32 initialized = 0; if (!initialized) { if (!hFolder) hFolder = LoadBitmap16(0, MAKEINTRESOURCE(OBM_FOLDER)); if (!hFolder2) hFolder2 = LoadBitmap16(0, MAKEINTRESOURCE(OBM_FOLDER2)); if (!hFloppy) hFloppy = LoadBitmap16(0, MAKEINTRESOURCE(OBM_FLOPPY)); if (!hHDisk) hHDisk = LoadBitmap16(0, MAKEINTRESOURCE(OBM_HDISK)); if (!hCDRom) hCDRom = LoadBitmap16(0, MAKEINTRESOURCE(OBM_CDROM)); if (hFolder == 0 || hFolder2 == 0 || hFloppy == 0 || hHDisk == 0 || hCDRom == 0) { fprintf(stderr, "FileDlg_Init // Error loading bitmaps !"); return FALSE; } initialized = TRUE; } return TRUE; } /*********************************************************************** * GetOpenFileName (COMMDLG.1) */ BOOL16 WINAPI GetOpenFileName16( SEGPTR ofn ) { HINSTANCE32 hInst; HANDLE32 hDlgTmpl = 0, hResInfo; BOOL32 bRet = FALSE, win32Format = FALSE; HWND32 hwndDialog; LPOPENFILENAME16 lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(ofn); LPCVOID template; if (!lpofn || !FileDlg_Init()) return FALSE; if (lpofn->Flags & OFN_WINE32) { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource32( lpofn->hInstance ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { if (!(hResInfo = FindResource32A(lpofn->hInstance, PTR_SEG_TO_LIN(lpofn->lpTemplateName), (LPSTR)RT_DIALOG))) { CommDlgLastError = CDERR_FINDRESFAILURE; return FALSE; } if (!(hDlgTmpl = LoadResource32( lpofn->hInstance, hResInfo )) || !(template = LockResource32( hDlgTmpl ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else { template = SYSRES_GetResPtr( SYSRES_DIALOG_OPEN_FILE ); } win32Format = TRUE; } else { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpofn->hInstance ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { if (!(hResInfo = FindResource16(lpofn->hInstance, lpofn->lpTemplateName, RT_DIALOG))) { CommDlgLastError = CDERR_FINDRESFAILURE; return FALSE; } if (!(hDlgTmpl = LoadResource16( lpofn->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else { template = SYSRES_GetResPtr( SYSRES_DIALOG_OPEN_FILE ); win32Format = TRUE; } } hInst = WIN_GetWindowInstance( lpofn->hwndOwner ); /* FIXME: doesn't handle win32 format correctly yet */ hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpofn->hwndOwner, (DLGPROC16)MODULE_GetWndProcEntry16("FileOpenDlgProc"), ofn, WIN_PROC_16 ); if (hwndDialog) bRet = DIALOG_DoDialogBox( hwndDialog, lpofn->hwndOwner ); if (hDlgTmpl) { if (lpofn->Flags & OFN_WINE32) FreeResource32( hDlgTmpl ); else FreeResource16( hDlgTmpl ); } dprintf_commdlg(stddeb,"GetOpenFileName // return lpstrFile='%s' !\n", (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFile)); return bRet; } /*********************************************************************** * GetSaveFileName (COMMDLG.2) */ BOOL16 WINAPI GetSaveFileName16( SEGPTR ofn) { HINSTANCE32 hInst; HANDLE32 hDlgTmpl = 0; BOOL32 bRet = FALSE, win32Format = FALSE; LPOPENFILENAME16 lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(ofn); LPCVOID template; HWND32 hwndDialog; if (!lpofn || !FileDlg_Init()) return FALSE; if (lpofn->Flags & OFN_WINE32) { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource32( lpofn->hInstance ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { HANDLE32 hResInfo; if (!(hResInfo = FindResource32A(lpofn->hInstance, PTR_SEG_TO_LIN(lpofn->lpTemplateName), (LPSTR)RT_DIALOG))) { CommDlgLastError = CDERR_FINDRESFAILURE; return FALSE; } if (!(hDlgTmpl = LoadResource32(lpofn->hInstance,hResInfo)) || !(template = LockResource32(hDlgTmpl))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } win32Format= TRUE; } else { template = SYSRES_GetResPtr( SYSRES_DIALOG_SAVE_FILE ); win32Format = TRUE; } } else { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpofn->hInstance ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { HANDLE16 hResInfo; if (!(hResInfo = FindResource16(lpofn->hInstance, lpofn->lpTemplateName, RT_DIALOG))) { CommDlgLastError = CDERR_FINDRESFAILURE; return FALSE; } if (!(hDlgTmpl = LoadResource16( lpofn->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else { template = SYSRES_GetResPtr( SYSRES_DIALOG_SAVE_FILE ); win32Format = TRUE; } } hInst = WIN_GetWindowInstance( lpofn->hwndOwner ); hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpofn->hwndOwner, (DLGPROC16)MODULE_GetWndProcEntry16("FileSaveDlgProc"), ofn, WIN_PROC_16 ); if (hwndDialog) bRet = DIALOG_DoDialogBox( hwndDialog, lpofn->hwndOwner ); if (hDlgTmpl) { if (lpofn->Flags & OFN_WINE32) FreeResource32( hDlgTmpl ); else FreeResource16( hDlgTmpl ); } dprintf_commdlg(stddeb, "GetSaveFileName // return lpstrFile='%s' !\n", (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFile)); return bRet; } /*********************************************************************** * FILEDLG_StripEditControl [internal] * Strip pathnames off the contents of the edit control. */ static void FILEDLG_StripEditControl(HWND16 hwnd) { char temp[512], *cp; GetDlgItemText32A( hwnd, edt1, temp, sizeof(temp) ); cp = strrchr(temp, '\\'); if (cp != NULL) { strcpy(temp, cp+1); } cp = strrchr(temp, ':'); if (cp != NULL) { strcpy(temp, cp+1); } /* FIXME: shouldn't we do something with the result here? ;-) */ } /*********************************************************************** * FILEDLG_ScanDir [internal] */ static BOOL32 FILEDLG_ScanDir(HWND16 hWnd, LPSTR newPath) { int len; char str[512]; lstrcpyn32A( str, newPath, 512 ); len = strlen(str); GetDlgItemText32A( hWnd, edt1, str + len, sizeof(str) - len ); if (!DlgDirList32A( hWnd, str, lst1, 0, 0x0000 )) return FALSE; strcpy( str, "*.*" ); return DlgDirList32A( hWnd, str, lst2, stc1, 0x8010 ); } /*********************************************************************** * FILEDLG_GetFileType [internal] */ static LPSTR FILEDLG_GetFileType(LPSTR cfptr, LPSTR fptr, WORD index) { int n, i; i = 0; if (cfptr) for ( ;(n = strlen(cfptr)) != 0; i++) { cfptr += n + 1; if (i == index) return cfptr; cfptr += strlen(cfptr) + 1; } if (fptr) for ( ;(n = strlen(fptr)) != 0; i++) { fptr += n + 1; if (i == index) return fptr; fptr += strlen(fptr) + 1; } return "*.*"; /* FIXME */ } /*********************************************************************** * FILEDLG_WMDrawItem [internal] */ static LONG FILEDLG_WMDrawItem(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam,int savedlg) { LPDRAWITEMSTRUCT16 lpdis = (LPDRAWITEMSTRUCT16)PTR_SEG_TO_LIN(lParam); char *str; HBRUSH32 hBrush; HBITMAP16 hBitmap, hPrevBitmap; BITMAP16 bm; HDC32 hMemDC; if (lpdis->CtlType == ODT_LISTBOX && lpdis->CtlID == lst1) { if (!(str = SEGPTR_ALLOC(512))) return FALSE; hBrush = SelectObject32(lpdis->hDC, GetStockObject32(LTGRAY_BRUSH)); SelectObject32(lpdis->hDC, hBrush); FillRect16(lpdis->hDC, &lpdis->rcItem, hBrush); SendMessage16(lpdis->hwndItem, LB_GETTEXT16, lpdis->itemID, (LPARAM)SEGPTR_GET(str)); if (savedlg) /* use _gray_ text in FileSaveDlg */ if (!lpdis->itemState) SetTextColor32(lpdis->hDC,GetSysColor32(COLOR_GRAYTEXT) ); else SetTextColor32(lpdis->hDC,GetSysColor32(COLOR_WINDOWTEXT) ); /* inversion of gray would be bad readable */ TextOut16(lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top, str, strlen(str)); if (lpdis->itemState != 0) { InvertRect16(lpdis->hDC, &lpdis->rcItem); } SEGPTR_FREE(str); return TRUE; } if (lpdis->CtlType == ODT_LISTBOX && lpdis->CtlID == lst2) { if (!(str = SEGPTR_ALLOC(512))) return FALSE; hBrush = SelectObject32(lpdis->hDC, GetStockObject32(LTGRAY_BRUSH)); SelectObject32(lpdis->hDC, hBrush); FillRect16(lpdis->hDC, &lpdis->rcItem, hBrush); SendMessage16(lpdis->hwndItem, LB_GETTEXT16, lpdis->itemID, (LPARAM)SEGPTR_GET(str)); hBitmap = hFolder; GetObject16( hBitmap, sizeof(bm), &bm ); TextOut16(lpdis->hDC, lpdis->rcItem.left + bm.bmWidth, lpdis->rcItem.top, str, strlen(str)); hMemDC = CreateCompatibleDC32(lpdis->hDC); hPrevBitmap = SelectObject32(hMemDC, hBitmap); BitBlt32(lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCCOPY); SelectObject32(hMemDC, hPrevBitmap); DeleteDC32(hMemDC); if (lpdis->itemState != 0) InvertRect16(lpdis->hDC, &lpdis->rcItem); SEGPTR_FREE(str); return TRUE; } if (lpdis->CtlType == ODT_COMBOBOX && lpdis->CtlID == cmb2) { if (!(str = SEGPTR_ALLOC(512))) return FALSE; hBrush = SelectObject32(lpdis->hDC, GetStockObject32(LTGRAY_BRUSH)); SelectObject32(lpdis->hDC, hBrush); FillRect16(lpdis->hDC, &lpdis->rcItem, hBrush); SendMessage16(lpdis->hwndItem, CB_GETLBTEXT16, lpdis->itemID, (LPARAM)SEGPTR_GET(str)); switch(DRIVE_GetType( str[2] - 'a' )) { case TYPE_FLOPPY: hBitmap = hFloppy; break; case TYPE_CDROM: hBitmap = hCDRom; break; case TYPE_HD: case TYPE_NETWORK: default: hBitmap = hHDisk; break; } GetObject16( hBitmap, sizeof(bm), &bm ); TextOut16(lpdis->hDC, lpdis->rcItem.left + bm.bmWidth, lpdis->rcItem.top, str, strlen(str)); hMemDC = CreateCompatibleDC32(lpdis->hDC); hPrevBitmap = SelectObject32(hMemDC, hBitmap); BitBlt32( lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCCOPY ); SelectObject32(hMemDC, hPrevBitmap); DeleteDC32(hMemDC); if (lpdis->itemState != 0) InvertRect16(lpdis->hDC, &lpdis->rcItem); SEGPTR_FREE(str); return TRUE; } return FALSE; } /*********************************************************************** * FILEDLG_WMMeasureItem [internal] */ static LONG FILEDLG_WMMeasureItem(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { BITMAP16 bm; LPMEASUREITEMSTRUCT16 lpmeasure; GetObject16( hFolder2, sizeof(bm), &bm ); lpmeasure = (LPMEASUREITEMSTRUCT16)PTR_SEG_TO_LIN(lParam); lpmeasure->itemHeight = bm.bmHeight; return TRUE; } /*********************************************************************** * FILEDLG_HookCallChk [internal] */ static int FILEDLG_HookCallChk(LPOPENFILENAME16 lpofn) { if (lpofn) if (lpofn->Flags & OFN_ENABLEHOOK) if (lpofn->lpfnHook) return 1; return 0; } /*********************************************************************** * FILEDLG_CallWindowProc [internal] * * Adapt the structures back for win32 calls so the callee can read lpCustData */ static BOOL32 FILEDLG_CallWindowProc(LPOPENFILENAME16 lpofn,HWND32 hwnd, UINT32 wMsg,WPARAM32 wParam,LPARAM lParam ) { BOOL32 needstruct; needstruct = (PTR_SEG_TO_LIN(lParam) == lpofn); if (!(lpofn->Flags & OFN_WINE32)) return (BOOL32)CallWindowProc16( lpofn->lpfnHook,hwnd,(UINT16)wMsg,(WPARAM16)wParam,lParam ); /* |OFN_WINE32 */ if (lpofn->Flags & OFN_UNICODE) { if (needstruct) { OPENFILENAME32W ofnw; /* FIXME: probably needs more converted */ ofnw.lCustData = lpofn->lCustData; return (BOOL32)CallWindowProc32W( (WNDPROC32)lpofn->lpfnHook,hwnd,wMsg,wParam,(LPARAM)&ofnw ); } else return (BOOL32)CallWindowProc32W( (WNDPROC32)lpofn->lpfnHook,hwnd,wMsg,wParam,lParam ); } /* ! |OFN_UNICODE */ if (needstruct) { OPENFILENAME32A ofna; /* FIXME: probably needs more converted */ ofna.lCustData = lpofn->lCustData; return (BOOL32)CallWindowProc32A( (WNDPROC32)lpofn->lpfnHook,hwnd,wMsg,wParam,(LPARAM)&ofna ); } else return (BOOL32)CallWindowProc32A( (WNDPROC32)lpofn->lpfnHook,hwnd,wMsg,wParam,lParam ); } /*********************************************************************** * FILEDLG_WMInitDialog [internal] */ static LONG FILEDLG_WMInitDialog(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { int i, n; LPOPENFILENAME16 lpofn; char tmpstr[512]; LPSTR pstr; SetWindowLong32A(hWnd, DWL_USER, lParam); lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(lParam); if (lpofn->lpstrTitle) SetWindowText16( hWnd, lpofn->lpstrTitle ); /* read custom filter information */ if (lpofn->lpstrCustomFilter) { pstr = (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrCustomFilter); n = 0; dprintf_commdlg(stddeb,"lpstrCustomFilter = %p\n", pstr); while(*pstr) { dprintf_commdlg(stddeb,"lpstrCustomFilter // add str='%s' ",pstr); i = SendDlgItemMessage16(hWnd, cmb1, CB_ADDSTRING16, 0, (LPARAM)lpofn->lpstrCustomFilter + n ); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; dprintf_commdlg(stddeb,"associated to '%s'\n", pstr); SendDlgItemMessage16(hWnd, cmb1, CB_SETITEMDATA16, i, (LPARAM)pstr); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; } } /* read filter information */ if (lpofn->lpstrFilter) { pstr = (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFilter); n = 0; while(*pstr) { dprintf_commdlg(stddeb,"lpstrFilter // add str='%s' ", pstr); i = SendDlgItemMessage16(hWnd, cmb1, CB_ADDSTRING16, 0, (LPARAM)lpofn->lpstrFilter + n ); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; dprintf_commdlg(stddeb,"associated to '%s'\n", pstr); SendDlgItemMessage16(hWnd, cmb1, CB_SETITEMDATA16, i, (LPARAM)pstr); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; } } /* set default filter */ if (lpofn->nFilterIndex == 0 && lpofn->lpstrCustomFilter == (SEGPTR)NULL) lpofn->nFilterIndex = 1; SendDlgItemMessage16(hWnd, cmb1, CB_SETCURSEL16, lpofn->nFilterIndex - 1, 0); strncpy(tmpstr, FILEDLG_GetFileType(PTR_SEG_TO_LIN(lpofn->lpstrCustomFilter), PTR_SEG_TO_LIN(lpofn->lpstrFilter), lpofn->nFilterIndex - 1),511); tmpstr[511]=0; dprintf_commdlg(stddeb,"nFilterIndex = %ld // SetText of edt1 to '%s'\n", lpofn->nFilterIndex, tmpstr); SetDlgItemText32A( hWnd, edt1, tmpstr ); /* get drive list */ *tmpstr = 0; DlgDirListComboBox32A(hWnd, tmpstr, cmb2, 0, 0xC000); /* read initial directory */ if (PTR_SEG_TO_LIN(lpofn->lpstrInitialDir) != NULL) { strncpy(tmpstr, PTR_SEG_TO_LIN(lpofn->lpstrInitialDir), 510); tmpstr[510]=0; if (strlen(tmpstr) > 0 && tmpstr[strlen(tmpstr)-1] != '\\' && tmpstr[strlen(tmpstr)-1] != ':') strcat(tmpstr,"\\"); } else *tmpstr = 0; if (!FILEDLG_ScanDir(hWnd, tmpstr)) { *tmpstr = 0; if (!FILEDLG_ScanDir(hWnd, tmpstr)) fprintf(stderr, "FileDlg: couldn't read initial directory %s!\n",tmpstr); } /* select current drive in combo 2, omit missing drives */ for(i=0, n=-1; i<=DRIVE_GetCurrentDrive(); i++) if (DRIVE_IsValid(i)) n++; SendDlgItemMessage16(hWnd, cmb2, CB_SETCURSEL16, n, 0); if (!(lpofn->Flags & OFN_SHOWHELP)) ShowWindow32(GetDlgItem32(hWnd, pshHelp), SW_HIDE); if (lpofn->Flags & OFN_HIDEREADONLY) ShowWindow32(GetDlgItem32(hWnd, chx1), SW_HIDE); if (FILEDLG_HookCallChk(lpofn)) return (BOOL16)FILEDLG_CallWindowProc(lpofn,hWnd,WM_INITDIALOG,wParam,lParam ); else return TRUE; } /*********************************************************************** * FILEDLG_WMCommand [internal] */ static LRESULT FILEDLG_WMCommand(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LONG lRet; LPOPENFILENAME16 lpofn; OPENFILENAME16 ofn2; char tmpstr[512], tmpstr2[512]; LPSTR pstr, pstr2; UINT16 control,notification; /* Notifications are packaged differently in Win32 */ control = wParam; notification = HIWORD(lParam); lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(GetWindowLong32A(hWnd, DWL_USER)); switch (control) { case lst1: /* file list */ FILEDLG_StripEditControl(hWnd); if (notification == LBN_DBLCLK) goto almost_ok; lRet = SendDlgItemMessage16(hWnd, lst1, LB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; if ((pstr = SEGPTR_ALLOC(512))) { SendDlgItemMessage16(hWnd, lst1, LB_GETTEXT16, lRet, (LPARAM)SEGPTR_GET(pstr)); SetDlgItemText32A( hWnd, edt1, pstr ); SEGPTR_FREE(pstr); } if (FILEDLG_HookCallChk(lpofn)) FILEDLG_CallWindowProc(lpofn,hWnd, RegisterWindowMessage32A( LBSELCHSTRING ), control, MAKELONG(lRet,CD_LBSELCHANGE)); /* FIXME: for OFN_ALLOWMULTISELECT we need CD_LBSELSUB, CD_SELADD, CD_LBSELNOITEMS */ return TRUE; case lst2: /* directory list */ FILEDLG_StripEditControl(hWnd); if (notification == LBN_DBLCLK) { lRet = SendDlgItemMessage16(hWnd, lst2, LB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; pstr = SEGPTR_ALLOC(512); SendDlgItemMessage16(hWnd, lst2, LB_GETTEXT16, lRet, (LPARAM)SEGPTR_GET(pstr)); strcpy( tmpstr, pstr ); SEGPTR_FREE(pstr); if (tmpstr[0] == '[') { tmpstr[strlen(tmpstr) - 1] = 0; strcpy(tmpstr,tmpstr+1); } strcat(tmpstr, "\\"); goto reset_scan; } return TRUE; case cmb1: /* file type drop list */ if (notification == CBN_SELCHANGE) { *tmpstr = 0; goto reset_scan; } return TRUE; case cmb2: /* disk drop list */ FILEDLG_StripEditControl(hWnd); lRet = SendDlgItemMessage16(hWnd, cmb2, CB_GETCURSEL16, 0, 0L); if (lRet == LB_ERR) return 0; pstr = SEGPTR_ALLOC(512); SendDlgItemMessage16(hWnd, cmb2, CB_GETLBTEXT16, lRet, (LPARAM)SEGPTR_GET(pstr)); sprintf(tmpstr, "%c:", pstr[2]); SEGPTR_FREE(pstr); reset_scan: lRet = SendDlgItemMessage16(hWnd, cmb1, CB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; pstr = (LPSTR)SendDlgItemMessage16(hWnd, cmb1, CB_GETITEMDATA16, lRet, 0); dprintf_commdlg(stddeb,"Selected filter : %s\n", pstr); SetDlgItemText32A( hWnd, edt1, pstr ); FILEDLG_ScanDir(hWnd, tmpstr); return TRUE; case chx1: return TRUE; case pshHelp: return TRUE; case IDOK: almost_ok: ofn2=*lpofn; /* for later restoring */ GetDlgItemText32A( hWnd, edt1, tmpstr, sizeof(tmpstr) ); pstr = strrchr(tmpstr, '\\'); if (pstr == NULL) pstr = strrchr(tmpstr, ':'); if (strchr(tmpstr,'*') != NULL || strchr(tmpstr,'?') != NULL) { /* edit control contains wildcards */ if (pstr != NULL) { strncpy(tmpstr2, pstr+1, 511); tmpstr2[511]=0; *(pstr+1) = 0; } else { strcpy(tmpstr2, tmpstr); *tmpstr=0; } dprintf_commdlg(stddeb,"commdlg: %s, %s\n", tmpstr, tmpstr2); SetDlgItemText32A( hWnd, edt1, tmpstr2 ); FILEDLG_ScanDir(hWnd, tmpstr); return TRUE; } /* no wildcards, we might have a directory or a filename */ /* try appending a wildcard and reading the directory */ pstr2 = tmpstr + strlen(tmpstr); if (pstr == NULL || *(pstr+1) != 0) strcat(tmpstr, "\\"); lRet = SendDlgItemMessage16(hWnd, cmb1, CB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; lpofn->nFilterIndex = lRet + 1; dprintf_commdlg(stddeb,"commdlg: lpofn->nFilterIndex=%ld\n", lpofn->nFilterIndex); lstrcpyn32A(tmpstr2, FILEDLG_GetFileType(PTR_SEG_TO_LIN(lpofn->lpstrCustomFilter), PTR_SEG_TO_LIN(lpofn->lpstrFilter), lRet), sizeof(tmpstr2)); SetDlgItemText32A( hWnd, edt1, tmpstr2 ); /* if ScanDir succeeds, we have changed the directory */ if (FILEDLG_ScanDir(hWnd, tmpstr)) return TRUE; /* if not, this must be a filename */ *pstr2 = 0; if (pstr != NULL) { /* strip off the pathname */ *pstr = 0; SetDlgItemText32A( hWnd, edt1, pstr + 1 ); lstrcpyn32A(tmpstr2, pstr+1, sizeof(tmpstr2) ); /* Should we MessageBox() if this fails? */ if (!FILEDLG_ScanDir(hWnd, tmpstr)) return TRUE; strcpy(tmpstr, tmpstr2); } else SetDlgItemText32A( hWnd, edt1, tmpstr ); #if 0 ShowWindow16(hWnd, SW_HIDE); /* this should not be necessary ?! (%%%) */ #endif { int drive = DRIVE_GetCurrentDrive(); tmpstr2[0] = 'A'+ drive; tmpstr2[1] = ':'; tmpstr2[2] = '\\'; strncpy(tmpstr2 + 3, DRIVE_GetDosCwd(drive), 507); tmpstr2[510]=0; if (strlen(tmpstr2) > 3) strcat(tmpstr2, "\\"); strncat(tmpstr2, tmpstr, 511-strlen(tmpstr2)); tmpstr2[511]=0; strcpy(PTR_SEG_TO_LIN(lpofn->lpstrFile), tmpstr2); } lpofn->nFileOffset = 0; lpofn->nFileExtension = 0; while(tmpstr2[lpofn->nFileExtension] != '.' && tmpstr2[lpofn->nFileExtension] != '\0') lpofn->nFileExtension++; if (lpofn->nFileExtension == '\0') lpofn->nFileExtension = 0; else lpofn->nFileExtension++; if (PTR_SEG_TO_LIN(lpofn->lpstrFileTitle) != NULL) { lRet = SendDlgItemMessage16(hWnd, lst1, LB_GETCURSEL16, 0, 0); SendDlgItemMessage16(hWnd, lst1, LB_GETTEXT16, lRet, lpofn->lpstrFileTitle ); } if (FILEDLG_HookCallChk(lpofn)) { lRet= (BOOL16)FILEDLG_CallWindowProc(lpofn, hWnd, RegisterWindowMessage32A( FILEOKSTRING ), 0, lParam ); if (lRet) { *lpofn=ofn2; /* restore old state */ #if 0 ShowWindow16(hWnd, SW_SHOW); /* only if above (%%%) SW_HIDE used */ #endif break; } } EndDialog32(hWnd, TRUE); return TRUE; case IDCANCEL: EndDialog32(hWnd, FALSE); return TRUE; } return FALSE; } /*********************************************************************** * FileOpenDlgProc (COMMDLG.6) */ LRESULT WINAPI FileOpenDlgProc(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { LPOPENFILENAME16 lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(GetWindowLong32A(hWnd, DWL_USER)); if (wMsg!=WM_INITDIALOG) if (FILEDLG_HookCallChk(lpofn)) { LRESULT lRet=(BOOL16)FILEDLG_CallWindowProc(lpofn,hWnd,wMsg,wParam,lParam); if (lRet) return lRet; /* else continue message processing */ } switch (wMsg) { case WM_INITDIALOG: return FILEDLG_WMInitDialog(hWnd, wParam, lParam); case WM_MEASUREITEM: return FILEDLG_WMMeasureItem(hWnd, wParam, lParam); case WM_DRAWITEM: return FILEDLG_WMDrawItem(hWnd, wParam, lParam, FALSE); case WM_COMMAND: return FILEDLG_WMCommand(hWnd, wParam, lParam); #if 0 case WM_CTLCOLOR: SetBkColor((HDC16)wParam, 0x00C0C0C0); switch (HIWORD(lParam)) { case CTLCOLOR_BTN: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; case CTLCOLOR_STATIC: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; } break; #endif } return FALSE; } /*********************************************************************** * FileSaveDlgProc (COMMDLG.7) */ LRESULT WINAPI FileSaveDlgProc(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { LPOPENFILENAME16 lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(GetWindowLong32A(hWnd, DWL_USER)); if (wMsg!=WM_INITDIALOG) if (FILEDLG_HookCallChk(lpofn)) { LRESULT lRet=(BOOL16)FILEDLG_CallWindowProc(lpofn,hWnd,wMsg,wParam,lParam); if (lRet) return lRet; /* else continue message processing */ } switch (wMsg) { case WM_INITDIALOG: return FILEDLG_WMInitDialog(hWnd, wParam, lParam); case WM_MEASUREITEM: return FILEDLG_WMMeasureItem(hWnd, wParam, lParam); case WM_DRAWITEM: return FILEDLG_WMDrawItem(hWnd, wParam, lParam, TRUE); case WM_COMMAND: return FILEDLG_WMCommand(hWnd, wParam, lParam); } /* case WM_CTLCOLOR: SetBkColor((HDC16)wParam, 0x00C0C0C0); switch (HIWORD(lParam)) { case CTLCOLOR_BTN: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; case CTLCOLOR_STATIC: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; } return FALSE; */ return FALSE; } /*********************************************************************** * FindTextDlg (COMMDLG.11) */ HWND16 WINAPI FindText( SEGPTR find ) { HANDLE16 hInst; LPCVOID ptr; LPFINDREPLACE lpFind = (LPFINDREPLACE)PTR_SEG_TO_LIN(find); /* * FIXME : Should respond to FR_ENABLETEMPLATE and FR_ENABLEHOOK here * For now, only the standard dialog works. */ /* * FIXME : We should do error checking on the lpFind structure here * and make CommDlgExtendedError() return the error condition. */ ptr = SYSRES_GetResPtr( SYSRES_DIALOG_FIND_TEXT ); hInst = WIN_GetWindowInstance( lpFind->hwndOwner ); return DIALOG_CreateIndirect( hInst, ptr, TRUE, lpFind->hwndOwner, (DLGPROC16)MODULE_GetWndProcEntry16("FindTextDlgProc"), find, WIN_PROC_16 ); } /*********************************************************************** * ReplaceText (COMMDLG.12) */ HWND16 WINAPI ReplaceText( SEGPTR find ) { HANDLE16 hInst; LPCVOID ptr; LPFINDREPLACE lpFind = (LPFINDREPLACE)PTR_SEG_TO_LIN(find); /* * FIXME : Should respond to FR_ENABLETEMPLATE and FR_ENABLEHOOK here * For now, only the standard dialog works. */ /* * FIXME : We should do error checking on the lpFind structure here * and make CommDlgExtendedError() return the error condition. */ ptr = SYSRES_GetResPtr( SYSRES_DIALOG_REPLACE_TEXT ); hInst = WIN_GetWindowInstance( lpFind->hwndOwner ); return DIALOG_CreateIndirect( hInst, ptr, TRUE, lpFind->hwndOwner, (DLGPROC16)MODULE_GetWndProcEntry16("ReplaceTextDlgProc"), find, WIN_PROC_16 ); } /*********************************************************************** * FINDDLG_WMInitDialog [internal] */ static LRESULT FINDDLG_WMInitDialog(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LPFINDREPLACE lpfr; SetWindowLong32A(hWnd, DWL_USER, lParam); lpfr = (LPFINDREPLACE)PTR_SEG_TO_LIN(lParam); lpfr->Flags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); /* * FIXME : If the initial FindWhat string is empty, we should disable the * FindNext (IDOK) button. Only after typing some text, the button should be * enabled. */ SetDlgItemText16(hWnd, edt1, lpfr->lpstrFindWhat); CheckRadioButton32(hWnd, rad1, rad2, (lpfr->Flags & FR_DOWN) ? rad2 : rad1); if (lpfr->Flags & (FR_HIDEUPDOWN | FR_NOUPDOWN)) { EnableWindow32(GetDlgItem32(hWnd, rad1), FALSE); EnableWindow32(GetDlgItem32(hWnd, rad2), FALSE); } if (lpfr->Flags & FR_HIDEUPDOWN) { ShowWindow32(GetDlgItem32(hWnd, rad1), SW_HIDE); ShowWindow32(GetDlgItem32(hWnd, rad2), SW_HIDE); ShowWindow32(GetDlgItem32(hWnd, grp1), SW_HIDE); } CheckDlgButton32(hWnd, chx1, (lpfr->Flags & FR_WHOLEWORD) ? 1 : 0); if (lpfr->Flags & (FR_HIDEWHOLEWORD | FR_NOWHOLEWORD)) EnableWindow32(GetDlgItem32(hWnd, chx1), FALSE); if (lpfr->Flags & FR_HIDEWHOLEWORD) ShowWindow32(GetDlgItem32(hWnd, chx1), SW_HIDE); CheckDlgButton32(hWnd, chx2, (lpfr->Flags & FR_MATCHCASE) ? 1 : 0); if (lpfr->Flags & (FR_HIDEMATCHCASE | FR_NOMATCHCASE)) EnableWindow32(GetDlgItem32(hWnd, chx2), FALSE); if (lpfr->Flags & FR_HIDEMATCHCASE) ShowWindow32(GetDlgItem32(hWnd, chx2), SW_HIDE); if (!(lpfr->Flags & FR_SHOWHELP)) { EnableWindow32(GetDlgItem32(hWnd, pshHelp), FALSE); ShowWindow32(GetDlgItem32(hWnd, pshHelp), SW_HIDE); } ShowWindow32(hWnd, SW_SHOWNORMAL); return TRUE; } /*********************************************************************** * FINDDLG_WMCommand [internal] */ static LRESULT FINDDLG_WMCommand(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LPFINDREPLACE lpfr; int uFindReplaceMessage = RegisterWindowMessage32A( FINDMSGSTRING ); int uHelpMessage = RegisterWindowMessage32A( HELPMSGSTRING ); lpfr = (LPFINDREPLACE)PTR_SEG_TO_LIN(GetWindowLong32A(hWnd, DWL_USER)); switch (wParam) { case IDOK: GetDlgItemText16(hWnd, edt1, lpfr->lpstrFindWhat, lpfr->wFindWhatLen); if (IsDlgButtonChecked32(hWnd, rad2)) lpfr->Flags |= FR_DOWN; else lpfr->Flags &= ~FR_DOWN; if (IsDlgButtonChecked32(hWnd, chx1)) lpfr->Flags |= FR_WHOLEWORD; else lpfr->Flags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked32(hWnd, chx2)) lpfr->Flags |= FR_MATCHCASE; else lpfr->Flags &= ~FR_MATCHCASE; lpfr->Flags &= ~(FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); lpfr->Flags |= FR_FINDNEXT; SendMessage16(lpfr->hwndOwner, uFindReplaceMessage, 0, GetWindowLong32A(hWnd, DWL_USER) ); return TRUE; case IDCANCEL: lpfr->Flags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL); lpfr->Flags |= FR_DIALOGTERM; SendMessage16(lpfr->hwndOwner, uFindReplaceMessage, 0, GetWindowLong32A(hWnd, DWL_USER) ); DestroyWindow16(hWnd); return TRUE; case pshHelp: /* FIXME : should lpfr structure be passed as an argument ??? */ SendMessage16(lpfr->hwndOwner, uHelpMessage, 0, 0); return TRUE; } return FALSE; } /*********************************************************************** * FindTextDlgProc (COMMDLG.13) */ LRESULT WINAPI FindTextDlgProc(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { switch (wMsg) { case WM_INITDIALOG: return FINDDLG_WMInitDialog(hWnd, wParam, lParam); case WM_COMMAND: return FINDDLG_WMCommand(hWnd, wParam, lParam); } return FALSE; } /*********************************************************************** * REPLACEDLG_WMInitDialog [internal] */ static LRESULT REPLACEDLG_WMInitDialog(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LPFINDREPLACE lpfr; SetWindowLong32A(hWnd, DWL_USER, lParam); lpfr = (LPFINDREPLACE)PTR_SEG_TO_LIN(lParam); lpfr->Flags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); /* * FIXME : If the initial FindWhat string is empty, we should disable the FinNext / * Replace / ReplaceAll buttons. Only after typing some text, the buttons should be * enabled. */ SetDlgItemText16(hWnd, edt1, lpfr->lpstrFindWhat); SetDlgItemText16(hWnd, edt2, lpfr->lpstrReplaceWith); CheckDlgButton32(hWnd, chx1, (lpfr->Flags & FR_WHOLEWORD) ? 1 : 0); if (lpfr->Flags & (FR_HIDEWHOLEWORD | FR_NOWHOLEWORD)) EnableWindow32(GetDlgItem32(hWnd, chx1), FALSE); if (lpfr->Flags & FR_HIDEWHOLEWORD) ShowWindow32(GetDlgItem32(hWnd, chx1), SW_HIDE); CheckDlgButton32(hWnd, chx2, (lpfr->Flags & FR_MATCHCASE) ? 1 : 0); if (lpfr->Flags & (FR_HIDEMATCHCASE | FR_NOMATCHCASE)) EnableWindow32(GetDlgItem32(hWnd, chx2), FALSE); if (lpfr->Flags & FR_HIDEMATCHCASE) ShowWindow32(GetDlgItem32(hWnd, chx2), SW_HIDE); if (!(lpfr->Flags & FR_SHOWHELP)) { EnableWindow32(GetDlgItem32(hWnd, pshHelp), FALSE); ShowWindow32(GetDlgItem32(hWnd, pshHelp), SW_HIDE); } ShowWindow32(hWnd, SW_SHOWNORMAL); return TRUE; } /*********************************************************************** * REPLACEDLG_WMCommand [internal] */ static LRESULT REPLACEDLG_WMCommand(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LPFINDREPLACE lpfr; int uFindReplaceMessage = RegisterWindowMessage32A( FINDMSGSTRING ); int uHelpMessage = RegisterWindowMessage32A( HELPMSGSTRING ); lpfr = (LPFINDREPLACE)PTR_SEG_TO_LIN(GetWindowLong32A(hWnd, DWL_USER)); switch (wParam) { case IDOK: GetDlgItemText16(hWnd, edt1, lpfr->lpstrFindWhat, lpfr->wFindWhatLen); GetDlgItemText16(hWnd, edt2, lpfr->lpstrReplaceWith, lpfr->wReplaceWithLen); if (IsDlgButtonChecked32(hWnd, chx1)) lpfr->Flags |= FR_WHOLEWORD; else lpfr->Flags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked32(hWnd, chx2)) lpfr->Flags |= FR_MATCHCASE; else lpfr->Flags &= ~FR_MATCHCASE; lpfr->Flags &= ~(FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); lpfr->Flags |= FR_FINDNEXT; SendMessage16(lpfr->hwndOwner, uFindReplaceMessage, 0, GetWindowLong32A(hWnd, DWL_USER) ); return TRUE; case IDCANCEL: lpfr->Flags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL); lpfr->Flags |= FR_DIALOGTERM; SendMessage16(lpfr->hwndOwner, uFindReplaceMessage, 0, GetWindowLong32A(hWnd, DWL_USER) ); DestroyWindow16(hWnd); return TRUE; case psh1: GetDlgItemText16(hWnd, edt1, lpfr->lpstrFindWhat, lpfr->wFindWhatLen); GetDlgItemText16(hWnd, edt2, lpfr->lpstrReplaceWith, lpfr->wReplaceWithLen); if (IsDlgButtonChecked32(hWnd, chx1)) lpfr->Flags |= FR_WHOLEWORD; else lpfr->Flags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked32(hWnd, chx2)) lpfr->Flags |= FR_MATCHCASE; else lpfr->Flags &= ~FR_MATCHCASE; lpfr->Flags &= ~(FR_FINDNEXT | FR_REPLACEALL | FR_DIALOGTERM); lpfr->Flags |= FR_REPLACE; SendMessage16(lpfr->hwndOwner, uFindReplaceMessage, 0, GetWindowLong32A(hWnd, DWL_USER) ); return TRUE; case psh2: GetDlgItemText16(hWnd, edt1, lpfr->lpstrFindWhat, lpfr->wFindWhatLen); GetDlgItemText16(hWnd, edt2, lpfr->lpstrReplaceWith, lpfr->wReplaceWithLen); if (IsDlgButtonChecked32(hWnd, chx1)) lpfr->Flags |= FR_WHOLEWORD; else lpfr->Flags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked32(hWnd, chx2)) lpfr->Flags |= FR_MATCHCASE; else lpfr->Flags &= ~FR_MATCHCASE; lpfr->Flags &= ~(FR_FINDNEXT | FR_REPLACE | FR_DIALOGTERM); lpfr->Flags |= FR_REPLACEALL; SendMessage16(lpfr->hwndOwner, uFindReplaceMessage, 0, GetWindowLong32A(hWnd, DWL_USER) ); return TRUE; case pshHelp: /* FIXME : should lpfr structure be passed as an argument ??? */ SendMessage16(lpfr->hwndOwner, uHelpMessage, 0, 0); return TRUE; } return FALSE; } /*********************************************************************** * ReplaceTextDlgProc (COMMDLG.14) */ LRESULT WINAPI ReplaceTextDlgProc(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { switch (wMsg) { case WM_INITDIALOG: return REPLACEDLG_WMInitDialog(hWnd, wParam, lParam); case WM_COMMAND: return REPLACEDLG_WMCommand(hWnd, wParam, lParam); } return FALSE; } /*********************************************************************** * PrintDlg16 (COMMDLG.20) */ BOOL16 WINAPI PrintDlg16( SEGPTR printdlg ) { HANDLE16 hInst; BOOL16 bRet = FALSE; LPCVOID template; HWND32 hwndDialog; LPPRINTDLG16 lpPrint = (LPPRINTDLG16)PTR_SEG_TO_LIN(printdlg); dprintf_commdlg(stddeb,"PrintDlg(%p) // Flags=%08lX\n", lpPrint, lpPrint->Flags ); if (lpPrint->Flags & PD_RETURNDEFAULT) /* FIXME: should fill lpPrint->hDevMode and lpPrint->hDevNames here */ return TRUE; if (lpPrint->Flags & PD_PRINTSETUP) template = SYSRES_GetResPtr( SYSRES_DIALOG_PRINT_SETUP ); else template = SYSRES_GetResPtr( SYSRES_DIALOG_PRINT ); hInst = WIN_GetWindowInstance( lpPrint->hwndOwner ); hwndDialog = DIALOG_CreateIndirect( hInst, template, TRUE, lpPrint->hwndOwner, (DLGPROC16)((lpPrint->Flags & PD_PRINTSETUP) ? MODULE_GetWndProcEntry16("PrintSetupDlgProc") : MODULE_GetWndProcEntry16("PrintDlgProc")), printdlg, WIN_PROC_16 ); if (hwndDialog) bRet = DIALOG_DoDialogBox( hwndDialog, lpPrint->hwndOwner); return bRet; } /*********************************************************************** * PrintDlg32A (COMDLG32.17) */ BOOL32 WINAPI PrintDlg32A( LPPRINTDLG32A printdlg ) { fprintf( stdnimp, "PrintDlg32A: empty stub\n" ); return FALSE; } /*********************************************************************** * PrintDlg32W (COMDLG32.18) */ BOOL32 WINAPI PrintDlg32W( LPPRINTDLG32W printdlg ) { fprintf( stdnimp, "PrintDlg32A: empty stub\n" ); return FALSE; } /*********************************************************************** * PrintDlgProc (COMMDLG.21) */ LRESULT WINAPI PrintDlgProc(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { switch (wMsg) { case WM_INITDIALOG: dprintf_commdlg(stddeb,"PrintDlgProc // WM_INITDIALOG lParam=%08lX\n", lParam); ShowWindow16(hWnd, SW_SHOWNORMAL); return (TRUE); case WM_COMMAND: switch (wParam) { case IDOK: EndDialog32(hWnd, TRUE); return(TRUE); case IDCANCEL: EndDialog32(hWnd, FALSE); return(TRUE); } return(FALSE); } return FALSE; } /*********************************************************************** * PrintSetupDlgProc (COMMDLG.22) */ LRESULT WINAPI PrintSetupDlgProc(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { switch (wMsg) { case WM_INITDIALOG: dprintf_commdlg(stddeb,"PrintSetupDlgProc // WM_INITDIALOG lParam=%08lX\n", lParam); ShowWindow16(hWnd, SW_SHOWNORMAL); return (TRUE); case WM_COMMAND: switch (wParam) { case IDOK: EndDialog32(hWnd, TRUE); return(TRUE); case IDCANCEL: EndDialog32(hWnd, FALSE); return(TRUE); } return(FALSE); } return FALSE; } /*********************************************************************** * CommDlgExtendedError (COMMDLG.26) */ DWORD WINAPI CommDlgExtendedError(void) { return CommDlgLastError; } /*********************************************************************** * GetFileTitleA (COMDLG32.8) */ short WINAPI GetFileTitle32A(LPCSTR lpFile, LPSTR lpTitle, UINT32 cbBuf) { int i, len; dprintf_commdlg(stddeb,"GetFileTitle(%p %p %d); \n", lpFile, lpTitle, cbBuf); if (lpFile == NULL || lpTitle == NULL) return -1; len = strlen(lpFile); if (len == 0) return -1; if (strpbrk(lpFile, "*[]")) return -1; len--; if (lpFile[len] == '/' || lpFile[len] == '\\' || lpFile[len] == ':') return -1; for (i = len; i >= 0; i--) if (lpFile[i] == '/' || lpFile[i] == '\\' || lpFile[i] == ':') { i++; break; } dprintf_commdlg(stddeb,"\n---> '%s' ", &lpFile[i]); len = strlen(lpFile+i)+1; if (cbBuf < len) return len; strncpy(lpTitle, &lpFile[i], len); return 0; } /*********************************************************************** * GetFileTitleA (COMDLG32.8) */ short WINAPI GetFileTitle32W(LPCWSTR lpFile, LPWSTR lpTitle, UINT32 cbBuf) { LPSTR file = HEAP_strdupWtoA(GetProcessHeap(),0,lpFile); LPSTR title = HeapAlloc(GetProcessHeap(),0,cbBuf); short ret; ret = GetFileTitle32A(file,title,cbBuf); lstrcpynAtoW(lpTitle,title,cbBuf); HeapFree(GetProcessHeap(),0,file); HeapFree(GetProcessHeap(),0,title); return ret; } /*********************************************************************** * GetFileTitle (COMMDLG.27) */ short WINAPI GetFileTitle16(LPCSTR lpFile, LPSTR lpTitle, UINT16 cbBuf) { return GetFileTitle32A(lpFile,lpTitle,cbBuf); } /* ------------------------ Choose Color Dialog --------------------------- */ /*********************************************************************** * ChooseColor (COMMDLG.5) */ BOOL16 WINAPI ChooseColor(LPCHOOSECOLOR lpChCol) { HINSTANCE16 hInst; HANDLE16 hDlgTmpl = 0; BOOL16 bRet = FALSE, win32Format = FALSE; LPCVOID template; HWND32 hwndDialog; dprintf_commdlg(stddeb,"ChooseColor\n"); if (!lpChCol) return FALSE; if (lpChCol->Flags & CC_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpChCol->hInstance ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else if (lpChCol->Flags & CC_ENABLETEMPLATE) { HANDLE16 hResInfo; if (!(hResInfo = FindResource16(lpChCol->hInstance, lpChCol->lpTemplateName, RT_DIALOG))) { CommDlgLastError = CDERR_FINDRESFAILURE; return FALSE; } if (!(hDlgTmpl = LoadResource16( lpChCol->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else { template = SYSRES_GetResPtr( SYSRES_DIALOG_CHOOSE_COLOR ); win32Format = TRUE; } hInst = WIN_GetWindowInstance( lpChCol->hwndOwner ); hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpChCol->hwndOwner, (DLGPROC16)MODULE_GetWndProcEntry16("ColorDlgProc"), (DWORD)lpChCol, WIN_PROC_16 ); if (hwndDialog) bRet = DIALOG_DoDialogBox( hwndDialog, lpChCol->hwndOwner); if (hDlgTmpl) FreeResource16( hDlgTmpl ); return bRet; } static const COLORREF predefcolors[6][8]= { { 0x008080FFL, 0x0080FFFFL, 0x0080FF80L, 0x0080FF00L, 0x00FFFF80L, 0x00FF8000L, 0x00C080FFL, 0x00FF80FFL }, { 0x000000FFL, 0x0000FFFFL, 0x0000FF80L, 0x0040FF00L, 0x00FFFF00L, 0x00C08000L, 0x00C08080L, 0x00FF00FFL }, { 0x00404080L, 0x004080FFL, 0x0000FF00L, 0x00808000L, 0x00804000L, 0x00FF8080L, 0x00400080L, 0x008000FFL }, { 0x00000080L, 0x000080FFL, 0x00008000L, 0x00408000L, 0x00FF0000L, 0x00A00000L, 0x00800080L, 0x00FF0080L }, { 0x00000040L, 0x00004080L, 0x00004000L, 0x00404000L, 0x00800000L, 0x00400000L, 0x00400040L, 0x00800040L }, { 0x00000000L, 0x00008080L, 0x00408080L, 0x00808080L, 0x00808040L, 0x00C0C0C0L, 0x00400040L, 0x00FFFFFFL }, }; struct CCPRIVATE { LPCHOOSECOLOR lpcc; /* points to public known data structure */ int nextuserdef; /* next free place in user defined color array */ HDC16 hdcMem; /* color graph used for BitBlt() */ HBITMAP16 hbmMem; /* color graph bitmap */ RECT16 fullsize; /* original dialog window size */ UINT16 msetrgb; /* # of SETRGBSTRING message (today not used) */ RECT16 old3angle; /* last position of l-marker */ RECT16 oldcross; /* last position of color/satuation marker */ BOOL32 updating; /* to prevent recursive WM_COMMAND/EN_UPDATE procesing */ int h; int s; int l; /* for temporary storing of hue,sat,lum */ }; /*********************************************************************** * CC_HSLtoRGB [internal] */ static int CC_HSLtoRGB(char c,int hue,int sat,int lum) { int res=0,maxrgb; /* hue */ switch(c) { case 'R':if (hue>80) hue-=80; else hue+=160; break; case 'G':if (hue>160) hue-=160; else hue+=80; break; case 'B':break; } /* l below 120 */ maxrgb=(256*MIN(120,lum))/120; /* 0 .. 256 */ if (hue< 80) res=0; else if (hue< 120) { res=(hue-80)* maxrgb; /* 0...10240 */ res/=40; /* 0...256 */ } else if (hue< 200) res=maxrgb; else { res=(240-hue)* maxrgb; res/=40; } res=res-maxrgb/2; /* -128...128 */ /* saturation */ res=maxrgb/2 + (sat*res) /240; /* 0..256 */ /* lum above 120 */ if (lum>120 && res<256) res+=((lum-120) * (256-res))/120; return MIN(res,255); } /*********************************************************************** * CC_RGBtoHSL [internal] */ static int CC_RGBtoHSL(char c,int r,int g,int b) { WORD maxi,mini,mmsum,mmdif,result=0; int iresult=0; maxi=MAX(r,b); maxi=MAX(maxi,g); mini=MIN(r,b); mini=MIN(mini,g); mmsum=maxi+mini; mmdif=maxi-mini; switch(c) { /* lum */ case 'L':mmsum*=120; /* 0...61200=(255+255)*120 */ result=mmsum/255; /* 0...240 */ break; /* saturation */ case 'S':if (!mmsum) result=0; else if (!mini || maxi==255) result=240; else { result=mmdif*240; /* 0...61200=255*240 */ result/= (mmsum>255 ? mmsum=510-mmsum : mmsum); /* 0..255 */ } break; /* hue */ case 'H':if (!mmdif) result=160; else { if (maxi==r) { iresult=40*(g-b); /* -10200 ... 10200 */ iresult/=(int)mmdif; /* -40 .. 40 */ if (iresult<0) iresult+=240; /* 0..40 and 200..240 */ } else if (maxi==g) { iresult=40*(b-r); iresult/=(int)mmdif; iresult+=80; /* 40 .. 120 */ } else if (maxi==b) { iresult=40*(r-g); iresult/=(int)mmdif; iresult+=160; /* 120 .. 200 */ } result=iresult; } break; } return result; /* is this integer arithmetic precise enough ? */ } #define DISTANCE 4 /*********************************************************************** * CC_MouseCheckPredefColorArray [internal] */ static int CC_MouseCheckPredefColorArray(HWND16 hDlg,int dlgitem,int rows,int cols, LPARAM lParam,COLORREF *cr) { HWND16 hwnd; POINT16 point = MAKEPOINT16(lParam); RECT16 rect; int dx,dy,x,y; ClientToScreen16(hDlg,&point); hwnd=GetDlgItem32(hDlg,dlgitem); GetWindowRect16(hwnd,&rect); if (PtInRect16(&rect,point)) { dx=(rect.right-rect.left)/cols; dy=(rect.bottom-rect.top)/rows; ScreenToClient16(hwnd,&point); if (point.x % dx < (dx-DISTANCE) && point.y % dy < (dy-DISTANCE)) { x=point.x/dx; y=point.y/dy; *cr=predefcolors[y][x]; /* FIXME: Draw_a_Focus_Rect() */ return 1; } } return 0; } /*********************************************************************** * CC_MouseCheckUserColorArray [internal] */ static int CC_MouseCheckUserColorArray(HWND16 hDlg,int dlgitem,int rows,int cols, LPARAM lParam,COLORREF *cr,COLORREF*crarr) { HWND16 hwnd; POINT16 point = MAKEPOINT16(lParam); RECT16 rect; int dx,dy,x,y; ClientToScreen16(hDlg,&point); hwnd=GetDlgItem32(hDlg,dlgitem); GetWindowRect16(hwnd,&rect); if (PtInRect16(&rect,point)) { dx=(rect.right-rect.left)/cols; dy=(rect.bottom-rect.top)/rows; ScreenToClient16(hwnd,&point); if (point.x % dx < (dx-DISTANCE) && point.y % dy < (dy-DISTANCE)) { x=point.x/dx; y=point.y/dy; *cr=crarr[x+cols*y]; /* FIXME: Draw_a_Focus_Rect() */ return 1; } } return 0; } #define MAXVERT 240 #define MAXHORI 239 /* 240 ^...... ^^ 240 | . || SAT | . || LUM | . || +-----> 239 ---- HUE */ /*********************************************************************** * CC_MouseCheckColorGraph [internal] */ static int CC_MouseCheckColorGraph(HWND16 hDlg,int dlgitem,int *hori,int *vert,LPARAM lParam) { HWND32 hwnd; POINT16 point = MAKEPOINT16(lParam); RECT16 rect; long x,y; ClientToScreen16(hDlg,&point); hwnd=GetDlgItem32(hDlg,dlgitem); GetWindowRect16(hwnd,&rect); if (PtInRect16(&rect,point)) { GetClientRect16(hwnd,&rect); ScreenToClient16(hwnd,&point); x=(long)point.x*MAXHORI; x/=rect.right; y=(long)(rect.bottom-point.y)*MAXVERT; y/=rect.bottom; if (hori) *hori=x; if (vert) *vert=y; return 1; } else return 0; } /*********************************************************************** * CC_MouseCheckResultWindow [internal] */ static int CC_MouseCheckResultWindow(HWND16 hDlg,LPARAM lParam) { HWND16 hwnd; POINT16 point = MAKEPOINT16(lParam); RECT16 rect; ClientToScreen16(hDlg,&point); hwnd=GetDlgItem32(hDlg,0x2c5); GetWindowRect16(hwnd,&rect); if (PtInRect16(&rect,point)) { PostMessage16(hDlg,WM_COMMAND,0x2c9,0); return 1; } return 0; } /*********************************************************************** * CC_CheckDigitsInEdit [internal] */ static int CC_CheckDigitsInEdit(HWND16 hwnd,int maxval) { int i,k,m,result,value; long editpos; char buffer[30]; GetWindowText32A(hwnd,buffer,sizeof(buffer)); m=strlen(buffer); result=0; for (i=0;i'9') { for (k=i+1;k<=m;k++) /* delete bad character */ { buffer[i]=buffer[k]; m--; } buffer[m]=0; result=1; } value=atoi(buffer); if (value>maxval) /* build a new string */ { sprintf(buffer,"%d",maxval); result=2; } if (result) { editpos=SendMessage16(hwnd,EM_GETSEL16,0,0); SetWindowText32A(hwnd,buffer); SendMessage16(hwnd,EM_SETSEL16,0,editpos); } return value; } /*********************************************************************** * CC_PaintSelectedColor [internal] */ static void CC_PaintSelectedColor(HWND16 hDlg,COLORREF cr) { RECT16 rect; HDC32 hdc; HBRUSH32 hBrush; HWND32 hwnd=GetDlgItem32(hDlg,0x2c5); if (IsWindowVisible32(GetDlgItem32(hDlg,0x2c6))) /* if full size */ { hdc=GetDC32(hwnd); GetClientRect16 (hwnd, &rect) ; hBrush = CreateSolidBrush32(cr); if (hBrush) { hBrush = SelectObject32 (hdc, hBrush) ; Rectangle32(hdc, rect.left,rect.top,rect.right/2,rect.bottom); DeleteObject32 (SelectObject32 (hdc,hBrush)) ; hBrush=CreateSolidBrush32(GetNearestColor32(hdc,cr)); if (hBrush) { hBrush= SelectObject32 (hdc, hBrush) ; Rectangle32( hdc, rect.right/2-1,rect.top,rect.right,rect.bottom); DeleteObject32( SelectObject32 (hdc, hBrush)) ; } } ReleaseDC32(hwnd,hdc); } } /*********************************************************************** * CC_PaintTriangle [internal] */ static void CC_PaintTriangle(HWND16 hDlg,int y) { HDC32 hDC; long temp; int w=GetDialogBaseUnits(); POINT16 points[3]; int height; int oben; RECT16 rect; HWND16 hwnd=GetDlgItem32(hDlg,0x2be); struct CCPRIVATE *lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); if (IsWindowVisible32(GetDlgItem32(hDlg,0x2c6))) /* if full size */ { GetClientRect16(hwnd,&rect); height=rect.bottom; hDC=GetDC32(hDlg); points[0].y=rect.top; points[0].x=rect.right; /* | /| */ ClientToScreen16(hwnd,points); /* | / | */ ScreenToClient16(hDlg,points); /* |< | */ oben=points[0].y; /* | \ | */ /* | \| */ temp=(long)height*(long)y; points[0].y=oben+height -temp/(long)MAXVERT; points[1].y=points[0].y+w; points[2].y=points[0].y-w; points[2].x=points[1].x=points[0].x + w; if (lpp->old3angle.left) FillRect16(hDC,&lpp->old3angle,GetStockObject32(WHITE_BRUSH)); lpp->old3angle.left =points[0].x; lpp->old3angle.right =points[1].x+1; lpp->old3angle.top =points[2].y-1; lpp->old3angle.bottom=points[1].y+1; Polygon16(hDC,points,3); ReleaseDC32(hDlg,hDC); } } /*********************************************************************** * CC_PaintCross [internal] */ static void CC_PaintCross(HWND16 hDlg,int x,int y) { HDC32 hDC; int w=GetDialogBaseUnits(); HWND16 hwnd=GetDlgItem32(hDlg,0x2c6); struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); RECT16 rect; POINT16 point; HPEN32 hPen; if (IsWindowVisible32(GetDlgItem32(hDlg,0x2c6))) /* if full size */ { GetClientRect16(hwnd,&rect); hDC=GetDC32(hwnd); SelectClipRgn32(hDC,CreateRectRgnIndirect16(&rect)); hPen=CreatePen32(PS_SOLID,2,0); hPen=SelectObject32(hDC,hPen); point.x=((long)rect.right*(long)x)/(long)MAXHORI; point.y=rect.bottom-((long)rect.bottom*(long)y)/(long)MAXVERT; if (lpp->oldcross.left!=lpp->oldcross.right) BitBlt32(hDC,lpp->oldcross.left,lpp->oldcross.top, lpp->oldcross.right-lpp->oldcross.left, lpp->oldcross.bottom-lpp->oldcross.top, lpp->hdcMem,lpp->oldcross.left,lpp->oldcross.top,SRCCOPY); lpp->oldcross.left =point.x-w-1; lpp->oldcross.right =point.x+w+1; lpp->oldcross.top =point.y-w-1; lpp->oldcross.bottom=point.y+w+1; MoveTo(hDC,point.x-w,point.y); LineTo32(hDC,point.x+w,point.y); MoveTo(hDC,point.x,point.y-w); LineTo32(hDC,point.x,point.y+w); DeleteObject32(SelectObject32(hDC,hPen)); ReleaseDC32(hwnd,hDC); } } #define XSTEPS 48 #define YSTEPS 24 /*********************************************************************** * CC_PrepareColorGraph [internal] */ static void CC_PrepareColorGraph(HWND16 hDlg) { int sdif,hdif,xdif,ydif,r,g,b,hue,sat; HWND32 hwnd=GetDlgItem32(hDlg,0x2c6); struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); HBRUSH32 hbrush; HDC32 hdc ; RECT16 rect,client; HCURSOR16 hcursor=SetCursor16(LoadCursor16(0,IDC_WAIT)); GetClientRect16(hwnd,&client); hdc=GetDC32(hwnd); lpp->hdcMem = CreateCompatibleDC32(hdc); lpp->hbmMem = CreateCompatibleBitmap32(hdc,client.right,client.bottom); SelectObject32(lpp->hdcMem,lpp->hbmMem); xdif=client.right /XSTEPS; ydif=client.bottom/YSTEPS+1; hdif=239/XSTEPS; sdif=240/YSTEPS; for(rect.left=hue=0;hue<239+hdif;hue+=hdif) { rect.right=rect.left+xdif; rect.bottom=client.bottom; for(sat=0;sat<240+sdif;sat+=sdif) { rect.top=rect.bottom-ydif; r=CC_HSLtoRGB('R',hue,sat,120); g=CC_HSLtoRGB('G',hue,sat,120); b=CC_HSLtoRGB('B',hue,sat,120); hbrush=CreateSolidBrush32(RGB(r,g,b)); FillRect16(lpp->hdcMem,&rect,hbrush); DeleteObject32(hbrush); rect.bottom=rect.top; } rect.left=rect.right; } ReleaseDC32(hwnd,hdc); SetCursor16(hcursor); } /*********************************************************************** * CC_PaintColorGraph [internal] */ static void CC_PaintColorGraph(HWND16 hDlg) { HWND32 hwnd=GetDlgItem32(hDlg,0x2c6); struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); HDC32 hDC; RECT16 rect; if (IsWindowVisible32(hwnd)) /* if full size */ { if (!lpp->hdcMem) CC_PrepareColorGraph(hDlg); /* should not be necessary */ hDC=GetDC32(hwnd); GetClientRect16(hwnd,&rect); if (lpp->hdcMem) BitBlt32(hDC,0,0,rect.right,rect.bottom,lpp->hdcMem,0,0,SRCCOPY); else fprintf(stderr,"choose color: hdcMem is not defined\n"); ReleaseDC32(hwnd,hDC); } } /*********************************************************************** * CC_PaintLumBar [internal] */ static void CC_PaintLumBar(HWND16 hDlg,int hue,int sat) { HWND32 hwnd=GetDlgItem32(hDlg,0x2be); RECT16 rect,client; int lum,ldif,ydif,r,g,b; HBRUSH32 hbrush; HDC32 hDC; if (IsWindowVisible32(hwnd)) { hDC=GetDC32(hwnd); GetClientRect16(hwnd,&client); rect=client; ldif=240/YSTEPS; ydif=client.bottom/YSTEPS+1; for(lum=0;lum<240+ldif;lum+=ldif) { rect.top=MAX(0,rect.bottom-ydif); r=CC_HSLtoRGB('R',hue,sat,lum); g=CC_HSLtoRGB('G',hue,sat,lum); b=CC_HSLtoRGB('B',hue,sat,lum); hbrush=CreateSolidBrush32(RGB(r,g,b)); FillRect16(hDC,&rect,hbrush); DeleteObject32(hbrush); rect.bottom=rect.top; } GetClientRect16(hwnd,&rect); FrameRect16(hDC,&rect,GetStockObject32(BLACK_BRUSH)); ReleaseDC32(hwnd,hDC); } } /*********************************************************************** * CC_EditSetRGB [internal] */ static void CC_EditSetRGB(HWND16 hDlg,COLORREF cr) { char buffer[10]; struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); int r=GetRValue(cr); int g=GetGValue(cr); int b=GetBValue(cr); if (IsWindowVisible32(GetDlgItem32(hDlg,0x2c6))) /* if full size */ { lpp->updating=TRUE; sprintf(buffer,"%d",r); SetWindowText32A(GetDlgItem32(hDlg,0x2c2),buffer); sprintf(buffer,"%d",g); SetWindowText32A(GetDlgItem32(hDlg,0x2c3),buffer); sprintf(buffer,"%d",b); SetWindowText32A(GetDlgItem32(hDlg,0x2c4),buffer); lpp->updating=FALSE; } } /*********************************************************************** * CC_EditSetHSL [internal] */ static void CC_EditSetHSL(HWND16 hDlg,int h,int s,int l) { char buffer[10]; struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); lpp->updating=TRUE; if (IsWindowVisible32(GetDlgItem32(hDlg,0x2c6))) /* if full size */ { lpp->updating=TRUE; sprintf(buffer,"%d",h); SetWindowText32A(GetDlgItem32(hDlg,0x2bf),buffer); sprintf(buffer,"%d",s); SetWindowText32A(GetDlgItem32(hDlg,0x2c0),buffer); sprintf(buffer,"%d",l); SetWindowText32A(GetDlgItem32(hDlg,0x2c1),buffer); lpp->updating=FALSE; } CC_PaintLumBar(hDlg,h,s); } /*********************************************************************** * CC_SwitchToFullSize [internal] */ static void CC_SwitchToFullSize(HWND16 hDlg,COLORREF result,LPRECT16 lprect) { int i; struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); EnableWindow32(GetDlgItem32(hDlg,0x2cf),FALSE); CC_PrepareColorGraph(hDlg); for (i=0x2bf;i<0x2c5;i++) EnableWindow32(GetDlgItem32(hDlg,i),TRUE); for (i=0x2d3;i<0x2d9;i++) EnableWindow32(GetDlgItem32(hDlg,i),TRUE); EnableWindow32(GetDlgItem32(hDlg,0x2c9),TRUE); EnableWindow32(GetDlgItem32(hDlg,0x2c8),TRUE); if (lprect) SetWindowPos32(hDlg,NULL,0,0,lprect->right-lprect->left, lprect->bottom-lprect->top, SWP_NOMOVE|SWP_NOZORDER); ShowWindow32(GetDlgItem32(hDlg,0x2c6),SW_SHOW); ShowWindow32(GetDlgItem32(hDlg,0x2be),SW_SHOW); ShowWindow32(GetDlgItem32(hDlg,0x2c5),SW_SHOW); CC_EditSetRGB(hDlg,result); CC_EditSetHSL(hDlg,lpp->h,lpp->s,lpp->l); } /*********************************************************************** * CC_PaintPredefColorArray [internal] */ static void CC_PaintPredefColorArray(HWND16 hDlg,int rows,int cols) { HWND32 hwnd=GetDlgItem32(hDlg,0x2d0); RECT16 rect; HDC32 hdc; HBRUSH32 hBrush; int dx,dy,i,j,k; GetClientRect16(hwnd,&rect); dx=rect.right/cols; dy=rect.bottom/rows; k=rect.left; hdc=GetDC32(hwnd); GetClientRect16 (hwnd, &rect) ; for (j=0;jFlags & CC_ENABLEHOOK) if (lpcc->lpfnHook) return TRUE; return FALSE; } /*********************************************************************** * CC_WMInitDialog [internal] */ static LONG CC_WMInitDialog(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { int i,res; HWND16 hwnd; RECT16 rect; POINT16 point; struct CCPRIVATE * lpp; dprintf_commdlg(stddeb,"ColorDlgProc // WM_INITDIALOG lParam=%08lX\n", lParam); lpp=calloc(1,sizeof(struct CCPRIVATE)); lpp->lpcc=(LPCHOOSECOLOR)lParam; if (lpp->lpcc->lStructSize != sizeof(CHOOSECOLOR)) { EndDialog32 (hDlg, 0) ; return FALSE; } SetWindowLong32A(hDlg, DWL_USER, (LONG)lpp); if (!(lpp->lpcc->Flags & CC_SHOWHELP)) ShowWindow32(GetDlgItem32(hDlg,0x40e),SW_HIDE); lpp->msetrgb=RegisterWindowMessage32A( SETRGBSTRING ); #if 0 cpos=MAKELONG(5,7); /* init */ if (lpp->lpcc->Flags & CC_RGBINIT) { for (i=0;i<6;i++) for (j=0;j<8;j++) if (predefcolors[i][j]==lpp->lpcc->rgbResult) { cpos=MAKELONG(i,j); goto found; } } found: /* FIXME: Draw_a_focus_rect & set_init_values */ #endif GetWindowRect16(hDlg,&lpp->fullsize); if (lpp->lpcc->Flags & CC_FULLOPEN || lpp->lpcc->Flags & CC_PREVENTFULLOPEN) { hwnd=GetDlgItem32(hDlg,0x2cf); EnableWindow32(hwnd,FALSE); } if (!(lpp->lpcc->Flags & CC_FULLOPEN) || lpp->lpcc->Flags & CC_PREVENTFULLOPEN) { rect=lpp->fullsize; res=rect.bottom-rect.top; hwnd=GetDlgItem32(hDlg,0x2c6); /* cut at left border */ point.x=point.y=0; ClientToScreen16(hwnd,&point); ScreenToClient16(hDlg,&point); GetClientRect16(hDlg,&rect); point.x+=GetSystemMetrics32(SM_CXDLGFRAME); SetWindowPos32(hDlg,NULL,0,0,point.x,res,SWP_NOMOVE|SWP_NOZORDER); ShowWindow32(GetDlgItem32(hDlg,0x2c6),SW_HIDE); ShowWindow32(GetDlgItem32(hDlg,0x2c5),SW_HIDE); } else CC_SwitchToFullSize(hDlg,lpp->lpcc->rgbResult,NULL); res=TRUE; for (i=0x2bf;i<0x2c5;i++) SendMessage16(GetDlgItem32(hDlg,i),EM_LIMITTEXT16,3,0); /* max 3 digits: xyz */ if (CC_HookCallChk(lpp->lpcc)) res=CallWindowProc16(lpp->lpcc->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); return res; } /*********************************************************************** * CC_WMCommand [internal] */ static LRESULT CC_WMCommand(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { int r,g,b,i,xx; UINT16 cokmsg; HDC32 hdc; COLORREF *cr; struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); dprintf_commdlg(stddeb,"CC_WMCommand wParam=%x lParam=%lx\n",wParam,lParam); switch (wParam) { case 0x2c2: /* edit notify RGB */ case 0x2c3: case 0x2c4: if (HIWORD(lParam)==EN_UPDATE && !lpp->updating) { i=CC_CheckDigitsInEdit(LOWORD(lParam),255); r=GetRValue(lpp->lpcc->rgbResult); g=GetGValue(lpp->lpcc->rgbResult); b=GetBValue(lpp->lpcc->rgbResult); xx=0; switch (wParam) { case 0x2c2:if ((xx=(i!=r))) r=i;break; case 0x2c3:if ((xx=(i!=g))) g=i;break; case 0x2c4:if ((xx=(i!=b))) b=i;break; } if (xx) /* something has changed */ { lpp->lpcc->rgbResult=RGB(r,g,b); CC_PaintSelectedColor(hDlg,lpp->lpcc->rgbResult); lpp->h=CC_RGBtoHSL('H',r,g,b); lpp->s=CC_RGBtoHSL('S',r,g,b); lpp->l=CC_RGBtoHSL('L',r,g,b); CC_EditSetHSL(hDlg,lpp->h,lpp->s,lpp->l); CC_PaintCross(hDlg,lpp->h,lpp->s); CC_PaintTriangle(hDlg,lpp->l); } } break; case 0x2bf: /* edit notify HSL */ case 0x2c0: case 0x2c1: if (HIWORD(lParam)==EN_UPDATE && !lpp->updating) { i=CC_CheckDigitsInEdit(LOWORD(lParam),wParam==0x2bf?239:240); xx=0; switch (wParam) { case 0x2bf:if ((xx=(i!=lpp->h))) lpp->h=i;break; case 0x2c0:if ((xx=(i!=lpp->s))) lpp->s=i;break; case 0x2c1:if ((xx=(i!=lpp->l))) lpp->l=i;break; } if (xx) /* something has changed */ { r=CC_HSLtoRGB('R',lpp->h,lpp->s,lpp->l); g=CC_HSLtoRGB('G',lpp->h,lpp->s,lpp->l); b=CC_HSLtoRGB('B',lpp->h,lpp->s,lpp->l); lpp->lpcc->rgbResult=RGB(r,g,b); CC_PaintSelectedColor(hDlg,lpp->lpcc->rgbResult); CC_EditSetRGB(hDlg,lpp->lpcc->rgbResult); CC_PaintCross(hDlg,lpp->h,lpp->s); CC_PaintTriangle(hDlg,lpp->l); } } break; case 0x2cf: CC_SwitchToFullSize(hDlg,lpp->lpcc->rgbResult,&lpp->fullsize); InvalidateRect32( hDlg, NULL, TRUE ); SetFocus32(GetDlgItem32(hDlg,0x2bf)); break; case 0x2c8: /* add colors ... column by column */ cr=PTR_SEG_TO_LIN(lpp->lpcc->lpCustColors); cr[(lpp->nextuserdef%2)*8 + lpp->nextuserdef/2]=lpp->lpcc->rgbResult; if (++lpp->nextuserdef==16) lpp->nextuserdef=0; CC_PaintUserColorArray(hDlg,2,8,PTR_SEG_TO_LIN(lpp->lpcc->lpCustColors)); break; case 0x2c9: /* resulting color */ hdc=GetDC32(hDlg); lpp->lpcc->rgbResult=GetNearestColor32(hdc,lpp->lpcc->rgbResult); ReleaseDC32(hDlg,hdc); CC_EditSetRGB(hDlg,lpp->lpcc->rgbResult); CC_PaintSelectedColor(hDlg,lpp->lpcc->rgbResult); r=GetRValue(lpp->lpcc->rgbResult); g=GetGValue(lpp->lpcc->rgbResult); b=GetBValue(lpp->lpcc->rgbResult); lpp->h=CC_RGBtoHSL('H',r,g,b); lpp->s=CC_RGBtoHSL('S',r,g,b); lpp->l=CC_RGBtoHSL('L',r,g,b); CC_EditSetHSL(hDlg,lpp->h,lpp->s,lpp->l); CC_PaintCross(hDlg,lpp->h,lpp->s); CC_PaintTriangle(hDlg,lpp->l); break; case 0x40e: /* Help! */ /* The Beatles, 1965 ;-) */ i=RegisterWindowMessage32A( HELPMSGSTRING ); if (lpp->lpcc->hwndOwner) SendMessage16(lpp->lpcc->hwndOwner,i,0,(LPARAM)lpp->lpcc); if (CC_HookCallChk(lpp->lpcc)) CallWindowProc16(lpp->lpcc->lpfnHook,hDlg, WM_COMMAND,psh15,(LPARAM)lpp->lpcc); break; case IDOK : cokmsg=RegisterWindowMessage32A( COLOROKSTRING ); if (lpp->lpcc->hwndOwner) if (SendMessage16(lpp->lpcc->hwndOwner,cokmsg,0,(LPARAM)lpp->lpcc)) break; /* do NOT close */ EndDialog32 (hDlg, 1) ; return TRUE ; case IDCANCEL : EndDialog32 (hDlg, 0) ; return TRUE ; } return FALSE; } /*********************************************************************** * CC_WMPaint [internal] */ static LRESULT CC_WMPaint(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); /* we have to paint dialog children except text and buttons */ CC_PaintPredefColorArray(hDlg,6,8); CC_PaintUserColorArray(hDlg,2,8,PTR_SEG_TO_LIN(lpp->lpcc->lpCustColors)); CC_PaintColorGraph(hDlg); CC_PaintLumBar(hDlg,lpp->h,lpp->s); CC_PaintCross(hDlg,lpp->h,lpp->s); CC_PaintTriangle(hDlg,lpp->l); CC_PaintSelectedColor(hDlg,lpp->lpcc->rgbResult); /* special necessary for Wine */ ValidateRect32(GetDlgItem32(hDlg,0x2d0),NULL); ValidateRect32(GetDlgItem32(hDlg,0x2d1),NULL); ValidateRect32(GetDlgItem32(hDlg,0x2c6),NULL); ValidateRect32(GetDlgItem32(hDlg,0x2be),NULL); ValidateRect32(GetDlgItem32(hDlg,0x2c5),NULL); /* hope we can remove it later -->FIXME */ return 0; } /*********************************************************************** * CC_WMLButtonDown [internal] */ static LRESULT CC_WMLButtonDown(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); int r,g,b,i; i=0; if (CC_MouseCheckPredefColorArray(hDlg,0x2d0,6,8,lParam,&lpp->lpcc->rgbResult)) i=1; else if (CC_MouseCheckUserColorArray(hDlg,0x2d1,2,8,lParam,&lpp->lpcc->rgbResult, PTR_SEG_TO_LIN(lpp->lpcc->lpCustColors))) i=1; else if (CC_MouseCheckColorGraph(hDlg,0x2c6,&lpp->h,&lpp->s,lParam)) i=2; else if (CC_MouseCheckColorGraph(hDlg,0x2be,NULL,&lpp->l,lParam)) i=2; if (i==2) { r=CC_HSLtoRGB('R',lpp->h,lpp->s,lpp->l); g=CC_HSLtoRGB('G',lpp->h,lpp->s,lpp->l); b=CC_HSLtoRGB('B',lpp->h,lpp->s,lpp->l); lpp->lpcc->rgbResult=RGB(r,g,b); } if (i==1) { r=GetRValue(lpp->lpcc->rgbResult); g=GetGValue(lpp->lpcc->rgbResult); b=GetBValue(lpp->lpcc->rgbResult); lpp->h=CC_RGBtoHSL('H',r,g,b); lpp->s=CC_RGBtoHSL('S',r,g,b); lpp->l=CC_RGBtoHSL('L',r,g,b); } if (i) { CC_EditSetRGB(hDlg,lpp->lpcc->rgbResult); CC_EditSetHSL(hDlg,lpp->h,lpp->s,lpp->l); CC_PaintCross(hDlg,lpp->h,lpp->s); CC_PaintTriangle(hDlg,lpp->l); CC_PaintSelectedColor(hDlg,lpp->lpcc->rgbResult); return TRUE; } return FALSE; } /*********************************************************************** * ColorDlgProc (COMMDLG.8) */ LRESULT WINAPI ColorDlgProc(HWND16 hDlg, UINT16 message, WPARAM16 wParam, LONG lParam) { int res; struct CCPRIVATE * lpp=(struct CCPRIVATE *)GetWindowLong32A(hDlg, DWL_USER); if (message!=WM_INITDIALOG) { if (!lpp) return FALSE; res=0; if (CC_HookCallChk(lpp->lpcc)) res=CallWindowProc16(lpp->lpcc->lpfnHook,hDlg,message,wParam,lParam); if (res) return res; } /* FIXME: SetRGB message if (message && message==msetrgb) return HandleSetRGB(hDlg,lParam); */ switch (message) { case WM_INITDIALOG: return CC_WMInitDialog(hDlg,wParam,lParam); case WM_NCDESTROY: DeleteDC32(lpp->hdcMem); DeleteObject32(lpp->hbmMem); free(lpp); SetWindowLong32A(hDlg, DWL_USER, 0L); /* we don't need it anymore */ break; case WM_COMMAND: if (CC_WMCommand(hDlg, wParam, lParam)) return TRUE; break; case WM_PAINT: CC_WMPaint(hDlg, wParam, lParam); break; case WM_LBUTTONDBLCLK: if (CC_MouseCheckResultWindow(hDlg,lParam)) return TRUE; break; case WM_MOUSEMOVE: /* FIXME: calculate new hue,sat,lum (if in color graph) */ break; case WM_LBUTTONUP: /* FIXME: ClipCursor off (if in color graph)*/ break; case WM_LBUTTONDOWN:/* FIXME: ClipCursor on (if in color graph)*/ if (CC_WMLButtonDown(hDlg, wParam, lParam)) return TRUE; break; } return FALSE ; } /*********************************************************************** * ChooseFont (COMMDLG.15) */ BOOL16 WINAPI ChooseFont(LPCHOOSEFONT lpChFont) { HINSTANCE16 hInst; HANDLE16 hDlgTmpl = 0; BOOL16 bRet = FALSE, win32Format = FALSE; LPCVOID template; HWND32 hwndDialog; dprintf_commdlg(stddeb,"ChooseFont\n"); if (!lpChFont) return FALSE; if (lpChFont->Flags & CF_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpChFont->hInstance ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else if (lpChFont->Flags & CF_ENABLETEMPLATE) { HANDLE16 hResInfo; if (!(hResInfo = FindResource16( lpChFont->hInstance, lpChFont->lpTemplateName, RT_DIALOG))) { CommDlgLastError = CDERR_FINDRESFAILURE; return FALSE; } if (!(hDlgTmpl = LoadResource16( lpChFont->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { CommDlgLastError = CDERR_LOADRESFAILURE; return FALSE; } } else { template = SYSRES_GetResPtr( SYSRES_DIALOG_CHOOSE_FONT ); win32Format = TRUE; } hInst = WIN_GetWindowInstance( lpChFont->hwndOwner ); hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpChFont->hwndOwner, (DLGPROC16)MODULE_GetWndProcEntry16("FormatCharDlgProc"), (DWORD)lpChFont, WIN_PROC_16 ); if (hwndDialog) bRet = DIALOG_DoDialogBox(hwndDialog, lpChFont->hwndOwner); if (hDlgTmpl) FreeResource16( hDlgTmpl ); return bRet; } #define TEXT_EXTRAS 4 #define TEXT_COLORS 16 static const COLORREF textcolors[TEXT_COLORS]= { 0x00000000L,0x00000080L,0x00008000L,0x00008080L, 0x00800000L,0x00800080L,0x00808000L,0x00808080L, 0x00c0c0c0L,0x000000ffL,0x0000ff00L,0x0000ffffL, 0x00ff0000L,0x00ff00ffL,0x00ffff00L,0x00FFFFFFL }; /*********************************************************************** * CFn_HookCallChk [internal] */ static BOOL32 CFn_HookCallChk(LPCHOOSEFONT lpcf) { if (lpcf) if(lpcf->Flags & CF_ENABLEHOOK) if (lpcf->lpfnHook) return TRUE; return FALSE; } /*********************************************************************** * FontFamilyEnumProc (COMMDLG.19) */ INT16 WINAPI FontFamilyEnumProc( SEGPTR logfont, SEGPTR metrics, UINT16 nFontType, LPARAM lParam ) { int i; WORD w; HWND16 hwnd=LOWORD(lParam); HWND16 hDlg=GetParent16(hwnd); LPCHOOSEFONT lpcf=(LPCHOOSEFONT)GetWindowLong32A(hDlg, DWL_USER); LOGFONT16 *lplf = (LOGFONT16 *)PTR_SEG_TO_LIN( logfont ); dprintf_commdlg(stddeb,"FontFamilyEnumProc: font=%s (nFontType=%d)\n", lplf->lfFaceName,nFontType); if (lpcf->Flags & CF_FIXEDPITCHONLY) if (!(lplf->lfPitchAndFamily & FIXED_PITCH)) return 1; if (lpcf->Flags & CF_ANSIONLY) if (lplf->lfCharSet != ANSI_CHARSET) return 1; if (lpcf->Flags & CF_TTONLY) if (!(nFontType & 0x0004)) /* this means 'TRUETYPE_FONTTYPE' */ return 1; i=SendMessage16(hwnd,CB_ADDSTRING16,0, (LPARAM)logfont + ((char *)lplf->lfFaceName - (char *)lplf)); if (i!=CB_ERR) { w=(lplf->lfCharSet << 8) | lplf->lfPitchAndFamily; SendMessage16(hwnd, CB_SETITEMDATA16,i,MAKELONG(nFontType,w)); return 1 ; /* store some important font information */ } else return 0; } /************************************************************************* * SetFontStylesToCombo2 [internal] * * Fill font style information into combobox (without using font.c directly) */ static int SetFontStylesToCombo2(HWND16 hwnd, HDC16 hdc, LPLOGFONT16 lplf, LPTEXTMETRIC16 lptm) { #define FSTYLES 4 struct FONTSTYLE { int italic; int weight; char stname[20]; }; static struct FONTSTYLE fontstyles[FSTYLES]={ { 0,FW_NORMAL,"Regular"},{0,FW_BOLD,"Bold"}, { 1,FW_NORMAL,"Italic"}, {1,FW_BOLD,"Bold Italic"}}; HFONT16 hf; int i,j; for (i=0;ilfItalic=fontstyles[i].italic; lplf->lfWeight=fontstyles[i].weight; hf=CreateFontIndirect16(lplf); hf=SelectObject32(hdc,hf); GetTextMetrics16(hdc,lptm); hf=SelectObject32(hdc,hf); DeleteObject32(hf); if (lptm->tmWeight==fontstyles[i].weight && lptm->tmItalic==fontstyles[i].italic) /* font successful created ? */ { char *str = SEGPTR_STRDUP(fontstyles[i].stname); j=SendMessage16(hwnd,CB_ADDSTRING16,0,(LPARAM)SEGPTR_GET(str) ); SEGPTR_FREE(str); if (j==CB_ERR) return 1; j=SendMessage16(hwnd, CB_SETITEMDATA16, j, MAKELONG(fontstyles[i].weight,fontstyles[i].italic)); if (j==CB_ERR) return 1; } } return 0; } /************************************************************************* * SetFontSizesToCombo3 [internal] */ static int SetFontSizesToCombo3(HWND16 hwnd, LPLOGFONT16 lplf, LPCHOOSEFONT lpcf) { static const int sizes[]={8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72,0}; int h,i,j; char *buffer; if (!(buffer = SEGPTR_ALLOC(20))) return 1; for (i=0;sizes[i] && !lplf->lfHeight;i++) { h=lplf->lfHeight ? lplf->lfHeight : sizes[i]; if ( (!(lpcf->Flags & CF_LIMITSIZE)) || ((lpcf->Flags & CF_LIMITSIZE) && (h >= lpcf->nSizeMin) && (h <= lpcf->nSizeMax))) { sprintf(buffer,"%2d",h); j=SendMessage16(hwnd,CB_FINDSTRING16,-1,(LPARAM)SEGPTR_GET(buffer)); if (j==CB_ERR) { j=SendMessage16(hwnd,CB_ADDSTRING16,0,(LPARAM)SEGPTR_GET(buffer)); if (j!=CB_ERR) j = SendMessage16(hwnd, CB_SETITEMDATA16, j, h); if (j==CB_ERR) { SEGPTR_FREE(buffer); return 1; } } } } SEGPTR_FREE(buffer); return 0; } /*********************************************************************** * FontStyleEnumProc (COMMDLG.18) */ INT16 WINAPI FontStyleEnumProc( SEGPTR logfont, SEGPTR metrics, UINT16 nFontType, LPARAM lParam ) { HWND16 hcmb2=LOWORD(lParam); HWND16 hcmb3=HIWORD(lParam); HWND16 hDlg=GetParent16(hcmb3); LPCHOOSEFONT lpcf=(LPCHOOSEFONT)GetWindowLong32A(hDlg, DWL_USER); LOGFONT16 *lplf = (LOGFONT16 *)PTR_SEG_TO_LIN(logfont); TEXTMETRIC16 *lptm = (TEXTMETRIC16 *)PTR_SEG_TO_LIN(metrics); int i; dprintf_commdlg(stddeb,"FontStyleEnumProc: (nFontType=%d)\n",nFontType); dprintf_commdlg(stddeb," %s h=%d w=%d e=%d o=%d wg=%d i=%d u=%d s=%d ch=%d op=%d cp=%d q=%d pf=%xh\n", lplf->lfFaceName,lplf->lfHeight,lplf->lfWidth,lplf->lfEscapement,lplf->lfOrientation, lplf->lfWeight,lplf->lfItalic,lplf->lfUnderline,lplf->lfStrikeOut,lplf->lfCharSet, lplf->lfOutPrecision,lplf->lfClipPrecision,lplf->lfQuality,lplf->lfPitchAndFamily); if (SetFontSizesToCombo3(hcmb3, lplf ,lpcf)) return 0; if (!SendMessage16(hcmb2,CB_GETCOUNT16,0,0)) { HDC32 hdc= (lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC) ? lpcf->hDC : GetDC32(hDlg); i=SetFontStylesToCombo2(hcmb2,hdc,lplf,lptm); if (!(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC)) ReleaseDC32(hDlg,hdc); if (i) return 0; } return 1 ; } /*********************************************************************** * CFn_WMInitDialog [internal] */ LRESULT CFn_WMInitDialog(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { HDC32 hdc; int i,j,res,init=0; long l; LPLOGFONT16 lpxx; HCURSOR16 hcursor=SetCursor16(LoadCursor16(0,IDC_WAIT)); LPCHOOSEFONT lpcf; SetWindowLong32A(hDlg, DWL_USER, lParam); lpcf=(LPCHOOSEFONT)lParam; lpxx=PTR_SEG_TO_LIN(lpcf->lpLogFont); dprintf_commdlg(stddeb,"FormatCharDlgProc // WM_INITDIALOG lParam=%08lX\n", lParam); if (lpcf->lStructSize != sizeof(CHOOSEFONT)) { dprintf_commdlg(stddeb,"WM_INITDIALOG: structure size failure !!!\n"); EndDialog32 (hDlg, 0); return FALSE; } if (!hBitmapTT) hBitmapTT = LoadBitmap16(0, MAKEINTRESOURCE(OBM_TRTYPE)); if (!(lpcf->Flags & CF_SHOWHELP) || !IsWindow32(lpcf->hwndOwner)) ShowWindow32(GetDlgItem32(hDlg,pshHelp),SW_HIDE); if (!(lpcf->Flags & CF_APPLY)) ShowWindow32(GetDlgItem32(hDlg,psh3),SW_HIDE); if (lpcf->Flags & CF_EFFECTS) { for (res=1,i=0;res && irgbColors) SendDlgItemMessage16(hDlg,cmb4, CB_SETCURSEL16,j,0); } } else { ShowWindow32(GetDlgItem32(hDlg,cmb4),SW_HIDE); ShowWindow32(GetDlgItem32(hDlg,chx1),SW_HIDE); ShowWindow32(GetDlgItem32(hDlg,chx2),SW_HIDE); ShowWindow32(GetDlgItem32(hDlg,grp1),SW_HIDE); ShowWindow32(GetDlgItem32(hDlg,stc4),SW_HIDE); } hdc= (lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC) ? lpcf->hDC : GetDC32(hDlg); if (hdc) { if (!EnumFontFamilies16(hdc, NULL,FontFamilyEnumProc, (LPARAM)GetDlgItem32(hDlg,cmb1))) dprintf_commdlg(stddeb,"WM_INITDIALOG: EnumFontFamilies returns 0\n"); if (lpcf->Flags & CF_INITTOLOGFONTSTRUCT) { /* look for fitting font name in combobox1 */ j=SendDlgItemMessage16(hDlg,cmb1,CB_FINDSTRING16,-1,(LONG)lpxx->lfFaceName); if (j!=CB_ERR) { SendDlgItemMessage16(hDlg,cmb1,CB_SETCURSEL16,j,0); SendMessage16(hDlg,WM_COMMAND,cmb1, MAKELONG(GetDlgItem32(hDlg,cmb1),CBN_SELCHANGE)); init=1; /* look for fitting font style in combobox2 */ l=MAKELONG(lpxx->lfWeight > FW_MEDIUM ? FW_BOLD:FW_NORMAL,lpxx->lfItalic !=0); for (i=0;ilfHeight==(int)SendDlgItemMessage16(hDlg,cmb3, CB_GETITEMDATA16,i,0)) SendDlgItemMessage16(hDlg,cmb3,CB_SETCURSEL16,i,0); } } if (!init) { SendDlgItemMessage16(hDlg,cmb1,CB_SETCURSEL16,0,0); SendMessage16(hDlg,WM_COMMAND,cmb1, MAKELONG(GetDlgItem32(hDlg,cmb1),CBN_SELCHANGE)); } } if (lpcf->Flags & CF_USESTYLE && lpcf->lpszStyle) { j=SendDlgItemMessage16(hDlg,cmb2,CB_FINDSTRING16,-1,(LONG)lpcf->lpszStyle); if (j!=CB_ERR) { j=SendDlgItemMessage16(hDlg,cmb2,CB_SETCURSEL16,j,0); SendMessage16(hDlg,WM_COMMAND,cmb2, MAKELONG(GetDlgItem32(hDlg,cmb2),CBN_SELCHANGE)); } } } else { dprintf_commdlg(stddeb,"WM_INITDIALOG: HDC failure !!!\n"); EndDialog32 (hDlg, 0); return FALSE; } if (!(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC)) ReleaseDC32(hDlg,hdc); res=TRUE; if (CFn_HookCallChk(lpcf)) res=CallWindowProc16(lpcf->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); SetCursor16(hcursor); return res; } /*********************************************************************** * CFn_WMMeasureItem [internal] */ LRESULT CFn_WMMeasureItem(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { BITMAP16 bm; LPMEASUREITEMSTRUCT16 lpmi=PTR_SEG_TO_LIN((LPMEASUREITEMSTRUCT16)lParam); if (!hBitmapTT) hBitmapTT = LoadBitmap16(0, MAKEINTRESOURCE(OBM_TRTYPE)); GetObject16( hBitmapTT, sizeof(bm), &bm ); lpmi->itemHeight=bm.bmHeight; /* FIXME: use MAX of bm.bmHeight and tm.tmHeight .*/ return 0; } /*********************************************************************** * CFn_WMDrawItem [internal] */ LRESULT CFn_WMDrawItem(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { HBRUSH16 hBrush; char *buffer; BITMAP16 bm; COLORREF cr; RECT16 rect; #if 0 HDC16 hMemDC; int nFontType; HBITMAP16 hBitmap; /* for later TT usage */ #endif LPDRAWITEMSTRUCT16 lpdi = (LPDRAWITEMSTRUCT16)PTR_SEG_TO_LIN(lParam); if (lpdi->itemID == 0xFFFF) /* got no items */ DrawFocusRect16(lpdi->hDC, &lpdi->rcItem); else { if (lpdi->CtlType == ODT_COMBOBOX) { hBrush = SelectObject32(lpdi->hDC, GetStockObject32(LTGRAY_BRUSH)); SelectObject32(lpdi->hDC, hBrush); FillRect16(lpdi->hDC, &lpdi->rcItem, hBrush); } else return TRUE; /* this should never happen */ rect=lpdi->rcItem; buffer = SEGPTR_ALLOC(40); switch (lpdi->CtlID) { case cmb1: /* dprintf_commdlg(stddeb,"WM_Drawitem cmb1\n"); */ SendMessage16(lpdi->hwndItem, CB_GETLBTEXT16, lpdi->itemID, (LPARAM)SEGPTR_GET(buffer)); GetObject16( hBitmapTT, sizeof(bm), &bm ); TextOut16(lpdi->hDC, lpdi->rcItem.left + bm.bmWidth + 10, lpdi->rcItem.top, buffer, lstrlen16(buffer)); #if 0 nFontType = SendMessage16(lpdi->hwndItem, CB_GETITEMDATA16, lpdi->itemID,0L); /* FIXME: draw bitmap if truetype usage */ if (nFontType&TRUETYPE_FONTTYPE) { hMemDC = CreateCompatibleDC32(lpdi->hDC); hBitmap = SelectObject32(hMemDC, hBitmapTT); BitBlt32(lpdi->hDC, lpdi->rcItem.left, lpdi->rcItem.top, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCCOPY); SelectObject32(hMemDC, hBitmap); DeleteDC32(hMemDC); } #endif break; case cmb2: case cmb3: /* dprintf_commdlg(stddeb,"WM_DRAWITEN cmb2,cmb3\n"); */ SendMessage16(lpdi->hwndItem, CB_GETLBTEXT16, lpdi->itemID, (LPARAM)SEGPTR_GET(buffer)); TextOut16(lpdi->hDC, lpdi->rcItem.left, lpdi->rcItem.top, buffer, lstrlen16(buffer)); break; case cmb4: /* dprintf_commdlg(stddeb,"WM_DRAWITEM cmb4 (=COLOR)\n"); */ SendMessage16(lpdi->hwndItem, CB_GETLBTEXT16, lpdi->itemID, (LPARAM)SEGPTR_GET(buffer)); TextOut16(lpdi->hDC, lpdi->rcItem.left + 25+5, lpdi->rcItem.top, buffer, lstrlen16(buffer)); cr = SendMessage16(lpdi->hwndItem, CB_GETITEMDATA16, lpdi->itemID,0L); hBrush = CreateSolidBrush32(cr); if (hBrush) { hBrush = SelectObject32 (lpdi->hDC, hBrush) ; rect.right=rect.left+25; rect.top++; rect.left+=5; rect.bottom--; Rectangle32( lpdi->hDC, rect.left, rect.top, rect.right, rect.bottom ); DeleteObject32( SelectObject32 (lpdi->hDC, hBrush)) ; } rect=lpdi->rcItem; rect.left+=25+5; break; default: return TRUE; /* this should never happen */ } SEGPTR_FREE(buffer); if (lpdi->itemState ==ODS_SELECTED) InvertRect16(lpdi->hDC, &rect); } return TRUE; } /*********************************************************************** * CFn_WMCtlColor [internal] */ LRESULT CFn_WMCtlColor(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { LPCHOOSEFONT lpcf=(LPCHOOSEFONT)GetWindowLong32A(hDlg, DWL_USER); if (lpcf->Flags & CF_EFFECTS) if (HIWORD(lParam)==CTLCOLOR_STATIC && GetDlgCtrlID32(LOWORD(lParam))==stc6) { SetTextColor32(wParam,lpcf->rgbColors); return GetStockObject32(WHITE_BRUSH); } return 0; } /*********************************************************************** * CFn_WMCommand [internal] */ LRESULT CFn_WMCommand(HWND16 hDlg, WPARAM16 wParam, LPARAM lParam) { HFONT16 hFont; int i,j; long l; HDC16 hdc; LPCHOOSEFONT lpcf=(LPCHOOSEFONT)GetWindowLong32A(hDlg, DWL_USER); LPLOGFONT16 lpxx=PTR_SEG_TO_LIN(lpcf->lpLogFont); dprintf_commdlg(stddeb,"FormatCharDlgProc // WM_COMMAND lParam=%08lX\n", lParam); switch (wParam) { case cmb1:if (HIWORD(lParam)==CBN_SELCHANGE) { hdc=(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC) ? lpcf->hDC : GetDC32(hDlg); if (hdc) { SendDlgItemMessage16(hDlg,cmb2,CB_RESETCONTENT16,0,0); SendDlgItemMessage16(hDlg,cmb3,CB_RESETCONTENT16,0,0); i=SendDlgItemMessage16(hDlg,cmb1,CB_GETCURSEL16,0,0); if (i!=CB_ERR) { HCURSOR16 hcursor=SetCursor16(LoadCursor16(0,IDC_WAIT)); char *str = SEGPTR_ALLOC(256); SendDlgItemMessage16(hDlg,cmb1,CB_GETLBTEXT16,i, (LPARAM)SEGPTR_GET(str)); dprintf_commdlg(stddeb,"WM_COMMAND/cmb1 =>%s\n",str); EnumFontFamilies16(hdc,str,FontStyleEnumProc, MAKELONG(GetDlgItem32(hDlg,cmb2),GetDlgItem32(hDlg,cmb3))); SetCursor16(hcursor); SEGPTR_FREE(str); } if (!(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC)) ReleaseDC32(hDlg,hdc); } else { dprintf_commdlg(stddeb,"WM_COMMAND: HDC failure !!!\n"); EndDialog32 (hDlg, 0); return TRUE; } } case chx1: case chx2: case cmb2: case cmb3:if (HIWORD(lParam)==CBN_SELCHANGE || HIWORD(lParam)== BN_CLICKED ) { char *str = SEGPTR_ALLOC(256); dprintf_commdlg(stddeb,"WM_COMMAND/cmb2,3 =%08lX\n", lParam); i=SendDlgItemMessage16(hDlg,cmb1,CB_GETCURSEL16,0,0); if (i==CB_ERR) i=GetDlgItemText32A( hDlg, cmb1, str, 256 ); else { SendDlgItemMessage16(hDlg,cmb1,CB_GETLBTEXT16,i, (LPARAM)SEGPTR_GET(str)); l=SendDlgItemMessage16(hDlg,cmb1,CB_GETITEMDATA16,i,0); j=HIWORD(l); lpcf->nFontType = LOWORD(l); /* FIXME: lpcf->nFontType |= .... SIMULATED_FONTTYPE and so */ /* same value reported to the EnumFonts call back with the extra FONTTYPE_... bits added */ lpxx->lfPitchAndFamily=j&0xff; lpxx->lfCharSet=j>>8; } strcpy(lpxx->lfFaceName,str); SEGPTR_FREE(str); i=SendDlgItemMessage16(hDlg,cmb2,CB_GETCURSEL16,0,0); if (i!=CB_ERR) { l=SendDlgItemMessage16(hDlg,cmb2,CB_GETITEMDATA16,i,0); if (0!=(lpxx->lfItalic=HIWORD(l))) lpcf->nFontType |= ITALIC_FONTTYPE; if ((lpxx->lfWeight=LOWORD(l)) > FW_MEDIUM) lpcf->nFontType |= BOLD_FONTTYPE; } i=SendDlgItemMessage16(hDlg,cmb3,CB_GETCURSEL16,0,0); if (i!=CB_ERR) lpxx->lfHeight=-LOWORD(SendDlgItemMessage16(hDlg,cmb3,CB_GETITEMDATA16,i,0)); else lpxx->lfHeight=0; lpxx->lfStrikeOut=IsDlgButtonChecked32(hDlg,chx1); lpxx->lfUnderline=IsDlgButtonChecked32(hDlg,chx2); lpxx->lfWidth=lpxx->lfOrientation=lpxx->lfEscapement=0; lpxx->lfOutPrecision=OUT_DEFAULT_PRECIS; lpxx->lfClipPrecision=CLIP_DEFAULT_PRECIS; lpxx->lfQuality=DEFAULT_QUALITY; lpcf->iPointSize= -10*lpxx->lfHeight; hFont=CreateFontIndirect16(lpxx); if (hFont) SendDlgItemMessage16(hDlg,stc6,WM_SETFONT,hFont,TRUE); /* FIXME: Delete old font ...? */ } break; case cmb4:i=SendDlgItemMessage16(hDlg,cmb4,CB_GETCURSEL16,0,0); if (i!=CB_ERR) { lpcf->rgbColors=textcolors[i]; InvalidateRect32( GetDlgItem32(hDlg,stc6), NULL, 0 ); } break; case psh15:i=RegisterWindowMessage32A( HELPMSGSTRING ); if (lpcf->hwndOwner) SendMessage16(lpcf->hwndOwner,i,0,(LPARAM)lpcf); if (CFn_HookCallChk(lpcf)) CallWindowProc16(lpcf->lpfnHook,hDlg,WM_COMMAND,psh15,(LPARAM)lpcf); break; case IDOK:if ( (!(lpcf->Flags & CF_LIMITSIZE)) || ( (lpcf->Flags & CF_LIMITSIZE) && (-lpxx->lfHeight >= lpcf->nSizeMin) && (-lpxx->lfHeight <= lpcf->nSizeMax))) EndDialog32(hDlg, TRUE); else { char buffer[80]; sprintf(buffer,"Select a font size between %d and %d points.", lpcf->nSizeMin,lpcf->nSizeMax); MessageBox16(hDlg,buffer,NULL,MB_OK); } return(TRUE); case IDCANCEL:EndDialog32(hDlg, FALSE); return(TRUE); } return(FALSE); } /*********************************************************************** * FormatCharDlgProc (COMMDLG.16) FIXME: 1. some strings are "hardcoded", but it's better load from sysres 2. some CF_.. flags are not supported 3. some TType extensions */ LRESULT WINAPI FormatCharDlgProc(HWND16 hDlg, UINT16 message, WPARAM16 wParam, LPARAM lParam) { LPCHOOSEFONT lpcf=(LPCHOOSEFONT)GetWindowLong32A(hDlg, DWL_USER); if (message!=WM_INITDIALOG) { int res=0; if (!lpcf) return FALSE; if (CFn_HookCallChk(lpcf)) res=CallWindowProc16(lpcf->lpfnHook,hDlg,message,wParam,lParam); if (res) return res; } else return CFn_WMInitDialog(hDlg,wParam,lParam); switch (message) { case WM_MEASUREITEM: return CFn_WMMeasureItem(hDlg,wParam,lParam); case WM_DRAWITEM: return CFn_WMDrawItem(hDlg,wParam,lParam); case WM_CTLCOLOR: return CFn_WMCtlColor(hDlg,wParam,lParam); case WM_COMMAND: return CFn_WMCommand(hDlg,wParam,lParam); case WM_CHOOSEFONT_GETLOGFONT: dprintf_commdlg(stddeb, "FormatCharDlgProc // WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam); /* FIXME: current logfont back to caller */ break; } return FALSE; } #define GET_XXX_FILENAME(xxx) \ BOOL32 WINAPI xxx##32A( LPOPENFILENAME32A ofn ) \ { \ BOOL16 ret; \ LPOPENFILENAME16 ofn16 = SEGPTR_ALLOC(sizeof(OPENFILENAME16)); \ \ memset(ofn16,'\0',sizeof(*ofn16)); \ ofn16->lStructSize = sizeof(*ofn16); \ ofn16->hwndOwner = ofn->hwndOwner; \ /* FIXME: OPENFILENAME16 got only 16 bit for HINSTANCE... */ \ ofn16->hInstance = MODULE_HANDLEtoHMODULE16(ofn->hInstance); \ if (ofn->lpstrFilter) { \ LPSTR s,x; \ \ /* filter is a list... title\0ext\0......\0\0 */ \ s = (LPSTR)ofn->lpstrFilter; \ while (*s) \ s = s+strlen(s)+1; \ s++; \ x = (LPSTR)SEGPTR_ALLOC(s-ofn->lpstrFilter); \ memcpy(x,ofn->lpstrFilter,s-ofn->lpstrFilter); \ ofn16->lpstrFilter = SEGPTR_GET(x); \ } \ if (ofn->lpstrCustomFilter) { \ LPSTR s,x; \ \ /* filter is a list... title\0ext\0......\0\0 */ \ s = (LPSTR)ofn->lpstrCustomFilter; \ while (*s) \ s = s+strlen(s)+1; \ x = SEGPTR_ALLOC(s-ofn->lpstrCustomFilter); \ s++; \ memcpy(x,ofn->lpstrCustomFilter,s-ofn->lpstrCustomFilter);\ ofn16->lpstrCustomFilter = SEGPTR_GET(x); \ } \ ofn16->nMaxCustFilter = ofn->nMaxCustFilter; \ ofn16->nFilterIndex = ofn->nFilterIndex; \ ofn16->lpstrFile = SEGPTR_GET(SEGPTR_ALLOC(ofn->nMaxFile)); \ ofn16->nMaxFile = ofn->nMaxFile; \ if (ofn->lpstrFileTitle) \ ofn16->lpstrFileTitle= SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrFileTitle));\ ofn16->nMaxFileTitle = ofn->nMaxFileTitle; \ if (ofn->lpstrInitialDir) \ ofn16->lpstrInitialDir = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrInitialDir));\ if (ofn->lpstrTitle) \ ofn16->lpstrTitle = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrTitle));\ ofn16->Flags = ofn->Flags|OFN_WINE32; \ ofn16->nFileOffset = ofn->nFileOffset; \ ofn16->nFileExtension = ofn->nFileExtension; \ if (ofn->lpstrDefExt) \ ofn16->lpstrDefExt = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrDefExt));\ ofn16->lCustData = ofn->lCustData; \ ofn16->lpfnHook = (WNDPROC16)ofn->lpfnHook; \ \ if (ofn->lpTemplateName) \ ofn16->lpTemplateName = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpTemplateName));\ \ ret = xxx##16(SEGPTR_GET(ofn16)); \ \ if (ofn16->lpstrFilter) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFilter)); \ if (ofn16->lpTemplateName) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpTemplateName)); \ if (ofn16->lpstrDefExt) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrDefExt)); \ if (ofn16->lpstrTitle) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrTitle)); \ if (ofn16->lpstrInitialDir) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrInitialDir)); \ if (ofn16->lpstrCustomFilter) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrCustomFilter)); \ \ strcpy(ofn->lpstrFile,PTR_SEG_TO_LIN(ofn16->lpstrFile)); \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFile)); \ \ if (ofn16->lpstrFileTitle) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFileTitle)); \ SEGPTR_FREE(ofn16); \ return ret; \ } \ \ BOOL32 WINAPI xxx##32W( LPOPENFILENAME32W ofn ) \ { \ BOOL16 ret; \ LPOPENFILENAME16 ofn16 = SEGPTR_ALLOC(sizeof(OPENFILENAME16)); \ \ memset(ofn16,'\0',sizeof(*ofn16)); \ ofn16->lStructSize = sizeof(*ofn16); \ ofn16->hwndOwner = ofn->hwndOwner; \ /* FIXME: OPENFILENAME16 got only 16 bit for HINSTANCE... */ \ ofn16->hInstance = MODULE_HANDLEtoHMODULE16(ofn->hInstance); \ if (ofn->lpstrFilter) { \ LPWSTR s; \ LPSTR x,y; \ int n; \ \ /* filter is a list... title\0ext\0......\0\0 */ \ s = (LPWSTR)ofn->lpstrFilter; \ while (*s) \ s = s+lstrlen32W(s)+1; \ s++; \ n = s - ofn->lpstrFilter; /* already divides by 2. ptr magic */\ x = y = (LPSTR)SEGPTR_ALLOC(n); \ s = (LPWSTR)ofn->lpstrFilter; \ while (*s) { \ lstrcpyWtoA(x,s); \ x+=lstrlen32A(x)+1; \ s+=lstrlen32W(s)+1; \ } \ *x=0; \ ofn16->lpstrFilter = SEGPTR_GET(y); \ } \ if (ofn->lpstrCustomFilter) { \ LPWSTR s; \ LPSTR x,y; \ int n; \ \ /* filter is a list... title\0ext\0......\0\0 */ \ s = (LPWSTR)ofn->lpstrCustomFilter; \ while (*s) \ s = s+lstrlen32W(s)+1; \ s++; \ n = s - ofn->lpstrCustomFilter; \ x = y = (LPSTR)SEGPTR_ALLOC(n); \ s = (LPWSTR)ofn->lpstrCustomFilter; \ while (*s) { \ lstrcpyWtoA(x,s); \ x+=lstrlen32A(x)+1; \ s+=lstrlen32W(s)+1; \ } \ *x=0; \ ofn16->lpstrCustomFilter = SEGPTR_GET(y); \ } \ ofn16->nMaxCustFilter = ofn->nMaxCustFilter; \ ofn16->nFilterIndex = ofn->nFilterIndex; \ ofn16->lpstrFile = SEGPTR_GET(SEGPTR_ALLOC(ofn->nMaxFile)); \ ofn16->nMaxFile = ofn->nMaxFile; \ if (ofn->lpstrFileTitle) \ ofn16->lpstrFileTitle= SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrFileTitle));\ ofn16->nMaxFileTitle = ofn->nMaxFileTitle; \ if (ofn->lpstrInitialDir) \ ofn16->lpstrInitialDir = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrInitialDir));\ if (ofn->lpstrTitle) \ ofn16->lpstrTitle = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrTitle));\ ofn16->Flags = ofn->Flags|OFN_WINE32|OFN_UNICODE; \ ofn16->nFileOffset = ofn->nFileOffset; \ ofn16->nFileExtension = ofn->nFileExtension; \ if (ofn->lpstrDefExt) \ ofn16->lpstrDefExt = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrDefExt));\ ofn16->lCustData = ofn->lCustData; \ ofn16->lpfnHook = (WNDPROC16)ofn->lpfnHook; \ if (ofn->lpTemplateName) { \ ofn16->lpTemplateName = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpTemplateName));\ } \ ret = xxx##16(SEGPTR_GET(ofn16)); \ \ if (ofn16->lpstrFilter) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFilter)); \ if (ofn16->lpTemplateName) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpTemplateName)); \ if (ofn16->lpstrDefExt) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrDefExt)); \ if (ofn16->lpstrTitle) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrTitle)); \ if (ofn16->lpstrInitialDir) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrInitialDir)); \ if (ofn16->lpstrCustomFilter) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrCustomFilter)); \ \ lstrcpyAtoW(ofn->lpstrFile,PTR_SEG_TO_LIN(ofn16->lpstrFile)); \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFile)); \ \ if (ofn16->lpstrFileTitle) \ SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFileTitle)); \ SEGPTR_FREE(ofn16); \ return ret; \ } GET_XXX_FILENAME(GetOpenFileName) GET_XXX_FILENAME(GetSaveFileName) /*********************************************************************** * ChooseFontA (COMDLG32.3) */ DWORD WINAPI ChooseFont32A(CHOOSEFONT pChoosefont) { return NULL; }