Heh....

very basic example...
the drawStuff() function is just drawing some arcs and things via Cocoa... since I just wanted to see if the callbacks were working at all.
Good things
* It compiles
* It runs
Bad things
* It doesn't unload properly - although the destructor is called for the view, I think the BlitzMax side of it is still hanging on.
* Can't quit System Preferences after showing the preview - Need to force quit it.
* Need to hard-reset (the computer) if you mistakenly go fullscreen with it ;-)
Otherwise... it's kind of working :-p
... this is about attempt 6... of trying to get it working. (if at first you don't succeed... probably best not to bother!)

very basic example...
SuperStrict Framework BaH.MacScreenSaver Import "drawstuff.m" Extern Function drawStuff(width:Float, height:Float) End Extern SetScreenSaver(New myScreenSaver) Type myScreenSaver Extends TMacScreenSaver Method DrawRect(width:Float, height:Float) drawstuff(width, height) End Method End Type
the drawStuff() function is just drawing some arcs and things via Cocoa... since I just wanted to see if the callbacks were working at all.
Good things
* It compiles
* It runs
Bad things
* It doesn't unload properly - although the destructor is called for the view, I think the BlitzMax side of it is still hanging on.
* Can't quit System Preferences after showing the preview - Need to force quit it.
* Need to hard-reset (the computer) if you mistakenly go fullscreen with it ;-)
Otherwise... it's kind of working :-p
... this is about attempt 6... of trying to get it working. (if at first you don't succeed... probably best not to bother!)