This is a simple "Yes/no" dialog box that returns the results as a text string of "Yes" or "No"
--Copyright 1999 Chuck Neal
--If you find this code helpful, send me an e-mail and let me know. :-)
on yesNodialogBox boxTitle, windowText
set theBox = new(xtra "MUI")
set paramList= [buttons:#YesNo, title:boxTitle, message:windowText, movable:1, icon:#Question]
if objectP(theBox) then
set answer = Alert(theBox, paramList)
case answer of
alert "MUI Xtra is not available!"
on getBehaviorDescription me
return "Call this to get a standard Yes/No dialog box. The result will be a string of "Yes" or "No""
36 South Court Sq
Newnan, GA 30263