topic-1822

Posts: 172

Joined: Fri Oct 07, 2005 01:29 PM

TSay class and non themed apps
Posted: Sat Feb 18, 2006 02: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

Enrico Maria Giordano

Posts: 9020

Joined: Thu Oct 06, 2005 08:17 PM

Re: TSay class and non themed apps
Posted: Sat Feb 18, 2006 02:50 PM

Code: Select all Collapse

METHOD EraseBkGnd( hDC ) CLASS TSay

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

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

return Super:EraseBkGnd( hDC )

EMG

Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

FiveTech Support Forums

Continue the discussion