-
Dec 28th, 2001, 09:40 PM
#1
Thread Starter
Addicted Member
Change form border color?
Is it possible to change the border color of a form?
-
Dec 28th, 2001, 10:07 PM
#2
PowerPoster
The only way I know of is to change the system settings so that all active window borders are set to the color of your choice. I don't think there is an easy way to do it, but you can see if someone here that knows how to subclass can do it.
-
Dec 28th, 2001, 10:16 PM
#3
Add the attached class module to your project and you could use this code to change the color of the form's border
Code:
Option Explicit
Dim cColors As New SystemColors
Dim intPrevColor As Long
Private Sub Form_Load()
intPrevColor = cColors.ActiveBorder
cColors.ActiveBorder = RGB(100, 100, 100)
End Sub
Private Sub Form_Unload(Cancel As Integer)
cColors.ActiveBorder = intPrevColor
End Sub
Hope it helps
-
Dec 28th, 2001, 10:56 PM
#4
Hmm
why dont u draw a new one??
-
Apr 15th, 2017, 09:28 PM
#5
Member
Re: Change form border color?
New SystemColors is not available for reference?!
-
Apr 15th, 2017, 09:50 PM
#6
Re: Change form border color?
Originally Posted by ramp10er
New SystemColors is not available for reference?!
You do realize you are replying to a post that may be older than some newbie coders
-
Apr 15th, 2017, 09:50 PM
#7
Re: Change form border color?
Originally Posted by ramp10er
New SystemColors is not available for reference?!
I take it that you did not notice this thread was from 2001.
-
Apr 16th, 2017, 01:09 AM
#8
Member
Re: Change form border color?
Yes! I did not notice it...
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|