si il subclassing si basa sull'Api sendmessageOriginariamente inviato da evil80
grazie.
in sostanza quindi è programmazione delle API ?
Ti chiedo solo un'ultima cosa :
ma le API in realtà quanto sono importanti ?
nel senso ti è capitato spesso di ricorrere alla programmazione della API ?
Ciao
le api sono importanti se vuoi superare i limiti di visualbasic
di norma ne dichiaro una quindicina in un programma
codice:'Chiamate api Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _ (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, _ ByVal lpsz2 As String) As Long Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hWnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, lParam As Any) As Long Declare Function SetParent Lib "user32" _ (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long Declare Function GetDC Lib "user32" _ (ByVal hWnd As Long) As Long Declare Function ReleaseDC Lib "user32" _ (ByVal hWnd As Long, ByVal hDC As Long) As Long Declare Function ImageList_SetBkColor Lib "ComCtl32" _ (ByVal hIml As Long, ByVal clrBk As Long) As Long Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal _ nIndex As Long, ByVal dwNewLong As Long) As Long Declare Function GetWindowLong Lib "user32" _ Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal _ nIndex As Long) As Long Declare Function GetSystemMenu Lib "user32" _ (ByVal hWnd As Long, ByVal bRevert As Long) As Long Declare Function GetMenuItemCount Lib "user32" _ (ByVal hMenu As Long) As Long Declare Function DrawMenuBar Lib "user32" _ (ByVal hWnd As Long) As Long Declare Function RemoveMenu Lib "user32" _ (ByVal hMenu As Long, ByVal nPosition As Long, _ ByVal wFlags As Long) As Long Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _ (ByVal lpBuffer As String, nSize As Long) As Long Declare Function GetTickCount Lib "kernel32" () As Long Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" _ (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, _ ByVal nVolumeNameSize As Long, lpVolumeSerial_Numberber As Long, _ lpMaximumComponentLength As Long, lpFileSystemFlags As Long, _ ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long Declare Function SetWindowPos Lib "user32" _ (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, _ ByVal X As Long, ByVal Y As Long, ByVal cx As Long, _ ByVal cy As Long, ByVal wFlags As Long) As Long

Rispondi quotando