home *** CD-ROM | disk | FTP | other *** search
- object FormWalls: TFormWalls
- Left = 270
- Top = 144
- HelpContext = 4
- BorderStyle = bsDialog
- Caption = 'Room Walls'
- ClientHeight = 193
- ClientWidth = 567
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poDesktopCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object LbPreview: TLabel
- Left = 328
- Top = 8
- Width = 233
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Preview'
- end
- object ImgPreview: TImage
- Left = 328
- Top = 24
- Width = 233
- Height = 130
- end
- object LbWallsList: TLabel
- Left = 8
- Top = 8
- Width = 58
- Height = 13
- Caption = 'Walls listing:'
- end
- object GroupBox1: TGroupBox
- Left = 140
- Top = 4
- Width = 181
- Height = 181
- Caption = 'Selected Wall'
- TabOrder = 1
- object LbFrom: TLabel
- Left = 8
- Top = 19
- Width = 23
- Height = 13
- Caption = 'From'
- end
- object Label1: TLabel
- Left = 40
- Top = 19
- Width = 8
- Height = 13
- Caption = 'x:'
- end
- object Label2: TLabel
- Left = 40
- Top = 43
- Width = 8
- Height = 13
- Caption = 'y:'
- end
- object LbTo: TLabel
- Left = 96
- Top = 16
- Width = 13
- Height = 13
- Caption = 'To'
- end
- object Label3: TLabel
- Left = 120
- Top = 16
- Width = 8
- Height = 13
- Caption = 'x:'
- end
- object Label4: TLabel
- Left = 120
- Top = 43
- Width = 8
- Height = 13
- Caption = 'y:'
- end
- object LbAlign: TLabel
- Left = 8
- Top = 64
- Width = 49
- Height = 13
- Caption = 'Alignment:'
- end
- object Image1: TImage
- Left = 88
- Top = 71
- Width = 32
- Height = 40
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object LbThickness: TLabel
- Left = 8
- Top = 120
- Width = 52
- Height = 13
- Caption = 'Thickness:'
- end
- object LbUnit: TLabel
- Left = 126
- Top = 120
- Width = 14
- Height = 13
- Caption = 'cm'
- end
- object EdFromX: TEdit
- Left = 50
- Top = 16
- Width = 39
- Height = 21
- TabOrder = 0
- OnChange = EdFromXChange
- end
- object EdFromY: TEdit
- Left = 50
- Top = 40
- Width = 39
- Height = 21
- TabOrder = 1
- OnChange = EdFromXChange
- end
- object EdToX: TEdit
- Left = 130
- Top = 16
- Width = 39
- Height = 21
- TabOrder = 2
- OnChange = EdFromXChange
- end
- object EdToY: TEdit
- Left = 130
- Top = 40
- Width = 39
- Height = 21
- TabOrder = 3
- OnChange = EdFromXChange
- end
- object Radio1: TRadioButton
- Left = 72
- Top = 64
- Width = 16
- Height = 17
- Checked = True
- TabOrder = 4
- TabStop = True
- OnClick = EdFromXChange
- end
- object Radio2: TRadioButton
- Left = 72
- Top = 80
- Width = 16
- Height = 17
- TabOrder = 5
- OnClick = EdFromXChange
- end
- object Radio3: TRadioButton
- Left = 72
- Top = 96
- Width = 16
- Height = 17
- TabOrder = 6
- OnClick = EdFromXChange
- end
- object BtnSave: TButton
- Left = 8
- Top = 148
- Width = 73
- Height = 25
- Caption = 'Save'
- Default = True
- TabOrder = 8
- OnClick = BtnSaveClick
- end
- object EdThick: TEdit
- Left = 72
- Top = 117
- Width = 49
- Height = 21
- TabOrder = 7
- OnChange = EdFromXChange
- end
- object BtnRemove: TButton
- Left = 96
- Top = 148
- Width = 73
- Height = 25
- Caption = 'Remove'
- TabOrder = 9
- OnClick = BtnRemoveClick
- end
- end
- object BtnOK: TButton
- Left = 328
- Top = 160
- Width = 75
- Height = 25
- Caption = 'OK'
- ModalResult = 1
- TabOrder = 2
- end
- object BtnCancel: TButton
- Left = 408
- Top = 160
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- end
- object LsWalls: TListBox
- Left = 8
- Top = 24
- Width = 129
- Height = 161
- ItemHeight = 13
- TabOrder = 0
- OnClick = LsWallsClick
- end
- object BtnHelp: TButton
- Left = 488
- Top = 160
- Width = 75
- Height = 25
- Caption = 'Help'
- TabOrder = 4
- OnClick = BtnHelpClick
- end
- end
-