Boris
12-Oct-2009, 01:02 PM
Why I'm always getting a value of 1 in eReply with this code?
Is it possible to add a "Cancel" button, instead of showing it as a radio option?
Get Initialise of (oSigCJTaskDialog(Self)) to hoDialog
Set pbShowWindowsExitButton of hoDialog to True
Set psTitle of hoDialog to "Sage Mobile"
Set piMainIcon of hoDialog to eTaskIconCustom
Set psMainIconImage of hoDialog to "sincronizar.ico"
Set psMainInstructionText of hoDialog to "Sincronización"
Set psContentText of hoDialog to ("Escoja el método de sincronización que desee utilizar.")
Set TaskDialogOptionRadio of hoDialog to "Red Privada Virtual" 100
Set TaskDialogOptionRadio of hoDialog to "eMail (sólo Envío de pedidos)" 101
Set TaskDialogOptionRadio of hoDialog to "Webservice" 103
Set TaskDialogOptionRadio of hoDialog to "Cancelar" 104
// Set piDefaultRadioOption of hoDialog to 102
Set psFooterText of hoDialog to ("Si el método de sincronización escogido falla, inténtelo nuevamente con otro!")
Set piFooterIcon of hoDialog to eTaskIconInfo
Get ShowDialog of (oSigCJTaskDialog(Self)) to eReply
Showln eReply
Is it possible to add a "Cancel" button, instead of showing it as a radio option?
Get Initialise of (oSigCJTaskDialog(Self)) to hoDialog
Set pbShowWindowsExitButton of hoDialog to True
Set psTitle of hoDialog to "Sage Mobile"
Set piMainIcon of hoDialog to eTaskIconCustom
Set psMainIconImage of hoDialog to "sincronizar.ico"
Set psMainInstructionText of hoDialog to "Sincronización"
Set psContentText of hoDialog to ("Escoja el método de sincronización que desee utilizar.")
Set TaskDialogOptionRadio of hoDialog to "Red Privada Virtual" 100
Set TaskDialogOptionRadio of hoDialog to "eMail (sólo Envío de pedidos)" 101
Set TaskDialogOptionRadio of hoDialog to "Webservice" 103
Set TaskDialogOptionRadio of hoDialog to "Cancelar" 104
// Set piDefaultRadioOption of hoDialog to 102
Set psFooterText of hoDialog to ("Si el método de sincronización escogido falla, inténtelo nuevamente con otro!")
Set piFooterIcon of hoDialog to eTaskIconInfo
Get ShowDialog of (oSigCJTaskDialog(Self)) to eReply
Showln eReply