initial commit from lost SVN repo

spackgui/frmaddchangerepo.lfm

@@ -0,0 +1,133 @@
+object fAddChangeRepo: TfAddChangeRepo
+  Left = 2617
+  Height = 200
+  Top = 596
+  Width = 626
+  BorderIcons = [biSystemMenu, biMaximize]
+  Caption = 'fAddChangeRepo'
+  ClientHeight = 200
+  ClientWidth = 626
+  Constraints.MaxHeight = 200
+  Constraints.MinHeight = 200
+  Constraints.MinWidth = 394
+  DesignTimePPI = 108
+  OnClose = FormClose
+  OnCloseQuery = FormCloseQuery
+  OnCreate = FormCreate
+  Position = poOwnerFormCenter
+  LCLVersion = '1.9.0.0'
+  object btnOk: TBitBtn
+    Tag = -1
+    Left = 352
+    Height = 34
+    Top = 155
+    Width = 120
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    ParentFont = False
+    TabOrder = 0
+  end
+  object btnCancel: TBitBtn
+    Tag = -1
+    Left = 491
+    Height = 34
+    Top = 155
+    Width = 120
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    ParentFont = False
+    TabOrder = 1
+  end
+  object edName: TEdit
+    Left = 126
+    Height = 34
+    Top = 8
+    Width = 485
+    Anchors = [akTop, akLeft, akRight]
+    OnChange = edNameChange
+    ParentFont = False
+    TabOrder = 2
+    Text = 'edName'
+  end
+  object lbName: TLabel
+    Left = 9
+    Height = 20
+    Top = 16
+    Width = 41
+    Caption = '&Name:'
+    FocusControl = edName
+    ParentColor = False
+    ParentFont = False
+  end
+  object lbAddress: TLabel
+    Left = 9
+    Height = 20
+    Top = 57
+    Width = 54
+    Caption = '&Address:'
+    FocusControl = edAddress
+    ParentColor = False
+    ParentFont = False
+  end
+  object edAddress: TEdit
+    Left = 126
+    Height = 34
+    Top = 48
+    Width = 462
+    Anchors = [akTop, akLeft, akRight]
+    OnChange = edNameChange
+    ParentFont = False
+    TabOrder = 3
+    Text = 'edAddress'
+  end
+  object lbHelp: TLabel
+    Left = 128
+    Height = 20
+    Top = 83
+    Width = 433
+    Caption = 'You can fill that field with both distant (http or ftp) or  local addresses.'
+    ParentColor = False
+    ParentFont = False
+  end
+  object btnBrowse: TButton
+    Left = 590
+    Height = 28
+    Top = 50
+    Width = 21
+    Anchors = [akTop, akRight]
+    Caption = '...'
+    OnClick = btnBrowseClick
+    ParentFont = False
+    TabOrder = 4
+  end
+  object edComment: TEdit
+    Left = 126
+    Height = 34
+    Top = 109
+    Width = 485
+    Anchors = [akTop, akLeft, akRight]
+    ParentFont = False
+    TabOrder = 5
+    Text = 'edComment'
+  end
+  object lbComment: TLabel
+    Left = 9
+    Height = 20
+    Top = 114
+    Width = 76
+    Caption = '&Description:'
+    FocusControl = edComment
+    ParentColor = False
+    ParentFont = False
+  end
+  object dlgSelectDirectory: TSelectDirectoryDialog
+    InitialDir = '/'
+    Options = [ofPathMustExist, ofCreatePrompt, ofNoNetworkButton, ofEnableSizing, ofViewDetail]
+    left = 81
+    top = 153
+  end
+end