FiveTech Software tech support forums

Posted: **Sat Feb 18, 2006 2:00 pm**

Hi, I got an argument error .or. in the tsay class in here

METHOD EraseBkGnd( hDC ) CLASS TSay

   if IsAppThemed() .or. ::lTransparent
      return 1
   endif

return Super:EraseBkGnd( hDC )

It seems lTransparent does not get initialized. I added

::lTransparent := .f. to TSay():New()

Not exactly sure why it came up, but it did

Posted: **Sat Feb 18, 2006 2:50 pm**

Code: Select all

METHOD EraseBkGnd( hDC ) CLASS TSay

   DEFAULT ::lTransparent := .f.  <-- NOTE

   if IsAppThemed() .or. ::lTransparent
      return 1
   endif

return Super:EraseBkGnd( hDC )

EMG

FiveTech Software tech support forums

TSay class and non themed apps

TSay class and non themed apps

Re: TSay class and non themed apps