DIAdemヘルプ

Object: Control

  • 更新日2024-09-12
  • 6分で読める

Object: Control

The Control object corresponds to a control of a dialog box or a tab.

A control is of the following type ActiveX, Button, CheckBox, ChnComboBox, ChnListBox, ComboBox, Curve2DPreview, EditBox, EnumComboBox, EnumListBox, Frame, ListBox, Picture, RadioButton, Slider ,SpinBox, Table, TabPageCtrl, TaskPanel, Text, Tree, ViewConnector or XTable.

The following example checks the controls of the Dialog dialog box and sets the distance of the left edge to the existing entry fields to 10:

Dim i
For i = 1 To Dialog.Controls.Count
  If Dialog.Controls(i).ObjectType = "EditBox" Then
    Dialog.Controls(i).Left = 10
  End If 
Next

The following example checks the controls of the Dialog dialog box and sets the color of the texts to red:

If View.Sheets(1).Areas(1).DisplayObjType = "Dialog" Then
  Dim oMyDlg: Set oMyDlg = View.Sheets(1).Areas(1).DisplayObj.Dialog
  Dim oMyCtrl
  For each oMyCtrl in oMyDlg.Controls
    If oMyCtrl.ObjectType = "Text" Then
      oMyCtrl.ForeColor = RGB(255, 0, 0)
    End If 
  Next
End If

Properties

Left | ObjectCode | ObjectType | Right | Tag | Top