image ResEx Logo
ResExcellence www : Powered by Google
Cell Phone Themes Icons Mighty Mouse Cursors Software Reviews Widgets & Widgets

Articles
   3D
   Audio
   Custom Controls
   General RB
   Graphics
   Hacks
   Mac OS X
   Menus
   Novelty
   Printing
   REALbasic 2005
   REALbasic 2006
   Registration
   Resources
   Reviews
   Serial
   Speech
   Sockets
   XML
   Video
Resource Links
News
   Current News
   February 2006
   January 2006
   December 2005
   November 2005
   October 2005
   September 2005
   August 2005
   July 2005
   June 2005
   May 2005
   April 2005
   March 2005









REALbasic for Dummies
by Erick Tejkowski


Learning REALbasic through Applications
by Clayton E., Crooks II


REALbasic for Macintosh
by Michael Swaine


REALbasic Cross-Platform Application Development
by Mark S. Choate





Older files are in Stuffit 5 or greater format. Newer files are ".Zip". Download StuffIt Expander
Tell us about a bad link. Thank You!

CGSPrivate Functions by Seth Willits
01-15-06

Printer Version




Mac OS X is full of private APIs available only to Apple to use in their own software and the operating system. Clever developers, much more knowledgeable than I, have been able to reverse engineer some of these APIs and do some neat things with them. I was fiddling with the CGSPrivate functions that were made popuplar by a program called Desktop Manager which makes virtual desktops, and made a REALbasic module of (almost) all of the functions in that header as well as some others.

One of the neat things in this header are functions to transition the entire screen, like fast user switching does. I haven't yet done anything useful with these methods, but I did write a tiny sample application that demonstrates these effects.





Full Screen Effects

The code below is pretty simple, and with a fair amount of work using more of the functions, you could do some wickedly cool stuff, like... a virtual desktop manager program made in REALbasic. :)

dim cid as Integer = _CGSDefaultConnection()
dim transNo as Integer

dim transSpec as CGSTransitionSpec
transSpec.Type = CGSTransitionType(PopupMenu1.ListIndex + 1)
transSpec.Option = CGSTransitionOption(PopupMenu2.ListIndex)
transSpec.WindowID = 0 // Fullscreen
transSpec.BackColorPtr = 0

dim err as Integer
err = CGSNewTransition(cid, transSpec, transNo)
err = CGSSetWorkspace(cid, 0)
err = CGSInvokeTransition(cid, transNo, 0.5)
CGSPrivate.Delay(0.5)
err = CGSReleaseTransition(cid, transNo)

Finished

Download the project.




Cell Phone Themes Icons Mighty Mouse Cursors Software Reviews Widgets & Widgets

Maintained by the Staff of ResExcellence. This entire site ©1997-2006 ResExcellence
Privacy Statement? Sure we gotta Privacy Statement. [an error occurred while processing this directive]