[Lazarus] Setting a cursor from resource

[Paul Ishenin]

23.03.2011 21:01, Paul Ishenin wrote:
> 23.03.2011 18:54, patspiper wrote:
>> EInvalidGraphic: Stream is not an icon type
> I will do a test tomorow.
>>
>> Is the code above compatible with both RT_CURSOR and RT_GROUP_CURSOR
>> resources?
> I tested it with icons only. I see from the code that instead of
> RT_CURSOR for TCursorImage it will use RT_ICON. Maybe this cause a problem.

Where were more problems than I expected. I hope I fixed them all in 
r30006. Please test.

Best regards,
Paul Ishenin