"Could not find the enchaned metafile, please check your TEMP enviroment variable"
and the it make a gpf ???
Code: Select all
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