topic-8889

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

error with Metafile
Posted: Tue Nov 20, 2007 11:48 AM

why it let me show this message

"Could not find the enchaned metafile, please check your TEMP enviroment variable"

and the it make a gpf ???

Code: Select all Collapse

function GenChild()

   local oWndChild, oBar, oBmp

   DEFINE WINDOW oWndChild OF oWnd MDICHILD COLOR "N/W"   VSCROLL HSCROLL

   DEFINE BUTTONBAR oBar 3D SIZE 25, 25 OF oWndChild

   DEFINE BUTTON OF oBar ACTION PutLabel( oBmp ) TOOLTIP "Label"
   DEFINE BUTTON OF oBar ACTION PutBitmap( oBmp ) TOOLTIP "Bitmap"

   DEFINE BUTTON OF oBar ACTION PreView( oBmp ) TOOLTIP "Preview"



   oBmp:=TEnhMetaFile():New( 20, 40, 535, 784, "TEST", oWndChild,;
               CLR_WHITE, CLR_BLACK )


   ACTIVATE WINDOW oWndChild

   

return nil

Best Regards, Saludos

Falconi Silvio

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

error with Metafile
Posted: Tue Nov 20, 2007 12:29 PM

Silvio,

Because the metafile file is not found

Code: Select all Collapse

      if file( ::cCaption )
         ::hMeta = GetEnhMetaFile( ::cCaption )
      elseif ! Empty( ::cCaption )
         Alert( "Could not find the enhanced Metafile," + CRLF + ;
                "please check your TEMP environment variable" )
      endif

regards, saludos

Antonio Linares
www.fivetechsoft.com

Silvio

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

error with Metafile
Posted: Tue Nov 20, 2007 12:34 PM

and How I must make to not show it ?

Best Regards, Saludos

Falconi Silvio

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

error with Metafile
Posted: Tue Nov 20, 2007 12:40 PM

Use the filename of an existing metafile file