>>Hi Dawa
>>
>>The code worked on VFP 8.0 . Thanks alot.
>>
>>I have another application on VFP 6.0, for the code to work I need to get the forms window handle using the _WhToHwnd API function.
>>I read about that fuction and still I did not know how to run it. Do you know how to fill the gap for the following code:
>>
>>
>> IF VERSION(5) < 700
>> *-- Need to get the forms window handle
>> ELSE
>> THIS.nHwnd = THIS.HWnd
>> ENDIF
>>
>>
>>Thanks
>>
>>Bob
>>
>>PS.
>>
>>My main problem is to change color of my form's Active title bar without doing any changes to my Windows Desktop appearance. Any suggestions
>
>Bob,
>
>First, it's not considered good form to change the user's preferences, including the color of the active window.
>
>Second, in the following code, note the comment and the adjustment
>IF VERSION(5) < 700
> SET LIBRARY TO FOXTOOLS
> This.hWnd = _WhTohWnd(_WFindTitl(This.Caption))
>ELSE
> * This will throw an error since
> * the property is read-only
> THIS.nHwnd = THIS.HWnd
>ENDIF
George,
How are you doing. Sorry but I'd like to correct one thing here :
if type('version(5)') = 'U' or version(5)/100 < 7
since doing a version check a proability we're doing this in VFP5 or 3 :)
Cetin