Check-in [a9d77b7171]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:First working version
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: a9d77b7171cbe111c7d4975c3cd9ccc12c317ec0
User & Date: MCO 2011-05-04 10:59:53
Context
2011-05-04
11:02
First working version check-in: 19a962fef4 user: MCO tags: trunk
10:59
First working version check-in: a9d77b7171 user: MCO tags: trunk
10:59
First working version check-in: e1b6ee0b86 user: MCO tags: trunk
Changes

Added src/F_Entry.dfm.



























































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
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
object frmEntry: TfrmEntry
  Left = 0
  Top = 0
  ActiveControl = Grid
  Caption = 'Urenstaat'
  ClientHeight = 418
  ClientWidth = 550
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  DesignSize = (
    550
    418)
  PixelsPerInch = 96
  TextHeight = 13
  object dtpDay: TDateTimePicker
    Left = 8
    Top = 8
    Width = 137
    Height = 21
    Date = 40667.351732187500000000
    Format = 'd MMMM yyyy'
    Time = 40667.351732187500000000
    TabOrder = 1
    OnChange = dtpDayChange
  end
  object Grid: TStringGrid
    Left = 8
    Top = 35
    Width = 534
    Height = 375
    Anchors = [akLeft, akTop, akRight, akBottom]
    ColCount = 3
    RowCount = 2
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goTabs, goAlwaysShowEditor]
    TabOrder = 0
    OnKeyDown = GridKeyDown
    ColWidths = (
      64
      128
      334)
  end
  object tbsWeek: TTabSet
    Left = 151
    Top = 17
    Width = 391
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    DitherBackground = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    SoftTop = True
    Style = tsModernTabs
    Tabs.Strings = (
      'Maandag'
      'Dinsdag'
      'Woensdag'
      'Donderdag'
      'Vrijdag'
      'Zaterdag'
      'Zondag')
    TabIndex = 0
    TabPosition = tpTop
    OnChange = tbsWeekChange
  end
end