Gent.mi,
con Visual Basic 2010, gradirei se è possibile modificare il form con il codice.
Ho usato il seguente codice che permette di avere, inserendo i parametri, il form da rettangolare che è di default in circolare o ovale:
> Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, _
ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
> Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, _
ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Nel Form1_Load......:
> hr& = CreateEllipticRgn(0, 0, 100, 200)
> dl& = SetWindowRgn(Me.hWnd, hr, True)
Noto un problema che non viene accettato (che sono sottolineati):
> hr&, dl&, Me.hWnd, hr
Gentilmente potete suggerire per poter ripristinare?
Anticipatamente ringrazio.
Domenico.
con Visual Basic 2010, gradirei se è possibile modificare il form con il codice.
Ho usato il seguente codice che permette di avere, inserendo i parametri, il form da rettangolare che è di default in circolare o ovale:
> Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, _
ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
> Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, _
ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Nel Form1_Load......:
> hr& = CreateEllipticRgn(0, 0, 100, 200)
> dl& = SetWindowRgn(Me.hWnd, hr, True)
Noto un problema che non viene accettato (che sono sottolineati):
> hr&, dl&, Me.hWnd, hr
Gentilmente potete suggerire per poter ripristinare?
Anticipatamente ringrazio.
Domenico.