Title Bar

erocm
07-24-2002, 09:15 AM
Is there anyway to get rid of the title bar at the top. I have a very small app were the title bar takes up the same amount of room as the title bar.

Thanks Again!
ErocM

peet
07-24-2002, 09:17 AM
set the forms boarder style to 0-None

peet
07-24-2002, 09:21 AM
you might want to still be able to move the form... in order to do so, do like this:


Option Explicit
Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Sub ReleaseCapture Lib "User32" ()
Const WM_NCLBUTTONDOWN = &HA1
Const HTCAPTION = 2

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim lngReturnValue As Long
If Button = vbLeftButton Then
Call ReleaseCapture
lngReturnValue = SendMessage(Form1.hWnd, WM_NCLBUTTONDOWN, _
HTCAPTION, 0&)
End If
End Sub

erocm
07-24-2002, 09:32 AM
Great ! I had to add this code to my labels too because my two lables take up the whole form and I had very little room to click and drag on the form. Once I did that it worked fine !

Thanks (for a second time today)
ErocM

peet
07-24-2002, 09:54 AM
glad I could help you erocm :)

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum