Initial import

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@338 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/tvplanit/source/vpedelem.lfm

@@ -0,0 +1,361 @@
+object frmEditElement: TfrmEditElement
+  Left = 376
+  Height = 445
+  Top = 163
+  Width = 379
+  HorzScrollBar.Page = 378
+  VertScrollBar.Page = 444
+  BorderStyle = bsDialog
+  Caption = 'Edit Element'
+  ClientHeight = 445
+  ClientWidth = 379
+  Font.Height = -11
+  Font.Name = 'MS Sans Serif'
+  OnCreate = FormCreate
+  OnShow = FormShow
+  Position = poScreenCenter
+  object Label1: TLabel
+    Left = 8
+    Height = 15
+    Top = 136
+    Width = 72
+    Caption = 'Day Offset:'
+    ParentColor = False
+  end
+  object Label2: TLabel
+    Left = 12
+    Height = 15
+    Top = 16
+    Width = 48
+    Caption = 'Name: '
+    ParentColor = False
+  end
+  object rgItemType: TRadioGroup
+    Left = 12
+    Height = 81
+    Top = 44
+    Width = 349
+    AutoFill = True
+    Caption = 'Item Type '
+    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 = 61
+    ClientWidth = 345
+    Columns = 4
+    ItemIndex = 0
+    Items.Strings = (
+      'DayView'
+      'WeekView'
+      'MonthView'
+      'Calendar'
+      'Shape'
+      'Caption'
+      'Tasks'
+      'Contacts'
+    )
+    OnClick = rgItemTypeClick
+    TabOrder = 1
+  end
+  object rgDayOffset: TRadioGroup
+    Left = 100
+    Height = 37
+    Top = 136
+    Width = 261
+    AutoFill = True
+    Caption = ' Day Offset 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 = 257
+    Columns = 4
+    ItemIndex = 0
+    Items.Strings = (
+      'Day'
+      'Week'
+      'Month'
+      'Year'
+    )
+    TabOrder = 2
+  end
+  object btnOk: TButton
+    Left = 212
+    Height = 25
+    Top = 412
+    Width = 75
+    Caption = 'OK'
+    Default = True
+    OnClick = btnOkClick
+    TabOrder = 6
+  end
+  object btnCancel: TButton
+    Left = 292
+    Height = 25
+    Top = 412
+    Width = 75
+    Cancel = True
+    Caption = 'Cancel'
+    OnClick = btnCancelClick
+    TabOrder = 7
+  end
+  object edName: TEdit
+    Left = 56
+    Height = 21
+    Top = 12
+    Width = 241
+    TabOrder = 0
+  end
+  object btnShape: TButton
+    Left = 44
+    Height = 25
+    Top = 412
+    Width = 75
+    Caption = 'Shape...'
+    Enabled = False
+    OnClick = btnShapeClick
+    TabOrder = 5
+  end
+  object gbVisual: TGroupBox
+    Left = 12
+    Height = 121
+    Top = 184
+    Width = 357
+    Caption = ' Visual '
+    ClientHeight = 101
+    ClientWidth = 353
+    TabOrder = 3
+    object Label3: TLabel
+      Left = 172
+      Height = 15
+      Top = 20
+      Width = 28
+      Caption = 'Top:'
+      ParentColor = False
+    end
+    object Label4: TLabel
+      Left = 172
+      Height = 15
+      Top = 48
+      Width = 29
+      Caption = 'Left:'
+      ParentColor = False
+    end
+    object Label5: TLabel
+      Left = 259
+      Height = 15
+      Top = 20
+      Width = 47
+      Caption = 'Height:'
+      ParentColor = False
+    end
+    object Label6: TLabel
+      Left = 263
+      Height = 15
+      Top = 48
+      Width = 40
+      Caption = 'Width:'
+      ParentColor = False
+    end
+    object rgMeasurement: TRadioGroup
+      Left = 76
+      Height = 80
+      Top = 20
+      Width = 89
+      AutoFill = True
+      Caption = ' Measurement '
+      ChildSizing.LeftRightSpacing = 6
+      ChildSizing.TopBottomSpacing = 6
+      ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
+      ChildSizing.EnlargeVertical = crsHomogenousChildResize
+      ChildSizing.ShrinkHorizontal = crsScaleChilds
+      ChildSizing.ShrinkVertical = crsScaleChilds
+      ChildSizing.Layout = cclLeftToRightThenTopToBottom
+      ChildSizing.ControlsPerLine = 1
+      ClientHeight = 60
+      ClientWidth = 85
+      ItemIndex = 1
+      Items.Strings = (
+        'Pixels'
+        'Percent'
+        'Inches'
+      )
+      OnClick = rgMeasurementClick
+      TabOrder = 1
+    end
+    object rgRotation: TRadioGroup
+      Left = 8
+      Height = 93
+      Top = 20
+      Width = 61
+      AutoFill = True
+      Caption = ' Rotation '
+      ChildSizing.LeftRightSpacing = 6
+      ChildSizing.TopBottomSpacing = 6
+      ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
+      ChildSizing.EnlargeVertical = crsHomogenousChildResize
+      ChildSizing.ShrinkHorizontal = crsScaleChilds
+      ChildSizing.ShrinkVertical = crsScaleChilds
+      ChildSizing.Layout = cclLeftToRightThenTopToBottom
+      ChildSizing.ControlsPerLine = 1
+      ClientHeight = 73
+      ClientWidth = 57
+      ItemIndex = 0
+      Items.Strings = (
+        '0'
+        '90'
+        '180'
+        '270'
+      )
+      TabOrder = 0
+    end
+    object edTop: TEdit
+      Left = 197
+      Height = 21
+      Top = 16
+      Width = 40
+      OnEnter = PosEditEnter
+      OnExit = PosEditExit
+      TabOrder = 2
+      Text = '0.00'
+    end
+    object edLeft: TEdit
+      Left = 197
+      Height = 21
+      Top = 44
+      Width = 40
+      OnEnter = PosEditEnter
+      OnExit = PosEditExit
+      TabOrder = 3
+      Text = '0.00'
+    end
+    object edHeight: TEdit
+      Left = 296
+      Height = 21
+      Top = 16
+      Width = 40
+      OnEnter = PosEditEnter
+      OnExit = PosEditExit
+      TabOrder = 4
+      Text = '0.00'
+    end
+    object edWidth: TEdit
+      Left = 296
+      Height = 21
+      Top = 44
+      Width = 40
+      OnEnter = PosEditEnter
+      OnExit = PosEditExit
+      TabOrder = 5
+      Text = '0.00'
+    end
+    object chkVisible: TCheckBox
+      Left = 228
+      Height = 23
+      Top = 80
+      Width = 65
+      Caption = 'Visible'
+      TabOrder = 6
+    end
+    object udTop: TUpDown
+      Left = 237
+      Height = 21
+      Top = 16
+      Width = 12
+      TabOrder = 7
+      OnClick = UpDownClick
+    end
+    object udLeft: TUpDown
+      Left = 237
+      Height = 21
+      Top = 44
+      Width = 12
+      TabOrder = 8
+      OnClick = UpDownClick
+    end
+    object udHeight: TUpDown
+      Left = 336
+      Height = 21
+      Top = 16
+      Width = 12
+      TabOrder = 9
+      OnClick = UpDownClick
+    end
+    object udWidth: TUpDown
+      Left = 336
+      Height = 21
+      Top = 44
+      Width = 12
+      TabOrder = 10
+      OnClick = UpDownClick
+    end
+  end
+  object gbCaption: TGroupBox
+    Left = 12
+    Height = 93
+    Top = 316
+    Width = 357
+    Caption = ' Caption '
+    ClientHeight = 73
+    ClientWidth = 353
+    TabOrder = 4
+    object lbCaptionText: TLabel
+      Left = 16
+      Height = 15
+      Top = 24
+      Width = 36
+      Caption = 'Text: '
+      ParentColor = False
+    end
+    object btnCaptionFont: TButton
+      Left = 24
+      Height = 25
+      Top = 48
+      Width = 75
+      Caption = 'Font...'
+      OnClick = btnCaptionFontClick
+      TabOrder = 1
+    end
+    object edCaptionText: TEdit
+      Left = 52
+      Height = 21
+      Top = 20
+      Width = 293
+      OnChange = edCaptionTextChange
+      TabOrder = 0
+    end
+  end
+  object edOffset: TEdit
+    Left = 20
+    Height = 21
+    Top = 156
+    Width = 54
+    OnKeyDown = nil
+    TabOrder = 8
+    Text = '0'
+  end
+  object udOffset: TUpDown
+    Left = 74
+    Height = 21
+    Top = 156
+    Width = 11
+    Associate = edOffset
+    TabOrder = 9
+  end
+  object FontDialog1: TFontDialog
+    Font.Height = -11
+    Font.Name = 'MS Sans Serif'
+    left = 4
+    top = 308
+  end
+end