Re: Bitmap representation of the cube component.
support.dcube.delphi
Bitmap representation of the cube component.
07-28-2003, 12:00 AM
Originally Posted By: Jay Lee<jay@NONONO_SPAM.COM>
Hi
is there a way to get the bitmap of the cube ?
I found _DDRenderToCanvas in the method, can somebody explain how to use
this ?
Thanks
Jay
Re: Bitmap representation of the cube component.
07-29-2003, 12:00 AM
Originally Posted By: Jennifer-DD<dynamicube.support@datadynamics.com>
Hi Jay,
The _DDRenderToCanvas method is an internal method for printing the cube.
I know of no way through DynamiCube to print a bitmap of the cube.
.
"Jay Lee"
wrote in message
news:2xwhfFWVDHA.1484@dynaweb.datadynamics.com...
> Hi
>
> is there a way to get the bitmap of the cube ?
>
> I found _DDRenderToCanvas in the method, can somebody explain how to use
> this ?
>
> Thanks
>
> Jay
>
>
Re: Bitmap representation of the cube component.
07-30-2003, 12:00 AM
Originally Posted By: Lucas \(DD\)<dynamicube.support@datadynamics.com>
Jay,
You might try resorting to an api to get a screen capture, but this would
limit you to the size of the 'visible' cube and not the entire cube.
Unfortunately there is no built-in way to get the results that you are
looking for. Good luck... Here is sample code for you that I extracted from
the web:
Declare Function SHChangeIconDialog Lib "shell32" Alias "#62" (ByVal hOwner
As _
Long, ByVal szFilename As String, ByVal Reserved As Long, _
lpIconIndex As Long) As Long
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _
ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_KEYUP = &H2
' Return the current contents of the screen or the active window
'
' It works by simulating the typing of the Print-Screen key
' (and Alt key if ActiveWindow is True), which dumps the screen
' to the clipboard. The original contents of the clipboard is then
' restored, but this action might affect the behavior of other
' applications that are monitoring the clipboard.
Public Function GetScreenBitmap(Optional ActiveWindow As Boolean = False) As
Picture
' save the current picture in the clipboard, if any
Dim pic As StdPicture
Set pic = Clipboard.GetData(vbCFBitmap)
' Alt-Print Screen captures the active window only
If ActiveWindow Then
' Press the Alt key
keybd_event vbKeyMenu, 0, 0, 0
End If
' Press the Print Screen key
keybd_event vbKeySnapshot, 0, 0, 0
DoEvents
' Release the Print Screen key
keybd_event vbKeySnapshot, 0, KEYEVENTF_KEYUP, 0
If ActiveWindow Then
' Release the Alt key
keybd_event vbKeyMenu, 0, KEYEVENTF_KEYUP, 0
End If
DoEvents
' return the bitmap now in the clipboard
Set GetScreenBitmap = Clipboard.GetData(vbCFBitmap)
' restore the original contents of the clipboard
Clipboard.SetData pic, vbCFBitmap
End Function
Lucas
DD Support
"Jay Lee"
wrote in message
news:2xwhfFWVDHA.1484@dynaweb.datadynamics.com...
> Hi
>
> is there a way to get the bitmap of the cube ?
>
> I found _DDRenderToCanvas in the method, can somebody explain how to use
> this ?
>
> Thanks
>
> Jay
>
>