Just like the subject sez...how?
I can remove the icon from the Title bar, but my form has to be set to fixed dialog and I can't resize it :(
Woka
Just like the subject sez...how?
I can remove the icon from the Title bar, but my form has to be set to fixed dialog and I can't resize it :(
Woka
form borderstyle to fixed dialog, find the "Icon" property and press delete/backspace to remove the "(Icon)" thing :)
the icon will still appear in the IDE, but when run will magically dissapear :D
What part of "resizable form" didn't you understand??? Hahahahahaha :D
Fixed it...Here's the code:
VB Code:
Option Explicit Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Private Const WS_THICKFRAME As Long = &H40000 Private Const WS_MAXIMIZE As Long = &H1000000 Private Const WS_MAXIMIZEBOX As Long = &H10000 Private Const WS_MINIMIZE As Long = &H20000000 Private Const WS_MINIMIZEBOX As Long = &H20000 Private Const WS_EX_WINDOWEDGE As Long = &H100 Private Const WS_EX_APPWINDOW As Long = &H40000 Private Const WS_EX_DLGMODALFRAME As Long = &H1 Private Const GWL_EXSTYLE As Long = (-20) Private Const GWL_STYLE As Long = (-16) Private Sub Form_Load() SetWindowLong Me.hwnd, GWL_STYLE, GetWindowLong(Me.hwnd, GWL_STYLE) Or WS_THICKFRAME Or WS_MAXIMIZE Or WS_MAXIMIZEBOX 'Or WS_MINIMIZE 'Or WS_MINIMIZEBOX SetWindowLong Me.hwnd, GWL_EXSTYLE, WS_EX_WINDOWEDGE Or WS_EX_APPWINDOW Or WS_EX_DLGMODALFRAME End Sub
d'oh! :D sorry, when you said "and i can't resize it" i thought you meant you didn't want to. my bad :)
Hell man, I'd had just used a blank icon lol.
Nice code though
Cheat...:D
Just modified my code above so it now contains the correct constants...
Woka