source: branches/test1/Client/Forms/UFormItemView.lfm

Last change on this file was 46, checked in by chronos, 13 years ago
File size: 2.2 KB
Line 
1object ItemViewForm: TItemViewForm
2 Left = 314
3 Height = 463
4 Top = 113
5 Width = 620
6 Caption = 'View item'
7 ClientHeight = 463
8 ClientWidth = 620
9 OnClose = FormClose
10 OnCreate = FormCreate
11 OnDestroy = FormDestroy
12 OnResize = FormResize
13 OnShow = FormShow
14 LCLVersion = '0.9.31'
15 object ButtonClose: TButton
16 Left = 540
17 Height = 25
18 Top = 433
19 Width = 75
20 Anchors = [akRight, akBottom]
21 Caption = 'Close'
22 OnClick = ButtonCloseClick
23 TabOrder = 0
24 end
25 object ButtonEdit: TButton
26 Left = 452
27 Height = 25
28 Top = 433
29 Width = 75
30 Anchors = [akRight, akBottom]
31 Caption = 'Edit'
32 OnClick = ButtonEditClick
33 TabOrder = 1
34 end
35 object Panel1: TPanel
36 Left = 0
37 Height = 427
38 Top = 0
39 Width = 620
40 Align = alTop
41 Anchors = [akTop, akLeft, akRight, akBottom]
42 BevelOuter = bvNone
43 ClientHeight = 427
44 ClientWidth = 620
45 TabOrder = 2
46 object Panel2: TPanel
47 Left = 0
48 Height = 200
49 Top = 227
50 Width = 620
51 Align = alBottom
52 BevelOuter = bvNone
53 ClientHeight = 200
54 ClientWidth = 620
55 TabOrder = 0
56 object TabControl1: TTabControl
57 Left = 0
58 Height = 24
59 Top = 0
60 Width = 620
61 TabStop = False
62 OnChange = TabControl1Change
63 TabIndex = 0
64 Tabs.Strings = (
65 'Tab1'
66 'Tab2'
67 'Tab3'
68 )
69 Align = alTop
70 TabOrder = 0
71 end
72 object ListView1: TListView
73 Left = 0
74 Height = 176
75 Top = 24
76 Width = 620
77 Align = alClient
78 Columns = <>
79 OwnerData = True
80 ReadOnly = True
81 RowSelect = True
82 TabOrder = 1
83 ViewStyle = vsReport
84 OnData = ListView1Data
85 end
86 end
87 object Splitter1: TSplitter
88 Cursor = crVSplit
89 Left = 0
90 Height = 3
91 Top = 224
92 Width = 620
93 Align = alBottom
94 ResizeAnchor = akBottom
95 end
96 object PanelControls: TPanel
97 Left = 0
98 Height = 224
99 Top = 0
100 Width = 620
101 Align = alClient
102 Anchors = [akLeft, akRight, akBottom]
103 BevelOuter = bvNone
104 TabOrder = 2
105 end
106 end
107end
Note: See TracBrowser for help on using the repository browser.