Previous topic Next topic
WINDOW Sets
Help > Forms >

/////////////////////////////////////////////////////////////////////
// WINDOW Sets
/////////////////////////////////////////////////////////////////////

AUTOADJUST

#xtranslate SET AUTOADJUST ON ;
   => ;
      _OOHG_AutoAdjust := .T.

#xtranslate SET AUTOADJUST OFF ;
   => ;
      _OOHG_AutoAdjust := .F.

#xtranslate SET ADJUSTWIDTH ON ;
   => ;
      _OOHG_AdjustWidth := .T.

#xtranslate SET ADJUSTWIDTH OFF ;
   => ;
      _OOHG_AdjustWidth := .F.

#xtranslate SET ADJUSTFONT ON ;
   => ;
      _OOHG_AdjustFont := .T.

#xtranslate SET ADJUSTFONT OFF ;
   => ;
      _OOHG_AdjustFont := .F.

TRANSPARENCY

#xtranslate SET WINDOW <FormName> TRANSPARENT TO <nAlphaBlend> ;  // nAlphaBlend = 0 (transparent) to 255 (opaque)
   => ;
      SetLayeredWindowAttributes( GetFormHandle( <"FormName"> ), 0, <nAlphaBlend>, 0x02)   // LWA_ALPHA

#xtranslate SET WINDOW <FormName> [ TRANSPARENT ] TO OPAQUE ;
   => ;
      SetLayeredWindowAttributes( GetFormHandle( <"FormName"> ), 0, 255, 0x02)   // LWA_ALPHA

#xtranslate SET WINDOW <FormName> TRANSPARENT TO COLOR <aColor> ;
   => ;
      SetLayeredWindowAttributes( GetFormHandle( <"FormName"> ), RGB(<aColor>\[1\], <aColor>\[2\], <aColor>\[3\]), 0, 0x01 )  // LWA_COLORKEY

#xtranslate SET WINDOW <FormName> TRANSPARENT OFF ;
   => ;
      WindowExStyleFlag( GetFormHandle( <"FormName"> ), 0x00080000, 0 )   // WS_EX_LAYERED

<u>FLASH</u>

#xtranslate FLASH WINDOW <FormName> CAPTION COUNT <nTimes> INTERVAL <nMilliseconds> ;
   => ;
      FlashWindowEx( GetFormHandle( <"FormName"> ), 1, <nTimes>, <nMilliseconds> )   // FLASHW_CAPTION

#xtranslate FLASH WINDOW <FormName> TASKBAR COUNT <nTimes> INTERVAL <nMilliseconds> ;
   => ;
      FlashWindowEx( GetFormHandle( <"FormName"> ), 2, <nTimes>, <nMilliseconds> )   // FLASHW_TRAY

#xtranslate FLASH WINDOW <FormName> [ ALL ] COUNT <nTimes> INTERVAL <nMilliseconds> ;
   => ;
      FlashWindowEx( GetFormHandle( <"FormName"> ), 3, <nTimes>, <nMilliseconds> )   // FLASHW_ALL (FLASHW_CAPTION + FLASHW_TRAY)