How to save a dialog/window to Bitmap ?

Board index FiveWin for Harbour/xHarbour How to save a dialog/window to Bitmap ?

Posts: 654

Joined: Fri Oct 21, 2005 05:54 AM

How to save a dialog/window to Bitmap ?
Posted: Sun Jul 29, 2007 04:47 PM

Hello Mr.Antonio

The following function is not saving the window to bitmap.

#include "Fivewin.ch" 

function Main() 

   DEFINE WINDOW oWnd TITLE "SaveToBmp" 

   @ 9, 2 BUTTON "Save To Bmp" ; 
      SIZE 210, 30 ; 
      ACTION ( oWnd:SaveToBmp( CurDir() + "\test.bmp" ), MsgInfo( "done!" ) ) 
      
   ACTIVATE WINDOW oWnd 
    
return nil

I tried with the following code also. But could not get the result.

Code: Select all Collapse

FUNCTION Save2Bmp( cFile, oDlg )

   DEFAULT cFile := "Saved.Bmp"

   DibWrite( cFile, DibFromBitmap( WndBitmap( oDlg:hWnd ) ) )

RETURN ( FILE( cFile ) )

Please guide me how to save a dialog/window to bitmap file.

Regards

- Ramesh Babu P

Antonio Linares

Posts: 44162