Initial import

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@338 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2008-02-03 12:05:55 +00:00
parent 9056129a0b
commit c1641e380d
97 changed files with 77767 additions and 0 deletions
--- a/components/tvplanit/source/vpedfmt.lfm
+++ b/components/tvplanit/source/vpedfmt.lfm
@ -0,0 +1,119 @@
+object frmEditFormat: TfrmEditFormat
+  Left = 403
+  Height = 189
+  Top = 199
+  Width = 329
+  HorzScrollBar.Page = 328
+  VertScrollBar.Page = 188
+  BorderStyle = bsDialog
+  Caption = 'Edit Format'
+  ClientHeight = 189
+  ClientWidth = 329
+  Font.Height = -11
+  Font.Name = 'MS Sans Serif'
+  OnShow = FormShow
+  Position = poScreenCenter
+  object Label1: TLabel
+    Left = 12
+    Height = 15
+    Top = 76
+    Width = 99
+    Caption = 'Day Increment:'
+    ParentColor = False
+  end
+  object Label2: TLabel
+    Left = 12
+    Height = 15
+    Top = 44
+    Width = 81
+    Caption = 'Description: '
+    ParentColor = False
+  end
+  object Label3: TLabel
+    Left = 12
+    Height = 15
+    Top = 16
+    Width = 48
+    Caption = 'Name: '
+    ParentColor = False
+  end
+  object btnOk: TButton
+    Left = 160
+    Height = 25
+    Top = 156
+    Width = 75
+    Caption = 'OK'
+    Default = True
+    OnClick = btnOkClick
+    TabOrder = 3
+  end
+  object btnCancel: TButton
+    Left = 240
+    Height = 25
+    Top = 156
+    Width = 75
+    Cancel = True
+    Caption = 'Cancel'
+    OnClick = btnCancelClick
+    TabOrder = 4
+  end
+  object rgDayIncrement: TRadioGroup
+    Left = 16
+    Height = 37
+    Top = 104
+    Width = 293
+    AutoFill = True
+    Caption = ' Day Increment Unit '
+    ChildSizing.LeftRightSpacing = 6
+    ChildSizing.TopBottomSpacing = 6
+    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
+    ChildSizing.EnlargeVertical = crsHomogenousChildResize
+    ChildSizing.ShrinkHorizontal = crsScaleChilds
+    ChildSizing.ShrinkVertical = crsScaleChilds
+    ChildSizing.Layout = cclLeftToRightThenTopToBottom
+    ChildSizing.ControlsPerLine = 4
+    ClientHeight = 17
+    ClientWidth = 289
+    Columns = 4
+    ItemIndex = 0
+    Items.Strings = (
+      'Day'
+      'Week'
+      'Month'
+      'Year'
+    )
+    TabOrder = 2
+  end
+  object edDescription: TEdit
+    Left = 80
+    Height = 21
+    Top = 40
+    Width = 241
+    TabOrder = 1
+  end
+  object edName: TEdit
+    Left = 56
+    Height = 21
+    Top = 12
+    Width = 265
+    TabOrder = 0
+  end
+  object udIncrement: TUpDown
+    Left = 150
+    Height = 21
+    Top = 72
+    Width = 16
+    Associate = edIncrement
+    Max = 365
+    TabOrder = 5
+  end
+  object edIncrement: TEdit
+    Left = 96
+    Height = 21
+    Top = 72
+    Width = 54
+    OnKeyDown = nil
+    TabOrder = 6
+    Text = '0'
+  end
+end