Jim Skolmoski wrote:
> I would like to center the checkbox line, and
> center or flush right the connect/cancel buttons
How's this?
on ShowDialog()
if not(objectP(goDialog)) then
goDialog = new(xtra "mui")
if not(objectP(goDialog)) then
goDialog = void
alert "ERROR: MUIXtra failure!"
exit
end if
end if
myWindow = goDialog.getWindowPropList()
myWindow.name = "Internet Connection Alert"
myWindow.callback = "myDialogCallback"
myWindow.mode = #data
myWindow.xPosition = -1
myWindow.yPosition = -1
myWindow.closeBox = TRUE
myDialog = []
layouter = goDialog.getItemPropList()
layouter.type = #windowBegin
myDialog.append(layouter.duplicate())
widget = goDialog.getItemPropList()
widget.type = #groupHBegin
myDialog.append( widget.duplicate() )
widget = goDialog.getItemPropList()
widget.type = #bitmap
widget.attributes = [#bitmapIcon:#stop]
myDialog.append( widget.duplicate() )
layouter = goDialog.getItemPropList()
layouter.type = #groupVBegin
myDialog.append( layouter.duplicate() )
widget = goDialog.getItemPropList()
widget.type = #label
widget.value = "This link will take you to foobar.com." & RETURN & "Do you
wish to connect at this time?"
myDialog.append(widget.duplicate())
widget = goDialog.getItemPropList()
widget.type = #checkBox
widget.value = FALSE
widget.title = "Do not show this dialog again."
myDialog.append(widget.duplicate())
layouter = goDialog.getItemPropList()
layouter.type = #groupVEnd
myDialog.append( layouter.duplicate() )
widget = goDialog.getItemPropList()
widget.type = #dividerV
myDialog.append(widget.duplicate())
widget = goDialog.getItemPropList()
widget.type = #groupVBegin
myDialog.append( widget.duplicate() )
widget = goDialog.getItemPropList()
widget.type = #defaultPushButton
widget.title = "Connect"
myDialog.append(widget.duplicate())
widget = goDialog.getItemPropList()
widget.type = #pushButton
widget.title = "Cancel"
myDialog.append(widget.duplicate())
widget = goDialog.getItemPropList()
widget.type = #groupVend
myDialog.append( widget.duplicate() )
layouter = goDialog.getItemPropList()
layouter.type = #windowEnd
myDialog.append( layouter.duplicate() )
goDialog.Initialize([ #windowPropList:myWindow, \
#windowItemList: myDialog])
goDialog.Run()
end
Hope this helps,
Rob
/**********************************
* Robert Wingate *
* Visual Book Productions, Inc. *
* mailto:[EMAIL PROTECTED] *
**********************************/
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/lingo-l.cgi To post messages to the list, email
[EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED]). Lingo-L is for
learning and helping with programming Lingo. Thanks!]
