Embed a JMP platform dialog into a new window()Is there a way to embed part of a JMP built in platform dialog into a new window(). In this case specificaly I would like to embed the construct model effects window from fit model into a custom script:

ScriptingRe: Embed a JMP platform dialo into a new window()Brilliant! Nicely done, @pauldeen!
Re: Embed a JMP platform dialo into a new window()
Thanks Julian, with your hints I cracked it!
fmWindow = New Window( "Fit Model Dialog Example",
H List Box(
pb = Panel Box( "Launch Window",
fm = Fit Model(
Personality( Standard Least Squares ),
Emphasis( Minimal Report ),
SendToReport(
Dispatch( {}, "", PanelBox, {Visibility( "Collapse" )} ),
Dispatch( {}, "", Panel Box( 2 ), {Visibility( "Collapse" )} ),
Dispatch( {}, "", Lineup Box( 2 ), {Visibility( "Collapse" )} ),
Dispatch( {}, "", List Box( 23 ), {Visibility( "Collapse" )} )
)
)
),
Text Box( "Other content here" )
)
);By just collapsing all boxes I don't need I could eliminate the parts of the window I do not want!

Re: Embed a JMP platform dialo into a new window()Hi @pauldeen,
If I understand correctly, you would like to insert only the below highlighted piece into a window/custom dialog of your own. Not the whole dialog itself, correct?

Re: Embed a JMP platform dialo into a new window()HI @pauldeen,
You sure can. Here's a simple example:
fmWindow = New Window( "Fit Model Dialog Example",
H List Box(
Text Box( "Other content here" ),
Panel Box( "Launch Window",
fm = Fit Model( Personality( Standard Least Squares ), Emphasis( Minimal Report ) )
)
)
);
I hope this helps!
@julian
--Edit--
As Chris pointed out, it looks like I skipped a critical part of your question and you're interested in just part of that dialog. I don't know of a way to bring in just that component, though depending on your use case, you *might* be able to accomplish what you're after by working with the display of that content with Margin() after you bring in the entire dialog. I don't really recommend this method, but am sharing it in case it happens to be helpful:
fmWindow = New Window( "Fit Model Dialog Example",
H List Box(
pb = Panel Box( "Launch Window",
fm = Fit Model( Personality( Standard Least Squares ), Emphasis( Minimal Report ) )
),
Text Box( "Other content here" )
)
);
pb << Margin( Left( -300 ), Top( -325 ) );
which will give:
