// Script function: Print contents in Output window

// Unless named starting with GlobalSino, EM, My, Self, the function commands are defined 
//by Gatan DM, please see at link: http://www.globalsino.com/EM/page2597.html

// void



class GlobalSinoDialog : uiframe
{
void EMButtonA( object MySelfA )
{
TagGroup MyTgA = MySelfA.LookUpElement( "MyStringA" )
Result( MyTgA.DLGGetStringValue() + "\n" )
}
void EMButtonB( object MySelfB )
{
TagGroup MyTgB = MySelfB.LookUpElement( "MyStringB" )
Result( MyTgB.DLGGetStringValue() + "\n" )
}
}

TagGroup MyItems

TagGroup EMDialog = DLGCreateDialog( "Contents in white box can be modified", MyItems )


// Push button A begins
TagGroup MyTgA = DLGCreateStringField( "GlobalSino Test 1" ).DLGIdentifier( "MyStringA" )
MyItems.DLGAddElement( MyTgA )

TagGroup EMButtonA = DLGCreatePushButton( "Show TEST-1 in Output Window", "EMButtonA" )
MyItems.DLGAddElement( EMButtonA )
// Push button A ends


// Push button B begins
TagGroup MyTgB = DLGCreateStringField( "GlobalSino Test 2    " ).DLGIdentifier( "MyStringB" )
MyItems.DLGAddElement( MyTgB )

TagGroup EMButtonB = DLGCreatePushButton( "Show TEST-2 in Output Window", "EMButtonB" )
MyItems.DLGAddElement( EMButtonB )
// Push button B ends
 
if ( alloc( GlobalSinoDialog ).init(EMDialog).Pose() )

{
Result( MyTgA.DLGGetStringValue() + "\n" )
Result( MyTgB.DLGGetStringValue() + "\n" )
}