topic-8421

Board index FiveWin for Harbour/xHarbour MDI Window

Posts: 310

Joined: Mon Oct 10, 2005 05:10 AM

MDI Window
Posted: Mon Oct 08, 2007 12:35 AM

To All

How do I bring an allready open MDI window back into focus - I have
a particular user who wont check to see if he has a window allready open - he just keeps openning new ones.

Thanks for any help

Cheers

Colin

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

MDI Window
Posted: Mon Oct 08, 2007 03:53 AM

Colin,

That is just one of many reasons I avoid using MDI.

Here is how I used to deal with this problem.

Code: Select all Collapse

         MENUITEM "&New Order...	Ctrl+N" RESOURCE "new";
            ACTION if( ! wndSetFocus(::oWnd,"Order"), Torder():new():add(),)


// Sets focus to child MDI window with cTitle
static function wndSetFocus(oWnd,cTitle)
   local i:=0,lSuccess:=.f.
   cTitle:=upper(cTitle)
   for i=1 to len(oWnd:oWndClient:aWnd)
      if upper( oWnd:oWndClient:aWnd[i]:cCaption )=cTitle
         oWnd:oWndClient:aWnd[i]:setFocus()
         lSuccess:=.t.
      endif
   next
return lSuccess

Regards,
James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

Colin Haig

Posts: 310

Joined: Mon Oct 10, 2005 05:10 AM

MDI
Posted: Mon Oct 08, 2007 06:50 AM

Hi James

Thanks for that - works great.

Cheers

Colin

FiveTech Support Forums

Continue the discussion