mxMarkEdit/unit4.lfm at main · maxnd/mxMarkEdit · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
object fmTasks: TfmTasks
  Left = 275
  Height = 549
  Top = 202
  Width = 1004
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Todo'
  ClientHeight = 549
  ClientWidth = 1004
  KeyPreview = True
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  Position = poDesktopCenter
  ShowInTaskBar = stNever
  LCLVersion = '3.8.0.0'
  object sgTasks: TStringGrid
    Left = 15
    Height = 492
    Top = 10
    Width = 974
    Align = alClient
    AutoEdit = False
    BorderSpacing.Left = 5
    BorderSpacing.Right = 5
    BorderSpacing.Around = 10
    Color = clForm
    ColumnClickSorts = True
    Columns = <
      item
        Title.Caption = 'Row'
        Visible = False
      end
      item
        Title.Caption = 'Done'
        Width = 70
      end
      item
        Title.Caption = 'Deadline'
        Width = 180
      end
      item
        Title.Caption = 'Heading'
        Width = 310
      end
      item
        Title.Caption = 'Title'
        Width = 400
      end>
    ExtendedSelect = False
    FixedColor = clForm
    FixedCols = 0
    Flat = True
    GridLineColor = clBackground
    HeaderHotZones = []
    MouseWheelOption = mwGrid
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goColSizing, goRowSelect, goSmoothScroll, goCellHints]
    ParentShowHint = False
    RowCount = 2
    ShowHint = True
    TabOrder = 0
    OnDblClick = sgTasksDblClick
    OnDrawCell = sgTasksDrawCell
    ColWidths = (
      0
      70
      180
      310
      400
    )
  end
  object pnTasks: TPanel
    Left = 0
    Height = 37
    Top = 512
    Width = 1004
    Align = alBottom
    BevelOuter = bvNone
    ClientHeight = 37
    ClientWidth = 1004
    ParentBackground = False
    ParentColor = False
    TabOrder = 1
    object bnOK: TButton
      Left = 912
      Height = 32
      Top = -3
      Width = 75
      Anchors = [akRight, akBottom]
      Caption = 'Close'
      TabOrder = 4
      TabStop = False
      OnClick = bnOKClick
    end
    object cbHide: TCheckBox
      Left = 14
      Height = 18
      Top = 3
      Width = 118
      Caption = 'Hide done items'
      TabOrder = 0
      OnClick = cbHideClick
    end
    object bnCopy: TButton
      Left = 822
      Height = 32
      Top = -3
      Width = 75
      Anchors = [akRight, akBottom]
      Caption = 'Copy'
      TabOrder = 3
      TabStop = False
      OnClick = bnCopyClick
    end
    object bnToggle: TButton
      Left = 681
      Height = 32
      Top = -3
      Width = 125
      Anchors = [akRight, akBottom]
      Caption = 'Toggle state'
      TabOrder = 2
      TabStop = False
      OnClick = bnToggleClick
    end
    object lbTot: TLabel
      Left = 208
      Height = 16
      Top = 5
      Width = 82
      Caption = 'Todo items: 0'
    end
    object cbResources: TComboBox
      Left = 464
      Height = 20
      Top = 4
      Width = 202
      ItemHeight = 26
      ItemIndex = 0
      Items.Strings = (
        'All the resources'
      )
      Sorted = True
      Style = csDropDownList
      TabOrder = 1
      Text = 'All the resources'
      OnChange = cbResourcesChange
    end
  end
end