home *** CD-ROM | disk | FTP | other *** search
- object AssociationInspector: TAssociationInspector
- Left = 203
- Top = 113
- BorderStyle = bsDialog
- Caption = 'Association Inspector'
- ClientHeight = 336
- ClientWidth = 328
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 13
- object FromClassGroupBox: TGroupBox
- Left = 8
- Top = 8
- Width = 313
- Height = 137
- Caption = ' From Class '
- TabOrder = 0
- object FromClassRoleNameLabel: TLabel
- Left = 8
- Top = 16
- Width = 59
- Height = 13
- Caption = 'Role Name :'
- end
- object FromClassMultiplicityLabel: TLabel
- Left = 176
- Top = 112
- Width = 54
- Height = 13
- Caption = 'Multiplicity :'
- end
- object FromClassRoleNameEdit: TEdit
- Left = 72
- Top = 16
- Width = 233
- Height = 21
- ImeName = '�ѱ���(�ѱ�)'
- TabOrder = 0
- end
- object FromClassRadioGroup: TRadioGroup
- Left = 8
- Top = 88
- Width = 161
- Height = 41
- Caption = 'Association'
- Columns = 2
- ItemIndex = 0
- Items.Strings = (
- 'One'
- 'Many')
- TabOrder = 1
- OnClick = FromClassRadioGroupClick
- end
- object FromClassAccessModifier: TRadioGroup
- Left = 8
- Top = 40
- Width = 297
- Height = 41
- Caption = ' Access Modifier '
- Columns = 4
- ItemIndex = 0
- Items.Strings = (
- 'package'
- 'private'
- 'protected'
- 'public')
- TabOrder = 2
- end
- object FromClassMultiplicitySpinEdit: TSpinEdit
- Left = 240
- Top = 104
- Width = 65
- Height = 22
- MaxValue = 0
- MinValue = 0
- TabOrder = 3
- Value = 100
- end
- end
- object ToClassGroupBox: TGroupBox
- Left = 8
- Top = 152
- Width = 313
- Height = 137
- Caption = ' To Class '
- TabOrder = 1
- object ToClassRoleNameLabel: TLabel
- Left = 8
- Top = 16
- Width = 59
- Height = 13
- Caption = 'Role Name :'
- end
- object ToClassRoleNameEdit: TEdit
- Left = 72
- Top = 16
- Width = 233
- Height = 21
- ImeName = '�ѱ���(�ѱ�)'
- TabOrder = 0
- end
- object ToClassRadioGroup: TRadioGroup
- Left = 8
- Top = 88
- Width = 297
- Height = 41
- Caption = 'Association'
- Columns = 2
- ItemIndex = 0
- Items.Strings = (
- 'References'
- 'Aggregates')
- TabOrder = 1
- end
- object ToClassAccessModifier: TRadioGroup
- Left = 8
- Top = 40
- Width = 297
- Height = 41
- Caption = ' Access Modifier '
- Columns = 4
- ItemIndex = 0
- Items.Strings = (
- 'package'
- 'private'
- 'protected'
- 'public')
- TabOrder = 2
- end
- end
- object OKButton: TBitBtn
- Left = 232
- Top = 296
- Width = 89
- Height = 33
- TabOrder = 2
- Kind = bkOK
- end
- object CancelButton: TBitBtn
- Left = 136
- Top = 296
- Width = 89
- Height = 33
- TabOrder = 3
- Kind = bkCancel
- end
- end
-