Blame main.lfm

f754e5
object frmMain: TfrmMain
f754e5
  Left = 416
f754e5
  Height = 240
f754e5
  Top = 387
f754e5
  Width = 816
f754e5
  Caption = 'ToDo List'
f754e5
  ClientHeight = 240
f754e5
  ClientWidth = 816
f754e5
  OnActivate = FormActivate
f754e5
  OnClose = FormClose
f754e5
  LCLVersion = '1.8.4.0'
f754e5
  object sbTodo: TScrollBox
f754e5
    Left = 8
f754e5
    Height = 192
f754e5
    Top = 40
f754e5
    Width = 800
f754e5
    HorzScrollBar.Page = 1
f754e5
    HorzScrollBar.Visible = False
f754e5
    VertScrollBar.Page = 1
f754e5
    VertScrollBar.Tracking = True
f754e5
    Anchors = [akTop, akLeft, akRight, akBottom]
f754e5
    TabOrder = 0
f754e5
  end
f754e5
  object bAdd: TButton
f754e5
    Left = 8
f754e5
    Height = 25
f754e5
    Top = 8
f754e5
    Width = 75
f754e5
    Caption = 'Add'
f754e5
    OnClick = bAddClick
f754e5
    TabOrder = 1
f754e5
  end
f754e5
  object cbPlanned: TCheckBox
f754e5
    Left = 96
f754e5
    Height = 25
f754e5
    Top = 8
f754e5
    Width = 150
f754e5
    Caption = 'Show planned only'
f754e5
    OnChange = cbPlannedChange
f754e5
    TabOrder = 2
f754e5
  end
f754e5
  object bNextDay: TButton
f754e5
    Left = 680
f754e5
    Height = 25
f754e5
    Top = 8
f754e5
    Width = 128
f754e5
    Anchors = [akTop, akRight]
f754e5
    Caption = 'Force next day'
f754e5
    OnClick = bNextDayClick
f754e5
    TabOrder = 3
f754e5
    Visible = False
f754e5
  end
f754e5
  object lDate: TLabel
f754e5
    Left = 272
f754e5
    Height = 21
f754e5
    Top = 12
f754e5
    Width = 12
f754e5
    Caption = '...'
f754e5
    ParentColor = False
f754e5
  end
f754e5
end