source: trunk/Forms/FormDatabases.lfm

Last change on this file was 32, checked in by chronos, 6 months ago
  • Modified: Removed U prefix from units names.
  • Modified: Use TFormEx for all forms.
File size: 2.4 KB
Line 
1object FormDatabases: TFormDatabases
2 Left = 592
3 Height = 618
4 Top = 429
5 Width = 1090
6 Caption = 'Connection profiles'
7 ClientHeight = 618
8 ClientWidth = 1090
9 DesignTimePPI = 144
10 OnShow = FormShow
11 Position = poMainFormCenter
12 LCLVersion = '2.2.2.0'
13 object ListView1: TListView
14 Left = 5
15 Height = 565
16 Top = 5
17 Width = 1080
18 Align = alClient
19 BorderSpacing.Around = 5
20 Columns = <
21 item
22 Caption = 'Name'
23 Width = 240
24 end
25 item
26 Caption = 'Type'
27 Width = 240
28 end
29 item
30 Caption = 'Connection string'
31 Width = 585
32 end>
33 OwnerData = True
34 PopupMenu = PopupMenu1
35 ReadOnly = True
36 RowSelect = True
37 TabOrder = 0
38 ViewStyle = vsReport
39 OnData = ListView1Data
40 OnDblClick = ListView1DblClick
41 OnSelectItem = ListView1SelectItem
42 end
43 object ToolBar1: TToolBar
44 Left = 0
45 Height = 43
46 Top = 575
47 Width = 1090
48 Align = alBottom
49 ButtonHeight = 38
50 ButtonWidth = 38
51 Images = Core.ImageList1
52 ParentShowHint = False
53 ShowHint = True
54 TabOrder = 1
55 object ToolButton1: TToolButton
56 Left = 1
57 Top = 2
58 Action = AAdd
59 end
60 object ToolButton2: TToolButton
61 Left = 39
62 Top = 2
63 Action = AModify
64 end
65 object ToolButton3: TToolButton
66 Left = 77
67 Top = 2
68 Action = ARemove
69 end
70 object ToolButton4: TToolButton
71 Left = 115
72 Top = 2
73 Action = AOpen
74 end
75 end
76 object PopupMenu1: TPopupMenu
77 Images = Core.ImageList1
78 Left = 704
79 Top = 168
80 object MenuItem1: TMenuItem
81 Action = AAdd
82 end
83 object MenuItem2: TMenuItem
84 Action = AModify
85 end
86 object MenuItem3: TMenuItem
87 Action = ARemove
88 end
89 object MenuItem4: TMenuItem
90 Action = AOpen
91 Default = True
92 end
93 end
94 object ActionList1: TActionList
95 Images = Core.ImageList1
96 Left = 470
97 Top = 163
98 object AAdd: TAction
99 Caption = 'New'
100 ImageIndex = 5
101 OnExecute = AAddExecute
102 end
103 object AModify: TAction
104 Caption = 'Modify'
105 ImageIndex = 3
106 OnExecute = AModifyExecute
107 end
108 object ARemove: TAction
109 Caption = 'Remove'
110 ImageIndex = 4
111 OnExecute = ARemoveExecute
112 end
113 object AOpen: TAction
114 Caption = 'Open'
115 ImageIndex = 8
116 OnExecute = AOpenExecute
117 end
118 end
119end
Note: See TracBrowser for help on using the repository browser.