Rocket Terminal Emulator

 View Only
  • 1.  Custom Dialog Options

    Posted 03-03-2023 14:54

    Hi, we have several VBScripts using the Internet Explorer object to create custom dialog forms. Since IE is no longer supported, and may be removed from our company PC's what other options do we have to create our own custom dialog forms? I was looking into the Dialog Editor that comes with BlueZone and found the below example in the documentation. But not sure how to get the values of the various controls once the OK button is clicked.

    BeginDialog Dialog1, 0, 0, 186, 233, "Sample Dialog with All Controls"
      ButtonGroup ButtonPressed
        OkButton 135, 10, 50, 15
        CancelButton 135, 30, 50, 15
      OptionGroup RadioGroup1
        RadioButton 10, 30, 60, 10, "RadioButton", Radio1
      CheckBox 10, 40, 50, 15, "CheckBox", Check1
      Text 10, 5, 70, 10, "This is Text"
      EditBox 10, 80, 60, 15, Edit1
      ListBox 10, 110, 65, 40, "Item1"+chr(9)+"Item2"+chr(9)+"Item3", List1
      DropListBox 90, 110, 75, 40, "Item1"+chr(9)+"Item2"+chr(9)+"Item3", List2
      StaticComboBox 10, 175, 65, 45, "Item1"+chr(9)+"Item2"+chr(9)+"Items3", Combo1
      ComboBox 90, 175, 85, 50, "Item1"+chr(9)+"Item2"+chr(9)+"Item3", Combo2
      Text 90, 100, 65, 10, "DropDown ListBox"
      Text 90, 165, 80, 10, "ComboBox"
      GroupBox 5, 20, 70, 40, "GroupBox"
      Text 10, 100, 50, 10, "ListBox"
      Text 10, 70, 50, 10, "EditBox"
      Text 10, 165, 65, 10, "Static ComboBox"
      ButtonGroup ButtonPressed
        PushButton 135, 50, 50, 15, "Button", Button3
      Text 90, 5, 30, 10, "Picture"
      Picture 85, 25, 70, 60, "bz1.bmp", Picture2
    EndDialog
    Dialog Dialog1



    ------------------------------
    Patrick Fletcher
    SR. Engineer
    CenturyLink
    ------------------------------