How 2 re-calculate Client area after TOutLook2003 is used.

Posts: 654

Joined: Fri Oct 21, 2005 05:54 AM

How 2 re-calculate Client area after TOutLook2003 is used.
Posted: Thu Aug 21, 2008 12:49 PM

Hi All,

When I tested test2003.prg in samples folder, I found that the child window is not painted immediately after the right side of OutLook Bar, in
the client area.

Once the OutLook bar paited, the client area of the parent window is not
resized from the very next point of Outlook bar's width, due to which part
of the child windows is hidden under the Outlook Bar.

How to get it rectified. It is expected to work like TExpolorer recently
published in the forum by andresreyes_mzt vide his posting :

http://forums.fivetechsoft.com/viewtopi ... 04start=0

Thanks in advance

Ramesh Babu P

&

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

How 2 re-calculate Client area after TOutLook2003 is used.
Posted: Sat Aug 23, 2008 09:37 AM

Ramesh,

Please add this code in samples\Test2003.prg:

Code: Select all Collapse

   ACTIVATE WINDOW oWnd ;
      ON RESIZE ( oSplit:Adjust(), WndLeft( oWnd:oWndClient:hWnd, oSplit:nRight + 1 ) ) ;
      VALID lExit := .T.

regards, saludos

Antonio Linares
www.fivetechsoft.com

RAMESHBABU

Posts: 654

Joined: Fri Oct 21, 2005 05:54 AM

How 2 re-calculate Client area after TOutLook2003 is used.
Posted: Sat Aug 23, 2008 10:58 AM

Hello Mr.Antonio,

Thank you very much for your attention.

On implementing your suggestion I am getting the following errors.

Code: Select all Collapse

Application
===========
   Path and name: C:\FWH\SAMPLES\test2003.exe (32 bits)
   Size: 1,424,896 bytes
   Time from start: 0 hours 0 mins 0 secs 
   Error occurred at: 08/23/08, 16:26:20
   Error description: Error BASE/1071  Argument error: =
   Args:
     [   1] = O   Object
     [   2] = N   191

Stack Calls
===========
   Called from: test2003.prg => (b)MAIN(23)
   Called from: window.prg => TOUTLOOK2003:RESIZE(2082)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(0)
   Called from: .\source\classes\OUTL2003.PRG => TOUTLOOK2003:HANDLEEVENT(0)
   Called from: window.prg => _FWH(3300)
   Called from:  => WNDADJLEFT(0)
   Called from: .\source\classes\CONTROL.PRG => TOUTLOOK2003:ADJLEFT(0)
   Called from: window.prg => TWINDOW:RESIZE(2067)
   Called from: .\source\classes\MDIFRAME.PRG => TMDIFRAME:RESIZE(0)
   Called from:  => TMDIFRAME:HANDLEEVENT(0)
   Called from: window.prg => _FWH(3300)
   Called from:  => SHOWWINDOW(0)
   Called from: window.prg => TMDIFRAME:ACTIVATE(934)
   Called from: test2003.prg => MAIN(63)

Please help.

- Ramesh Babu P

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

How 2 re-calculate Client area after TOutLook2003 is used.
Posted: Sat Aug 23, 2008 11:07 AM

Please show your source code in line 23.

You are comparing a number and an object!

regards, saludos

Antonio Linares
www.fivetechsoft.com

RAMESHBABU

Posts: 654

Joined: Fri Oct 21, 2005 05:54 AM

How 2 re-calculate Client area after TOutLook2003 is used.
Posted: Sat Aug 23, 2008 11:13 AM

Hello Mr.Antonio

I am very sorry. There was some error in my code.

With your suggested change, I got the child window positioned from the very next pixel point of the splitter properly.

But the Rightside of the child window is gone beyond the right side of main window.

Regards,

Ramesh Babu P

FiveTech Support Forums

Continue the discussion