home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / os2cl016.zip / pmdlg.cpp < prev    next >
C/C++ Source or Header  |  1996-02-05  |  12KB  |  508 lines
  1. /* 
  2.  
  3.  
  4.     pmdlg.cpp (emx+gcc) 
  5.  
  6.     1994,95 Giovanni Iachello
  7.     This is freeware software. You can use or modify it as you wish,
  8.     provided that the part of code that I wrote remains freeware.
  9.     Freeware means that the source code must be available on request 
  10.     to anyone.
  11.     You must also include this notice in all files derived from this
  12.     file.
  13.  
  14.  
  15. */
  16. #include <stdio.h>
  17. #include <stdlib.h>
  18. #include <string.h>
  19.  
  20. #define INCL_WINMLE
  21. #include "pmwin.h"
  22. #include "pmdlg.h"
  23. #include "pmstdres.h"
  24.  
  25. /////////////////////////////////////////////////////////////////////////////
  26.  
  27. MRESULT PMDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  28. {
  29.     PMDialog* win=NULL;
  30.     if (msg==WM_INITDLG) {
  31.         win=(PMDialog*)mp2;
  32.         if (win) { 
  33.             WinSetWindowPtr(hwnd,0,win);
  34.             win->hwnd=hwnd;                  // e naturalmente aggiorna hwnd ... ;)
  35.             win->hwndFrame=hwnd;
  36.             win->init();
  37.             win->initdlg();
  38.             return (MRESULT)TRUE;               // if focus changed
  39.         }
  40.     }
  41.  
  42.     win = (PMDialog*)WinQueryWindowPtr(hwnd, 0);
  43.     if (win) {
  44.         PMEvent event(msg,mp1,mp2,CHARMSG(&msg),MOUSEMSG(&msg));
  45.         return win->msgProc(event);
  46.     }
  47.     return WinDefDlgProc(hwnd,msg,mp1,mp2);
  48. }
  49.  
  50.  
  51. /////////////////////////////////////////////////////////////////////////////
  52.  
  53. PMControl::PMControl(HWND parentDlg,void* iobj,int ilen,int iid) :
  54.     PMWin(WinQueryAnchorBlock(parentDlg))
  55. {
  56.     hwndFrame=parentDlg; obj=iobj; len=ilen; id=iid;
  57.     hwnd=WinWindowFromID(hwndFrame,id);
  58.     // this is not used because the library can determine the pointer to
  59.     // the PMControl in another way, and it does not work for some controls
  60.     // (MLE...). Anyway it is done for completeness.
  61.     WinSetWindowPtr(hwnd,0,this); // okkey
  62. }
  63.  
  64. BOOL PMControl::destroyWin()
  65. {
  66.     return WinDestroyWindow(hwnd);
  67. }
  68.  
  69. // inhibit creating controls.
  70. BOOL PMControl::createWin()
  71. {
  72.     return FALSE;
  73. }
  74.  
  75. /////////////////////////////////////////////////////////////////////////////
  76.  
  77. PMButton::PMButton(HWND parentDlg,void* iobj,int ilen,int iid) :
  78.     PMControl(parentDlg,iobj,ilen,iid) 
  79. {
  80. }
  81.  
  82. void PMButton::get() 
  83. { 
  84. }
  85.  
  86. void PMButton::set() 
  87. { 
  88. }
  89.  
  90. /////////////////////////////////////////////////////////////////////////////
  91.  
  92. PMRadioButtonGroup::PMRadioButtonGroup(HWND parentDlg,void* iobj,int ilen,int iid) :
  93.     PMButton(parentDlg,iobj,ilen,iid) 
  94. {
  95. }
  96.  
  97. void PMRadioButtonGroup::get() 
  98. { 
  99.     int ret=queryIndex();
  100.     *((int*)obj)=ret;
  101. }
  102.  
  103. void PMRadioButtonGroup::set() 
  104. { 
  105.     HWND hwndctrl=WinWindowFromID(hwndFrame,id+(*(int*)obj)); // trova hwnd del controllo da attivare
  106.     WinSendMsg(hwndctrl,BM_SETCHECK,(MPARAM)1,(MPARAM)0);
  107. }
  108.  
  109. /////////////////////////////////////////////////////////////////////////////
  110.  
  111. PMCheckBox::PMCheckBox(HWND parentDlg,void* iobj,int ilen,int iid) :
  112.     PMButton(parentDlg,iobj,ilen,iid) 
  113. {
  114. }
  115.  
  116. void PMCheckBox::get() 
  117. { 
  118.     int ret=queryCheck();
  119.     *((int*)obj)=ret;
  120. }
  121.  
  122. void PMCheckBox::set() 
  123. { 
  124.     setCheck(*((int*)obj));
  125. }
  126.  
  127. /////////////////////////////////////////////////////////////////////////////
  128.  
  129. PMEntryField::PMEntryField(HWND parentDlg,void* iobj,int ilen,int iid) :
  130.     PMControl(parentDlg,iobj,ilen,iid) 
  131. { 
  132.     WinSendDlgItemMsg(hwndFrame,id,EM_SETTEXTLIMIT,MPFROMSHORT(len),0);
  133. }
  134.  
  135. void PMEntryField::get() 
  136. { 
  137.     WinQueryDlgItemText(hwndFrame,id,len,(PSZ)obj);
  138. }
  139.  
  140. void PMEntryField::set() 
  141. { 
  142.     WinSetDlgItemText(hwndFrame,id,(PSZ)obj);
  143. }
  144.  
  145. /////////////////////////////////////////////////////////////////////////////
  146.  
  147. PMMultiLineEdit::PMMultiLineEdit(HWND parentDlg,void* iobj,int ilen,int iid) :
  148.     PMControl(parentDlg,iobj,ilen,iid) 
  149. { 
  150.     WinSendDlgItemMsg(hwndFrame,id,MLM_SETTEXTLIMIT,MPFROMSHORT(len),0);
  151. }
  152.  
  153. void PMMultiLineEdit::get() 
  154. { 
  155.     WinQueryDlgItemText(hwndFrame,id,len,(PSZ)obj);
  156. }
  157.  
  158. void PMMultiLineEdit::set() 
  159. { 
  160.     WinSetDlgItemText(hwndFrame,id,(PSZ)obj);
  161. }
  162.  
  163. ////////////////////////////////////////////////////////////////////////////
  164.  
  165. PMListBox::PMListBox(HWND parentDlg,void* iobj,int ilen,int iid) :
  166.     PMControl(parentDlg,iobj,ilen,iid) 
  167. { 
  168. }
  169.  
  170. PMListBox::~PMListBox()
  171. {
  172. }
  173.  
  174. void PMListBox::get()
  175. {
  176.     ULONG ret=(ULONG)WinSendMsg(hwnd,LM_QUERYSELECTION,MPFROMLONG(LIT_FIRST),(MPARAM)NULL);
  177.     *((int*)obj)=ret;
  178. }
  179.  
  180. void PMListBox::set()
  181. {
  182.     WinSendMsg(hwnd,LM_SELECTITEM,MPFROMLONG(*((int*)obj)),(MPARAM)NULL);
  183. }
  184.  
  185. ////////////////////////////////////////////////////////////////////////////
  186.  
  187. PMValueSet::PMValueSet(HWND parentDlg,void* iobj,int ilen,int iid) :
  188.     PMControl(parentDlg,iobj,ilen,iid) 
  189. { 
  190. }
  191.  
  192. void PMValueSet::get()
  193. {
  194.     MRESULT ret=querySelectedItem();
  195.     *((MRESULT*)obj)=ret;
  196. }
  197.  
  198. void PMValueSet::set()
  199. {
  200.     selectItem(*(MPARAM*)obj);
  201. }
  202.  
  203. ////////////////////////////////////////////////////////////////////////////
  204.  
  205. PMSpinButton::PMSpinButton(HWND parentDlg,void* iobj,int ilen,int iid) :
  206.     PMControl(parentDlg,iobj,ilen,iid) 
  207. { 
  208. }
  209.  
  210. void PMSpinButton::get()
  211. {
  212.     queryValue((PVOID)obj,0,SPBQ_ALWAYSUPDATE);
  213. }
  214.  
  215. void PMSpinButton::set()
  216. {
  217.     setCurrentValue(*(LONG*)obj);
  218. }
  219.  
  220. ////////////////////////////////////////////////////////////////////////////
  221.  
  222. PMScrollBar::PMScrollBar(HWND parentDlg, void* iobj, int ilen, int iid) :
  223.     PMControl(parentDlg,iobj,ilen,iid)
  224. {
  225. }
  226.  
  227. PMScrollBar::PMScrollBar(PMWin* win, int* iobj, int iid)    :
  228.     PMControl(win->getHwndFrame(),iobj,4,iid)
  229. {
  230. }
  231.  
  232. void PMScrollBar::get()
  233. {
  234.     *(int*)obj=int(queryPos());
  235. }
  236.  
  237. void PMScrollBar::set()
  238. {
  239.     setPos(SHORT(*(int*)obj));
  240. }
  241.  
  242. PMVertScrollBar::PMVertScrollBar(PMWin* win, int* iobj) :
  243.     PMScrollBar(win,iobj,FID_VERTSCROLL)
  244. {
  245. }
  246.  
  247. PMHorizScrollBar::PMHorizScrollBar(PMWin* win, int* iobj) :
  248.     PMScrollBar(win,iobj,FID_HORZSCROLL)
  249. {
  250. }
  251.  
  252.  
  253. /////////////////////////////////////////////////////////////////////////////
  254.  
  255. PMDialog::PMDialog(HWND p,HWND o) : PMWin("",WinQueryAnchorBlock(o)) // chiama il costruttore complesso che riempie createargs
  256. {
  257.     createArgs->hwndParent=p;
  258.     createArgs->hwndOwner=o;
  259.     createArgs->hmod=NULLHANDLE;    
  260. }
  261.  
  262. PMDialog::~PMDialog()
  263. {
  264. }
  265.  
  266. void PMDialog::init()
  267. {
  268. }
  269.  
  270. BOOL PMDialog::createWin()
  271. {
  272.     return FALSE;
  273. }
  274.  
  275. BOOL PMDialog::destroyWin()
  276. {
  277.     return WinDismissDlg(hwnd,FALSE);
  278. }
  279.  
  280.  
  281. BOOL PMDialog::dispachEvent(PMEvent & event)
  282. {
  283.     switch (event.msg) {
  284.         case WM_CONTROL: 
  285.             return control(SHORT1FROMMP(event.mp1),SHORT2FROMMP(event.mp1));
  286.         case WM_INITDLG:
  287.             return initdlg();
  288.     }               
  289.     return PMWin::dispachEvent(event);
  290. }
  291.  
  292. BOOL PMDialog::control(SHORT id,SHORT ctrlmsg)
  293. {
  294.     return FALSE;
  295. }    
  296.  
  297. BOOL PMDialog::initdlg()
  298. {
  299.     return FALSE;
  300. }    
  301.  
  302. BOOL PMDialog::command(USHORT id,USHORT cmddev)
  303. {
  304.     return FALSE;
  305. }    
  306.  
  307. /////////////////////////////////////////////////////////////////////////////
  308.  
  309. PMModalDialog::PMModalDialog(HWND p,HWND o,ULONG i,PMControlMap *icm,void* iobj) : 
  310.     PMDialog(p,o)
  311. {
  312.     id=i;
  313.     cm=icm;
  314.     obj=iobj;
  315.     delctlmap=FALSE;
  316. }
  317.  
  318. PMControl* PMModalDialog::controlFromID(int id)
  319. { 
  320.     PMControl* ctl;
  321.     ctl=(PMControl*)WinQueryWindowPtr(WinWindowFromID(hwnd,id),0); 
  322.     if (!ctl) {
  323.         PMControlMap* pcm=cm;
  324.         for ( ; pcm->createfn!=NULL; pcm++ ) 
  325.             if (pcm->id == id) { ctl=pcm->ctrl;    break; }
  326.     }
  327.     assert(ctl);
  328.     return ctl;
  329. }
  330.  
  331. PMModalDialog::~PMModalDialog()
  332. {
  333.     if (delctlmap) {
  334.         PMControlMap* pcm=cm;
  335.         for ( ; pcm->createfn!=NULL; pcm++ ) {
  336.             delete pcm->ctrl; // elimina i controlli creati...
  337.         }
  338.         delctlmap=FALSE;
  339.     }
  340. }
  341.  
  342. void PMModalDialog::init()
  343. {
  344.     PMControlMap* pcm=cm;
  345.     for ( ; pcm->createfn!=NULL; pcm++ ) {
  346.         PMControl* ctl=pcm->createfn(hwnd,(char*)obj+pcm->offset,pcm->len,pcm->id);
  347.         assert(ctl);
  348.         ctl->set(); // imposta sullo schermo
  349.         pcm->ctrl=ctl; // salva anche nella mappa dei controlli
  350.     }
  351.     delctlmap=TRUE;
  352.     WinSetFocus(HWND_DESKTOP,WinWindowFromID(hwnd,pcm->id));
  353. }    
  354.  
  355. void PMModalDialog::updateControls()
  356. {
  357.     PMControlMap* pcm=cm;
  358.     for ( ; pcm->createfn!=NULL; pcm++ ) {
  359.         pcm->ctrl->set(); // imposta sullo schermo
  360.     }
  361. }
  362.  
  363. void PMModalDialog::updateObject()
  364. {
  365.     PMControlMap* pcm=cm;
  366.     for ( ; pcm->createfn!=NULL; pcm++ ) {
  367.         pcm->ctrl->get(); // imposta nella struttura
  368.     }
  369. }
  370.  
  371. BOOL PMModalDialog::createWin()
  372. {
  373.     oldproc=WinDefDlgProc;
  374.     ULONG ret=WinDlgBox(createArgs->hwndParent,createArgs->hwndOwner,PMDlgProc,createArgs->hmod,id,this);
  375.     return ret;
  376. }
  377.  
  378. BOOL PMModalDialog::command(USHORT id,USHORT cmddev)
  379. {
  380.     if (id==DID_OK) {
  381.         WinDismissDlg(hwnd,TRUE);
  382.         updateObject();        
  383.     }
  384.     if (id==DID_CANCEL) WinDismissDlg(hwnd,FALSE);
  385.     return TRUE;
  386. }    
  387.  
  388. BOOL PMModelessDialog::createWin()
  389. {
  390.     oldproc=WinDefDlgProc;
  391.     ULONG ret=WinLoadDlg(createArgs->hwndParent,createArgs->hwndOwner,PMDlgProc,createArgs->hmod,id,this);
  392.     return ret;
  393. }
  394.     
  395.  
  396. /////////////////////////////////////////////////////////////////////////////
  397.  
  398. PMFontDialog::PMFontDialog(HWND parent,HWND owner,FONTMETRICS *ifm,ULONG type,PSZ title,PSZ preview) : 
  399.     PMDialog(parent,owner) 
  400. {
  401.     fm=ifm;
  402.     memset((void*)&fontdlg, 0 , sizeof(FONTDLG));
  403.     fontdlg.flType= type;
  404.     fontdlg.pszTitle=title;
  405.     fontdlg.pszPreview=preview;
  406.     fontdlg.pszFamilyname=new CHAR[CCHMAXPATH]; // alloca zpazio per il nome della famiglia
  407. }
  408.  
  409. PMFontDialog::~PMFontDialog()
  410. {
  411.     delete fontdlg.pszFamilyname;
  412. }
  413.  
  414. BOOL PMFontDialog::createWin()
  415. {
  416.     fontdlg.cbSize=sizeof(FONTDLG);
  417.     fontdlg.hpsScreen = WinGetScreenPS(HWND_DESKTOP);
  418.     fontdlg.hpsPrinter= NULLHANDLE;
  419.     fontdlg.pfnDlgProc= PMFontDlgProc; 
  420.     fontdlg.ulUser= (ULONG)this;
  421.  
  422.     strcpy (fontdlg.pszFamilyname,fm->szFamilyname);
  423.     fontdlg.usFamilyBufLen=CCHMAXPATH;
  424.     fontdlg.fxPointSize= MAKEFIXED (fm->sNominalPointSize / 10 , 0);
  425.     fontdlg.fl= FNTS_CENTER | FNTS_HELPBUTTON | FNTS_NOSYNTHESIZEDFONTS | FNTS_RESETBUTTON;
  426.     fontdlg.clrFore=CLR_NEUTRAL;
  427.     fontdlg.clrBack=CLR_BACKGROUND;
  428.     fontdlg.usWeight=fm->usWeightClass;
  429.     fontdlg.usWidth=fm->usWidthClass;
  430.  
  431.     oldproc=WinDefFontDlgProc;
  432.  
  433.     WinFontDlg (createArgs->hwndParent,createArgs->hwndOwner, &fontdlg);
  434.     return fontdlg.lReturn;
  435. }
  436.  
  437. MRESULT PMFontDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  438. {
  439.     PFONTDLG fdlg;
  440.     PMFontDialog* win=NULL;  // il puntatore alla struttura fontdlg e' in WinPtr 0.
  441.  
  442.     fdlg = (PFONTDLG)WinQueryWindowPtr(hwnd, 0);
  443.     win = (PMFontDialog*) fdlg->ulUser;
  444.     if (win) {
  445.         if (msg==WM_INITDLG) {
  446.             win->hwnd=hwnd;                  // e naturalmente aggiorna hwnd ... ;)
  447.             win->hwndFrame=hwnd;
  448.             win->init();
  449.         }
  450.         PMEvent event(msg,mp1,mp2,CHARMSG(&msg),MOUSEMSG(&msg));
  451.         return win->msgProc(event);
  452.     }
  453.     return WinDefFontDlgProc(hwnd,msg,mp1,mp2);
  454. }
  455.  
  456.  
  457. /////////////////////////////////////////////////////////////////////////////
  458.  
  459. PMFileDialog::PMFileDialog(HWND parent,HWND owner,PSZ file,PSZ title,PSZ OKButton,ULONG flags) : 
  460.     PMDialog(parent,owner) 
  461. {
  462.     memset((void*)&filedlg, 0 , sizeof(FILEDLG));
  463.     filedlg.pszTitle=title;
  464.     filedlg.pszOKButton=OKButton;
  465.     filedlg.fl=flags;
  466.     strncpy(filedlg.szFullFile,file,CCHMAXPATH);
  467. }
  468.  
  469. PMFileDialog::~PMFileDialog()
  470. {
  471. }
  472.  
  473. BOOL PMFileDialog::createWin()
  474. {
  475.     filedlg.cbSize=sizeof(FILEDLG);
  476.     filedlg.pfnDlgProc= PMFileDlgProc; 
  477.     filedlg.ulUser= (ULONG)this;
  478.     filedlg.fl|= FDS_CENTER | FDS_PRELOAD_VOLINFO | FDS_HELPBUTTON;
  479.     filedlg.pszIDrive="C:";
  480.  
  481.     oldproc=WinDefFileDlgProc;
  482.     
  483.     WinFileDlg (createArgs->hwndParent,createArgs->hwndOwner, &filedlg);
  484.     return filedlg.lReturn;
  485. }
  486.  
  487. MRESULT PMFileDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  488. {
  489.     PFILEDLG fdlg;
  490.     PMFileDialog* win=NULL;  // il puntatore alla struttura fontdlg e' in WinPtr 0.
  491.  
  492.     fdlg = (PFILEDLG)WinQueryWindowPtr(hwnd, 0);
  493.     win = (PMFileDialog*) fdlg->ulUser;
  494.     if (win) {
  495.         if (msg==WM_INITDLG) {
  496.             win->hwnd=hwnd;                  // e naturalmente aggiorna hwnd ... ;)
  497.             win->hwndFrame=hwnd;
  498.             win->init();
  499.         }
  500.         PMEvent event(msg,mp1,mp2,CHARMSG(&msg),MOUSEMSG(&msg));
  501.         return win->msgProc(event);
  502.     }
  503.     return WinDefFileDlgProc(hwnd,msg,mp1,mp2);
  504. }
  505.  
  506.  
  507.  
  508.