> Jim Skolmoski wrote:

>> I would like to center the checkbox line, and
>> center or flush right the connect/cancel buttons

Rob Wingate wrote:
> 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
</snip>

Thank you Rob for the solution - it looks good.  I also kept
plugging away at the layout, trying *window.mode = #pixel*.
This also worked out quite well.  FWIW, the code's below.
Note that I gave widgets a top/left position, and oftentimes
did not specify a height and width.  Also note that I customize 
for mac/win differences (not fully tested)

On a separate note, can one include copyright symbols or
trademarks in these dialog boxes?

thanks again Rob,
Jim

-----movie script---------------------
global  goDialog, gIsMac

on showDialog3
  
  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 = "myDialogCallback2"
  --  myWindow.mode = #Data
  --  myWindow.mode = #dialogUnit
  myWindow.mode = #pixel
  myWindow.Xposition = -1
  myWindow.Yposition = -1
  myWindow.closeBox = TRUE
  if gIsMac then
    myWindow.width = 320
  else
    myWindow.width = 272
  end if
  myWindow.height = 140
  
  
  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:#question]
  widget.locH = 16
  widget.locV = 8
  widget.width = 0
  widget.height = 0
  myDialog.append( widget.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?"
  widget.locH = 60
  widget.locV = 10
  widget.width = 0  
  widget.height = 0  
  myDialog.append(widget.duplicate())
  
  widget = goDialog.getItemPropList()
  widget.type = #groupHEnd
  myDialog.append( widget.duplicate() )
  
  widget = goDialog.getItemPropList()
  widget.type = #checkBox
  widget.value = FALSE
  widget.title = "Do not show this dialog again."
  widget.locH = 60
  widget.locV = 60
  widget.width = 0  
  widget.height = 0  
  myDialog.append(widget.duplicate())
  
  widget = goDialog.getItemPropList()
  widget.type = #dividerH
  widget.locH = 18
  widget.locV = 90
  if gIsMac then
    widget.width = 288
  else
    widget.width = 240
  end if
  widget.height = 4 
  myDialog.append(widget.duplicate())
  
  widget = goDialog.getItemPropList()
  widget.type = #groupHBegin
  myDialog.append( widget.duplicate() )
  
  widget = goDialog.getItemPropList()
  widget.type = #defaultPushButton
  widget.title = "Connect"
  widget.locH = 60
  widget.locV = 106
  widget.width = 76
  widget.height = 24
  myDialog.append(widget.duplicate())
  
  widget = goDialog.getItemPropList()
  widget.type = #pushButton
  widget.title = "Cancel"
  if gIsMac then
    widget.locH = 184
  else
    widget.locH = 150
  end if
  widget.locV = 106
  widget.width = 76
  widget.height = 24
  myDialog.append(widget.duplicate())
  
  widget = goDialog.getItemPropList()
  widget.type = #groupHend
  myDialog.append( widget.duplicate() )
  
  layouter = goDialog.getItemPropList()
  layouter.type = #windowEnd
  myDialog.append( layouter.duplicate() )
  
  
  goDialog.initialize([ #windowPropList: myWindow, #windowItemList: myDialog
])
  goDialog.run()
  
end
 
[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!]

Reply via email to