Remove Borlands Default System Menu On Dialogs (how)

Remove Borlands Default System Menu On Dialogs (how)

Postby Mike Buckler » Mon Mar 06, 2006 9:14 pm

How do you clear or end the default system menu with dialog from rc file.

Or how do you completely replace the system menu from resources on the fly.

Any help would be appreciated.
Mike Buckler
 
Posts: 67
Joined: Thu Jan 05, 2006 10:35 pm
Location: Canada

Found It On the old forum.

Postby Mike Buckler » Tue Mar 07, 2006 2:26 am

procedure DisableX(ODLG)

local hMenu

hMenu := GetSystemMenu(oDlg:hWnd,.f.)
RemoveMenu( hMenu, 6, MF_BYPOSITION)
RemoveMenu( hMenu, 5, MF_BYPOSITION)
RemoveMenu( hMenu, 4, MF_BYPOSITION)
RemoveMenu( hMenu, 3, MF_BYPOSITION)
RemoveMenu( hMenu, 2, MF_BYPOSITION)
RemoveMenu( hMenu, 1, MF_BYPOSITION)
RemoveMenu( hMenu, 0, MF_BYPOSITION)
return
Mike Buckler
 
Posts: 67
Joined: Thu Jan 05, 2006 10:35 pm
Location: Canada

Postby Antonio Linares » Tue Mar 07, 2006 8:37 am

Mike,

Thanks :)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42076
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 79 guests