home *** CD-ROM | disk | FTP | other *** search
- /******************************************************************/
- /* */
- /* TurboCAD for Windows */
- /* Copyright (c) 1993 - 2001 */
- /* International Microcomputer Software, Inc. */
- /* (IMSI) */
- /* All rights reserved. */
- /* */
- /******************************************************************/
-
- #include "stdafx.h"
-
- #include "PalDlg.h"
-
- #include "resource.h"
-
- UINT WINAPI PltGetHelpID()
- {
- return IDD_PALDLG;
- }
- // Get description of custom palette
- BSTR WINAPI PltGetDescription()
- {
- AFX_MANAGE_STATE(AfxGetStaticModuleState());
-
- CString cstrDesc;
- cstrDesc.LoadString(IDS_DESCRIPTION);
-
- return cstrDesc.AllocSysString();
- }
- //// Get name of custom palette (command name)
- BSTR WINAPI PltGetName()
- {
- AFX_MANAGE_STATE(AfxGetStaticModuleState());
-
- CString cstrName;
- cstrName.LoadString(IDS_NAME);
-
- cstrName += "#CMD_SDKCUSTOMPALETTE";
-
- return cstrName.AllocSysString();
- }
- // get toolbar icon
- IDispatch* WINAPI PltGetPicture(BOOL bLargeButton, BOOL bMonochrome)
- {
- AFX_MANAGE_STATE(AfxGetStaticModuleState());
-
- LPTSTR IDB = 0;
-
- if (bLargeButton)
- {
- IDB = MAKEINTRESOURCE(IDB_PLT32);
- }
- else
- {
- IDB = MAKEINTRESOURCE(IDB_PLT16);
- }
-
-
- IDispatch *pIPictDisp = NULL;
-
- HBITMAP hbmpPal = ::LoadBitmap(AfxGetResourceHandle(), IDB);
-
- PICTDESC pict;
- pict.cbSizeofstruct = sizeof(pict);
- pict.picType = PICTYPE_BITMAP;
- pict.bmp.hbitmap = hbmpPal;
- pict.bmp.hpal = NULL;
-
- VERIFY(SUCCEEDED(OleCreatePictureIndirect(&pict, IID_IDispatch, TRUE, (void**)&pIPictDisp)));
- return pIPictDisp;
- }
-
- HINSTANCE MyGetResourceHandle();
-
- HWND WINAPI PltCreateWindow(HWND hwndParent, long nID)
- {
- AFX_MANAGE_STATE(AfxGetStaticModuleState());
-
- HINSTANCE hResOld = AfxGetResourceHandle();
- AfxSetResourceHandle(MyGetResourceHandle());
-
- HWND hwndPal = NULL;
-
- CPalDlg *pDlg = new CPalDlg;
- CWnd *pParentWnd = CWnd::FromHandle(hwndParent);
-
- if (pDlg->Create(IDD_PALDLG, pParentWnd))
- hwndPal = pDlg->GetSafeHwnd();
-
-
- AfxSetResourceHandle(hResOld);
-
- return hwndPal;
- }
-
- VARIANT WINAPI PltQuery(VARIANT varQuery)
- {
- VARIANT varRet;
- VariantInit(&varRet);
- VariantClear(&varRet);
-
- varRet.vt = VT_R4;
- varRet.fltVal = 7.1;
-
- return varRet;
- }