COLOCAR BACKCOLOR VIA API
Vbmaniacos ..... estou precisando mudar a cor de um formulário via API .... a unica propriedade que eu tenho do formulário é o Hwnd dele .... então preciso de uma função tipo
FunçãoMudaCorFormulário FormHwnd
valeuuu ......
FunçãoMudaCorFormulário FormHwnd
valeuuu ......
Buenas, WOLF!
Da uma olhada ai: http://www.vb-helper.com/tut10.htm
Da uma olhada ai: http://www.vb-helper.com/tut10.htm
não funciona com form
#converte Hwnd para hDc
Declare Function GetDC Lib [Ô]user32.dll[Ô] (ByVal hWnd As Long) As Long
Msgbox GetDC(Form1.hwnd)
#Coloca
Public Declare Function SetBkColor Lib [Ô]gdi32.dll[Ô] (ByVal prmlngHDc As Long, ByVal COLORREF As Long) As Long
call setBkColor (Form1.hdc, RGB(0, 255, 255)
#Pega
Declare Function GetBkColor Lib [Ô]gdi32[Ô] Alias [Ô]GetBkColor[Ô] (ByVal hdc As Long) As Long
Msgbox GetBkColor(Form1.hdc)
Declare Function GetDC Lib [Ô]user32.dll[Ô] (ByVal hWnd As Long) As Long
Msgbox GetDC(Form1.hwnd)
#Coloca
Public Declare Function SetBkColor Lib [Ô]gdi32.dll[Ô] (ByVal prmlngHDc As Long, ByVal COLORREF As Long) As Long
call setBkColor (Form1.hdc, RGB(0, 255, 255)
#Pega
Declare Function GetBkColor Lib [Ô]gdi32[Ô] Alias [Ô]GetBkColor[Ô] (ByVal hdc As Long) As Long
Msgbox GetBkColor(Form1.hdc)
Tópico encerrado , respostas não são mais permitidas