home *** CD-ROM | disk | FTP | other *** search
- object frmBio: TfrmBio
- Left = 222
- Top = 145
- HelpContext = 1052
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'frmBio'
- ClientHeight = 327
- ClientWidth = 544
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsMDIChild
- OldCreateOrder = False
- Position = poDefault
- Visible = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnPaint = FormPaint
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel2: TBevel
- Left = 200
- Top = 258
- Width = 337
- Height = 61
- Shape = bsFrame
- end
- object Bevel1: TBevel
- Left = 8
- Top = 258
- Width = 187
- Height = 61
- Shape = bsFrame
- end
- object Image1: TImage
- Left = 22
- Top = 10
- Width = 500
- Height = 240
- end
- object Label1: TLabel
- Left = 14
- Top = 268
- Width = 72
- Height = 13
- Caption = 'Data urodzenia'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 14024447
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- end
- object Label2: TLabel
- Left = 14
- Top = 296
- Width = 77
- Height = 13
- Caption = 'Biorytm na dzien'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 14024447
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- end
- object DataUr: TDateEdit
- Left = 98
- Top = 264
- Width = 87
- Height = 21
- Color = 14024447
- DefaultToday = True
- NumGlyphs = 2
- YearDigits = dyFour
- TabOrder = 0
- Text = '08-03-1999'
- OnChange = DataUrChange
- end
- object cb1: TCheckBox
- Left = 210
- Top = 274
- Width = 155
- Height = 17
- Caption = 'Rytm fizyczny'
- Checked = True
- Color = clRed
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 14024447
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- State = cbChecked
- TabOrder = 2
- OnClick = DataUrChange
- end
- object cb2: TCheckBox
- Left = 210
- Top = 290
- Width = 155
- Height = 17
- Caption = 'Rytm psychiczny'
- Checked = True
- Color = clGreen
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 14024447
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- State = cbChecked
- TabOrder = 3
- OnClick = DataUrChange
- end
- object cb3: TCheckBox
- Left = 372
- Top = 274
- Width = 155
- Height = 17
- Caption = 'Rytm intelektualny'
- Checked = True
- Color = clBlue
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 14024447
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- State = cbChecked
- TabOrder = 4
- OnClick = DataUrChange
- end
- object cb4: TCheckBox
- Left = 372
- Top = 290
- Width = 155
- Height = 17
- Caption = 'Rytm intuicyjny'
- Checked = True
- Color = clMaroon
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 14024447
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- State = cbChecked
- TabOrder = 5
- OnClick = DataUrChange
- end
- object DataBio: TDateEdit
- Left = 98
- Top = 292
- Width = 87
- Height = 21
- Color = 14024447
- DefaultToday = True
- NumGlyphs = 2
- YearDigits = dyFour
- TabOrder = 1
- Text = '08-03-1999'
- OnChange = DataUrChange
- end
- end
-