Ho un BorderBox pieno di Graph Builder, che voglio salvare come immagine.
Ho un "Add Graphics Script" su un FrameBox in esso. Questo script utilizza variabili:
dt << Graph Builder(
Size( 600, 400 ),
Show Control Panel( 0 ),
Show Legend( 0 ),
Title Alignment( "Right" ),
Variables( X( :X ), Y( :Y ), Overlay( :Overlay ) ),
Elements(
Contour( X, Y, Legend( 5 ), Number of Levels( 18 ), Smoothness( -0.8899 ) ),
Points( X, Y, Legend( 4 ) )
),
SendToReport(
Dispatch(
{},
"Graph Builder",
FrameBox,
{Marker Size( 1 ), Add Graphics Script(
Transparency( 0.5 );
Fill Color( "Green" );
Pen Color( "Dark Green" );
Line(
{marginXmin, marginYmin},
{marginXmin, marginYmax},
{marginXmax, marginYmax},
{marginXmax, marginYmin}
{marginXmin, marginYmin}
);
)}
)
),Se apro una nuova finestra con il BorderBox chiamato "imageForReport" che contiene questo GraphBuilder:
window = New Window( "My Report", imageForReport );
e quindi salva il report nell'immagine:
imageForReport << save picture( imgPath, "png" );
va tutto bene e tutto funziona.
Ma ho solo bisogno di quella finestra per eseguire il debug al volo, il prodotto finale è il file immagine PNG.
Quindi per la versione di produzione che esegue migliaia di report risparmio sulle risorse e non apro quella finestra.
Ma in questo caso lo script grafico non funziona perché la prima variabile (e immagino le altre) non è risolta. Ho capito:
Name Unresolved: marginXmin in access or evaluation of 'marginXmin' , marginXmin/*###*/
nella finestra Registro. Come posso risolverlo senza aprire e chiudere migliaia di finestre non necessarie?
AGGIORNARE:
Ecco uno script di esempio per testare questo comportamento:
Clear Log();
Clear Symbols();
Clear Globals();
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
cutOutX = 20;
cutOutY = 3;
marginXmin = 70;
marginXmax = 160;
marginYmin = 55;
marginYmax = 65;
imageForReport = Border Box(
VLBox = V List Box(
//Zero row
headerTB = Text Box( "Test savingimage" ),
gb = Graph Builder(
Size( 528, 456 ),
Show Control Panel( 0 ),
Variables( X( :weight ), Y( :height ) ),
Elements( Points( X, Y, Legend( 6 ) ) ),
SendToReport(
Dispatch(
{},
"Graph Builder",
FrameBox,
{Marker Size( 1 ), Add Graphics Script(
Transparency( 0.5 );
Fill Color( "Green" );
Pen Color( "Dark Green" );
Line(
{marginXmin, marginYmin},
{marginXmin, (marginYmax - cutOutY)},
{(marginXmin + cutOutX), (marginYmax - cutOutY)},
{(marginXmin + cutOutX), marginYmax},
{(marginXmax - cutOutX), marginYmax},
{(marginXmax - cutOutX), (marginYmax - cutOutY)},
{marginXmax, (marginYmax - cutOutY)},
{marginXmax, marginYmin},
{marginXmin, marginYmin}
);
)}
)
)
)
)
);
window = New Window( "My Report", imageForReport );
imageForReport << save picture( "C:\temp\testImage.png", "png" );Se eseguito così com'è, aprirà una finestra con la trama e la forma e salverà l'immagine PNG con trama e forma.
Se si commenta la nuova riga della finestra, salverà la trama nell'immagine PNG senza aprire una nuova finestra, ma la forma non sarà presente.
Qualcuno può spiegarlo e come risolverlo? Come dare forma all'immagine salvata senza dover aprire \ chiudere una nuova finestra con la trama?