-
Region border?
I have 3 region that after that are created,they are combined!
I need to make a border only to one region that is RoundRect and have a white background! So I need a black border rgb(0,0,0)!
Where i have to put the code that draw border for region 1 ?
And what code i have to use: FrameRgn?
After creating the region or after combining???
These is the code i'm using:
Public Function CreateSpForm()
Dim lngRegion1 As Long
Dim lngRegion2 As Long
Dim lngRegion3 As Long
Dim lngStatus As Long
lngRegion1 = CreateRoundRectRgn(5, 32, 280, 53, 20, 10)
lngRegion2 = CreateRoundRectRgn(5, 65, 385, 205, 35, 20)
lngRegion3 = CreateRoundRectRgn(385, 32, 325, 85, 20, 10)
lngStatus = CombineRgn(lngRegion1, lngRegion1, lngRegion2, RGN_OR)
lngStatus = CombineRgn(lngRegion1, lngRegion1, lngRegion3, RGN_OR)
If lngStatus = SIMPLEREGION Or lngStatus = COMPLEXREGION Then
lngStatus = SetWindowRgn(baza.hwnd, lngRegion1, True)
End If
DeleteObject lngRegion1
DeleteObject lngRegion2
DeleteObject lngRegion3
End function
So...these code is working, but i need a border because the programm is looking ugly on a white background!
thanks!