From: mynamehere@comcast.net   
      
   "schmendrick" wrote in message   
   news:SYcxe.29204$IL3.6453@tornado.ohiordc.rr.com...   
   >   
   >   
   > Dikkie Dik wrote:   
   >> schmendrick wrote:   
   >>   
   >>> Does anyone know how to disable the dbl click on the title bar?   
   >>>   
   >>> Thanks!   
   >>> David   
   >>   
   >> Do you need the titlebar? In a full-screen window, I can imagine you want to   
   >> drop it altogether. You should be able to do that with just form properties.   
   >>   
   >> Best regards   
   > Well, here's the weird thing about that... When I set it to full screen, the   
   > status bar at the bottom is hidden by the taskbar. not a big deal, i can   
   > handle that... BUT If I remove the title bar and run the app full screen, it   
   > covers the taskbar, and I need that showing.   
      
   Try the handy and overlooked Microsoft SysInfo Control 6.0. It gives you the   
   work area of the desktop, and an event if it changes. Without a border, you   
   need   
   some way to close the form, so I used a button.   
      
   Option Explicit   
      
   Private Sub Form_Load()   
    'set to no border   
    Me.BorderStyle = 0   
    'set initial size   
    SetSize   
   End Sub   
      
   Private Sub Command1_Click()   
    'no control box, so have something   
    Unload Me   
   End Sub   
      
   Private Sub SysInfo1_DisplayChanged()   
    'reset size if display changes   
    SetSize   
   End Sub   
      
   Private Sub SetSize()   
    'set size to system work area   
    With SysInfo1   
    Me.Move .WorkAreaLeft, .WorkAreaTop, _   
    .WorkAreaWidth, .WorkAreaHeight   
    End With   
   End Sub   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   
|