Thanks Vlad

It worked but unfortunately the background of the Node text did not change and I don’t know how to change it.

If You have any hints you could share with me to help me to change it, I’ll appreciate it.

Regards

Oscar Corte


>Hi!
>
>hWND (long type) is unsigned integer, however VFP have no such type, we use integer instead. The declaration is following:
>
>DECLARE integer SendMessageA in Win32API as SendMessage integer hWND, integer wMsg, integer wParam, integer lParam
>
>The call is:
>lnResult=SendMessage(TreeView1.Object.hWnd, TVM_SETBKCOLOR, 0, RGB(255, 0, 0))
>
>The value of the TVM_SETBKCOLOR constant is 0x1100 + 29
>
>HTH.
>
>
>>Hi George
>>
>>Hope You could give me a little advise on how to make the call.
>>
>>The VB sample code declares an API call by the next code
>>
>>Private Declare Function SendMessage Lib "User32" _
>> Alias "SendMessageA" _
>> (ByVal hWnd As Long, _
>> ByVal wMsg As Long, _
>> ByVal wParam As Long, _
>> lParam As Long) As Long
>>
>>and calls the function with the next line of code
>>
>>Call SendMessage(TreeView1.hWnd, _
>> TVM_SETBKCOLOR, _
>> 0, _
>> ByVal RGB(255, 0, 0))
>>