OpenEuphoria

Re: Colour Cursors

• Posted by chrissy <tubby.toast at NTLWORLD.COM> Sep 07, 2000
• 539 views

Oooh I've got it working!  I downloaded a DLL viewer and found that there
was no LoadCursorFromFile in user32.dll - but there was a
LoadCursorFromFileA (which works) and a LoadCursorFromFileW (which doesn't).
What's the difference between them and why do you have to go to such methods
to find out what they're *actually* called?  Anyway here's a demo for the
curious.

--begin tested code
include win32lib.ew

constant
TER),
main=create(Window,"My Window",0,Default,Default,330,330,0)

atom str, hcursor
str=allocate_string("mycursor.cur")
hcursor=c_func(xLoadCursorFromFile,{str})
free(str)
trackCursor(hcursor)

procedure onOpen_main()
    setMousePointer(main,hcursor)
end procedure
onOpen[main]=routine_id("onOpen_main")

WinMain(main,Normal)
--end

chris.

> Oh well, thanks to anyone who had a look at it.  Since this looks too
> difficult, I thought about loading the cursor from a .cur file instead.
> However, I haven't managed to get further than this:-
>
> include win32lib.ew
> constant
>
> ER)
>
> For some reason I get an error message saying it can't link to
> LoadCursorFromFile.  I can't understand it.  I'm using the WinAPI help
file
> linked to by the RDS site and that lists this function.  What's going on?
>
> chris.
>