On 16-May-06, at 1:38 PM, Daniel Lurie wrote:
Lars Jensen wrote:
cartoon-style renderer
Cool! Anybody know how to invoke this via RB?
lj
I don't, but I'm sure Joe and Frank do. (waits for answer)(suspects
something declare-y)
Keep in mind you can't declare to Quesa in Mach-O or Linux builds but
this'll do it:
Dim cartoonType As Integer
Declare Sub Q3ObjectHierarchy_GetTypeFromString Lib
"Quesa" (objectClassString As CString, ByRef objectClassType As Integer)
Declare Sub Q3View_SetRendererByType Lib "Quesa" (view As Integer,
theType As Integer)
Q3ObjectHierarchy_GetTypeFromString("Quesa Cartoon", cartoonType)
Q3View_SetRendererByType(space.ViewHandle, cartoonType)
Where "space" is your Rb3DSpace. Note that you can't do this in the
Rb3DSpace's open event, use a short timer and run that from the open
event instead (that's the safest way to change *any* Rb3DSpace
parameters - even built-in stuff). Also note that those declares are
technically functions that return error codes so you might want to
check the return values in a real app.
HTH!
Frank.
–––––––––––––––––––––––––––––––––
Open Source RB Goodies and Shareware
<http://developer.chaoticbox.com/>
<http://www.chaoticbox.com/>
–––––––––––––––––––––––––––––––––
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
|