Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Changing the form look?
#11
I'm pretty sure the links I posted did invole that, but I thought you meant you just wanted to remove the buttons, that's why I said "use some command buttons to make the exit, minimize and maximize buttons"

Well, I think I said that! I'm on my phone andim too lazy to check!
Reply
#12
One problem your going to run into when using a borderless form is, the ability to drag the form around the screen. Using the snippet code below this will fix it.

Paste this anywhere in your Form code. Enjoy

Code:
Const WM_NCHITTEST As Integer = &H84
Const HTCLIENT As Integer = &H1
Const HTCAPTION As Integer = &H2
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
Select Case m.Msg
Case WM_NCHITTEST
MyBase.WndProc(m)
If m.Result = HTCLIENT Then m.Result = HTCAPTION
Case Else
'Make sure you pass unhandled messages back to the default message handler.
MyBase.WndProc(m)
End Select
End Sub
Reply
#13
(10-27-2009, 03:10 AM)malcomhfc Wrote: One problem your going to run into when using a borderless form is, the ability to drag the form around the screen. Using the snippet code below this will fix it.

Paste this anywhere in your Form code. Enjoy

Code:
Const WM_NCHITTEST As Integer = &H84
Const HTCLIENT As Integer = &H1
Const HTCAPTION As Integer = &H2
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
Select Case m.Msg
Case WM_NCHITTEST
MyBase.WndProc(m)
If m.Result = HTCLIENT Then m.Result = HTCAPTION
Case Else
'Make sure you pass unhandled messages back to the default message handler.
MyBase.WndProc(m)
End Select
End Sub

Thanks for this.
[Image: arch2.png]
Reply
#14
(10-19-2009, 11:05 PM)Extasey Wrote: http://www.lmgtfy.com/?q=change+form+icon+vb6
http://www.lmgtfy.com/?q=change+form+ico...sual+basic

What's wrong with you? This is a forum, nevermind a forum for support.
[Image: 531hf7.jpg]
Reply


Possibly Related Threads…
Thread Author Replies Views Last Post
  Problem in form Chuggaism 3 2,045 11-07-2013, 06:35 PM
Last Post: AceInfinity
  [VB.NET] Animated Form Extend [SRC] Fragma 6 5,592 10-10-2013, 12:18 PM
Last Post: Saket
  Greation a promission for users in main form or setting deveco 2 1,052 11-13-2012, 01:33 PM
Last Post: TAHMINA123
  [Tutorial] Fade In / Out Form [Source] ₠o™ 4 1,439 12-09-2011, 01:21 AM
Last Post: ₠o™
  [Help]Connecting Form Windows milopeach 3 1,294 05-04-2011, 07:10 AM
Last Post: KoBE

Forum Jump:


Users browsing this thread: 3 Guest(s)