WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

Functions

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

AskYesNo with Custom Button Names

 Keywords: AskYesNo Custom Button Name ButtonName

#DefineFunction udfAskYesNo( title, text, button1, button2 )
   MyDialogFormat=`WWWDLGED,6.2`
   MyDialogCaption=title
   MyDialogX=-1
   MyDialogY=-1
   MyDialogWidth=212
   MyDialogHeight=087
   MyDialogNumControls=004
   MyDialogProcedure=`DEFAULT`
   MyDialogFont=`DEFAULT`
   MyDialogTextColor=`DEFAULT`
   MyDialogBackground=`DEFAULT,DEFAULT`
   MyDialogConfig=0
   MyDialog001=`025,059,036,012,PUSHBUTTON,"PushButton_Yes",DEFAULT,"`:button1:`",1,2,32,DEFAULT,DEFAULT,DEFAULT`
   MyDialog002=`129,059,036,012,PUSHBUTTON,"PushButton_Cancel",DEFAULT,"Cancel",0,3,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
   MyDialog003=`075,059,036,012,PUSHBUTTON,"PushButton_No",DEFAULT,"`:button2:`",9999,1,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
   MyDialog004=`027,027,154,012,VARYTEXT,"VaryText_1",Text,"Text",DEFAULT,40,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
   ButtonPushed=Dialog("MyDialog")
   ; Special handling of 0 value, because zero has special meaning to Dialogs
   If ButtonPushed == 9999 Then ButtonPushed = 0
   Return ButtonPushed
#EndFunction

buttonaname1 = 'TXT'
buttonaname2 = 'CSV'
ret = udfAskYesno( 'title', 'Your question goes here.', buttonaname1, buttonaname2 )

If ret == @YES
    Pause( 'User Selected', 'TXT' )
Else
    Pause( 'User Selected', 'CSV' )
EndIf

Exit

Article ID:   W17889
Filename:   AskYesNo with Custom Button Names.txt
File Created: 2010:07:30:09:34:10
Last Updated: 2010:07:30:09:34:10