home *** CD-ROM | disk | FTP | other *** search
- object NastavForm: TNastavForm
- Left = 463
- Top = 222
- ActiveControl = OkBtn
- BorderStyle = bsDialog
- Caption = 'Tv�rce rozvrh� - nastaven�'
- ClientHeight = 365
- ClientWidth = 369
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object PageCtrl: TPageControl
- Left = 8
- Top = 8
- Width = 353
- Height = 320
- ActivePage = RozvrhSheet
- TabOrder = 0
- object RozvrhSheet: TTabSheet
- Caption = 'Nastaven� GA'
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 353
- Height = 310
- Color = clMenu
- Ctl3D = True
- ParentCtl3D = False
- TabOrder = 0
- object Label7: TLabel
- Left = 31
- Top = 99
- Width = 76
- Height = 13
- Caption = 'Po�et generac�:'
- end
- object Label8: TLabel
- Left = 31
- Top = 126
- Width = 68
- Height = 13
- Caption = 'Po�et jedinc�:'
- end
- object Label9: TLabel
- Left = 31
- Top = 72
- Width = 103
- Height = 13
- Caption = 'Po�et opakov�n� GA:'
- end
- object Label10: TLabel
- Left = 31
- Top = 180
- Width = 123
- Height = 13
- Caption = 'Pravd�podobnost k��en�:'
- end
- object Label11: TLabel
- Left = 31
- Top = 207
- Width = 164
- Height = 13
- Caption = 'Horn� pravd�p. "opravn�" mutace:'
- end
- object Label12: TLabel
- Left = 281
- Top = 180
- Width = 8
- Height = 13
- Caption = '%'
- end
- object Label13: TLabel
- Left = 281
- Top = 207
- Width = 8
- Height = 13
- Caption = '%'
- end
- object Label20: TLabel
- Left = 31
- Top = 153
- Width = 105
- Height = 13
- Caption = 'Po�et eltin�ch jedinc�:'
- end
- object Label21: TLabel
- Left = 31
- Top = 261
- Width = 136
- Height = 13
- Caption = 'Pravd�p. "klasick�" mutace:'
- end
- object Label22: TLabel
- Left = 281
- Top = 261
- Width = 8
- Height = 13
- Caption = '%'
- end
- object Label23: TLabel
- Left = 31
- Top = 234
- Width = 163
- Height = 13
- Caption = 'Doln� pravd�p. "opravn�" mutace:'
- end
- object Label24: TLabel
- Left = 281
- Top = 234
- Width = 8
- Height = 13
- Caption = '%'
- end
- object Label25: TLabel
- Left = 31
- Top = 45
- Width = 153
- Height = 13
- Caption = 'P�eru�it p�i stagnaci travaj�c� po:'
- end
- object Label26: TLabel
- Left = 279
- Top = 45
- Width = 42
- Height = 13
- Caption = 'generac�'
- end
- object PrvdMutHorniSpin: TSpinEdit
- Left = 209
- Top = 202
- Width = 65
- Height = 22
- Increment = 5
- MaxValue = 100
- MinValue = 0
- TabOrder = 6
- Value = 100
- end
- object PrvdKrizSpin: TSpinEdit
- Left = 209
- Top = 175
- Width = 65
- Height = 22
- Increment = 5
- MaxValue = 100
- MinValue = 0
- TabOrder = 5
- Value = 50
- end
- object PocOpakSpin: TSpinEdit
- Left = 209
- Top = 67
- Width = 65
- Height = 22
- MaxValue = 10000
- MinValue = 1
- TabOrder = 1
- Value = 5
- end
- object PocJedSpin: TSpinEdit
- Left = 209
- Top = 121
- Width = 65
- Height = 22
- Increment = 10
- MaxValue = 10000
- MinValue = 1
- TabOrder = 3
- Value = 100
- end
- object PocCykluSpin: TSpinEdit
- Left = 209
- Top = 94
- Width = 65
- Height = 22
- Increment = 10
- MaxValue = 10000
- MinValue = 1
- TabOrder = 2
- Value = 300
- end
- object PocElitSpin: TSpinEdit
- Left = 209
- Top = 148
- Width = 65
- Height = 22
- MaxLength = 3
- MaxValue = 250
- MinValue = 1
- TabOrder = 4
- Value = 1
- end
- object PrvdMutKlasikSpin: TSpinEdit
- Left = 209
- Top = 256
- Width = 65
- Height = 22
- MaxValue = 100
- MinValue = 0
- TabOrder = 8
- Value = 5
- end
- object PrvdMutDolniSpin: TSpinEdit
- Left = 209
- Top = 229
- Width = 65
- Height = 22
- Increment = 5
- MaxValue = 100
- MinValue = 0
- TabOrder = 7
- Value = 25
- end
- object PrerusitPoSpin: TSpinEdit
- Left = 209
- Top = 40
- Width = 65
- Height = 22
- MaxValue = 10000
- MinValue = 0
- TabOrder = 0
- Value = 30
- end
- object UplnyGABox: TCheckBox
- Left = 31
- Top = 18
- Width = 201
- Height = 17
- Caption = ' Prov�d�t �pln� genetick� algoritmus'
- TabOrder = 9
- OnClick = UplnyGABoxClick
- end
- end
- end
- object GaSheet: TTabSheet
- Caption = 'Nastaven� rozvrh�'
- object Panel1: TPanel
- Left = -5
- Top = -5
- Width = 353
- Height = 310
- Color = clMenu
- Ctl3D = True
- ParentCtl3D = False
- TabOrder = 0
- object Label1: TLabel
- Left = 29
- Top = 33
- Width = 61
- Height = 13
- Caption = 'Dn� v t�dnu:'
- end
- object Label2: TLabel
- Left = 29
- Top = 66
- Width = 64
- Height = 13
- Caption = 'Hodin denn�:'
- end
- object Label3: TLabel
- Left = 29
- Top = 98
- Width = 87
- Height = 13
- Caption = 'Prvn� den v t�dnu:'
- end
- object Label4: TLabel
- Left = 29
- Top = 130
- Width = 104
- Height = 13
- Caption = 'Prvn� hodina za��n� v'
- end
- object Label5: TLabel
- Left = 195
- Top = 130
- Width = 18
- Height = 13
- Caption = 'hod'
- end
- object Label6: TLabel
- Left = 273
- Top = 130
- Width = 16
- Height = 13
- Caption = 'min'
- end
- object DnuSpin: TSpinEdit
- Left = 149
- Top = 29
- Width = 48
- Height = 22
- MaxLength = 1
- MaxValue = 7
- MinValue = 1
- TabOrder = 0
- Value = 1
- end
- object HodDenneSpin: TSpinEdit
- Left = 149
- Top = 61
- Width = 48
- Height = 22
- MaxLength = 2
- MaxValue = 14
- MinValue = 1
- TabOrder = 1
- Value = 1
- end
- object DnyBox: TComboBox
- Left = 149
- Top = 93
- Width = 119
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- end
- object HodSpin: TSpinEdit
- Left = 149
- Top = 125
- Width = 41
- Height = 22
- MaxLength = 2
- MaxValue = 24
- MinValue = 0
- TabOrder = 3
- Value = 0
- end
- object MinSpin: TSpinEdit
- Left = 227
- Top = 125
- Width = 41
- Height = 22
- Increment = 5
- MaxLength = 2
- MaxValue = 59
- MinValue = 0
- TabOrder = 4
- Value = 0
- end
- object GroupBox1: TGroupBox
- Left = 21
- Top = 173
- Width = 313
- Height = 105
- Caption = 'Penalizovat za...'
- TabOrder = 5
- object Label14: TLabel
- Left = 136
- Top = 26
- Width = 83
- Height = 13
- Caption = 'P��pustn� mezera'
- end
- object Label16: TLabel
- Left = 136
- Top = 49
- Width = 94
- Height = 13
- Caption = 'P��pustn� max. po�.'
- end
- object Label15: TLabel
- Left = 280
- Top = 26
- Width = 18
- Height = 13
- Caption = 'hod'
- end
- object Label17: TLabel
- Left = 280
- Top = 49
- Width = 18
- Height = 13
- Caption = 'hod'
- end
- object Label18: TLabel
- Left = 136
- Top = 73
- Width = 91
- Height = 13
- Caption = 'P��pustn� min. po�.'
- end
- object Label19: TLabel
- Left = 280
- Top = 73
- Width = 18
- Height = 13
- Caption = 'hod'
- end
- object Penal3Box: TCheckBox
- Left = 15
- Top = 24
- Width = 106
- Height = 17
- Caption = 'Mezery v rozvrhu'
- TabOrder = 0
- OnClick = Penal3BoxClick
- end
- object Penal1Box: TCheckBox
- Left = 15
- Top = 48
- Width = 114
- Height = 17
- Caption = 'Vysok� po�et hodin'
- TabOrder = 2
- OnClick = Penal1BoxClick
- end
- object PripustDiraSpin: TSpinEdit
- Left = 234
- Top = 22
- Width = 41
- Height = 22
- Enabled = False
- MaxLength = 2
- MaxValue = 14
- MinValue = 0
- TabOrder = 1
- Value = 0
- end
- object PripustMaxHodSpin: TSpinEdit
- Left = 234
- Top = 45
- Width = 41
- Height = 22
- Enabled = False
- MaxLength = 2
- MaxValue = 14
- MinValue = 1
- TabOrder = 3
- Value = 1
- end
- object PripustMinHodSpin: TSpinEdit
- Left = 234
- Top = 69
- Width = 41
- Height = 22
- Enabled = False
- MaxLength = 2
- MaxValue = 14
- MinValue = 1
- TabOrder = 5
- Value = 1
- end
- object Penal2Box: TCheckBox
- Left = 15
- Top = 72
- Width = 114
- Height = 17
- Caption = 'N�zk� po�et hodin'
- TabOrder = 4
- OnClick = Penal2BoxClick
- end
- end
- end
- end
- end
- object UlozBtn: TButton
- Left = 282
- Top = 334
- Width = 75
- Height = 25
- Caption = 'Ulo�'
- TabOrder = 1
- OnClick = UlozBtnClick
- end
- object StornoBtn: TButton
- Left = 200
- Top = 334
- Width = 75
- Height = 25
- Caption = 'Storno'
- ModalResult = 2
- TabOrder = 2
- OnClick = StornoBtnClick
- end
- object OkBtn: TButton
- Left = 118
- Top = 334
- Width = 75
- Height = 25
- Caption = 'OK'
- TabOrder = 3
- OnClick = OkBtnClick
- end
- end
-