home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / gotch175.zip / src / gotcha.clp < prev    next >
Text File  |  1999-08-01  |  1KB  |  38 lines
  1. // ** Settings ************************************************************
  2.  
  3.  
  4. SETTINGS :: Settings (VOID)
  5. : ththSettings (apse, PSZ_PROFILENAME, L_PROFILEVERSION)
  6. {
  7.     swpMain.x = 98; swpMain.y = 66;
  8.  
  9.     // get main window data
  10.     ULONG ul = sizeof (swpMain);
  11.     PrfQueryProfileData (hini, "Window", "SWP", PVOID (&swpMain), &ul);
  12.     ul = sizeof (usMain);
  13.     PrfQueryProfileData (hini, "Window", "US", PVOID (&usMain), &ul);
  14.  
  15.     // get snapshot window data
  16.     ul = sizeof (swp);
  17.     PrfQueryProfileData (hini, "Snapshot", "SWP", PVOID (&swp), &ul);
  18.     ul = sizeof (us);
  19.     PrfQueryProfileData (hini, "Snapshot", "US", PVOID (&us), &ul);
  20. }
  21.  
  22. // ** ~Settings ***********************************************************
  23.  
  24. SETTINGS :: ~Settings (VOID)
  25. {
  26.     PrfWriteProfileData (hini, "Snapshot", "SWP",
  27.                          PVOID (&swp), sizeof (swp));
  28.     PrfWriteProfileData (hini, "Snapshot", "US",
  29.                          PVOID (&us), sizeof (us));
  30.  
  31.     PrfWriteProfileData (hini, "Window", "SWP",
  32.                          PVOID (&swp), sizeof (swpMain));
  33.     PrfWriteProfileData (hini, "Window", "US",
  34.                          PVOID (&us), sizeof (usMain));
  35.  
  36.     this->ththSettings::~ththSettings ();
  37. }
  38.