source: oup/current/Unit5_preview.dfm@ 16

Last change on this file since 16 was 10, checked in by alloc, 18 years ago
  • Property svn:executable set to *
File size: 4.2 KB
RevLine 
[10]1object Form5: TForm5
2 Left = 0
3 Top = 0
4 Caption = 'Preview'
5 ClientHeight = 473
6 ClientWidth = 472
7 Color = clBtnFace
8 Font.Charset = DEFAULT_CHARSET
9 Font.Color = clWindowText
10 Font.Height = -11
11 Font.Name = 'Tahoma'
12 Font.Style = []
13 FormStyle = fsMDIChild
14 OldCreateOrder = False
15 Visible = True
16 WindowState = wsMaximized
17 OnClose = FormClose
18 OnCreate = FormCreate
19 OnResize = FormResize
20 PixelsPerInch = 96
21 TextHeight = 13
22 object Splitter1: TSplitter
23 Left = 150
24 Top = 0
25 Width = 9
26 Height = 473
27 AutoSnap = False
28 Beveled = True
29 MinSize = 150
30 end
31 object panel_preview: TPanel
32 Left = 159
33 Top = 0
34 Width = 313
35 Height = 473
36 Align = alClient
37 BevelOuter = bvNone
38 TabOrder = 0
39 object img: TImage
40 Left = 0
41 Top = 20
42 Width = 313
43 Height = 453
44 Align = alClient
45 end
46 object lbl_notpossible: TLabel
47 Left = 16
48 Top = 56
49 Width = 97
50 Height = 65
51 AutoSize = False
52 Caption = 'No preview possible for this filetype'
53 Font.Charset = DEFAULT_CHARSET
54 Font.Color = clWindowText
55 Font.Height = -16
56 Font.Name = 'Tahoma'
57 Font.Style = []
58 ParentFont = False
59 Visible = False
60 WordWrap = True
61 end
62 object panel_buttons: TPanel
63 Left = 0
64 Top = 0
65 Width = 313
66 Height = 20
67 Align = alTop
68 BevelOuter = bvNone
69 TabOrder = 0
70 Visible = False
71 OnResize = panel_buttonsResize
72 object btn_dec: TButton
73 Left = 0
74 Top = 0
75 Width = 20
76 Height = 20
77 Caption = '-'
78 Enabled = False
79 TabOrder = 0
80 OnClick = btn_decClick
81 end
82 object btn_startstop: TButton
83 Left = 21
84 Top = 0
85 Width = 80
86 Height = 20
87 Caption = 'Stop automatic'
88 TabOrder = 1
89 OnClick = btn_startstopClick
90 end
91 object btn_inc: TButton
92 Left = 102
93 Top = 0
94 Width = 20
95 Height = 20
96 Caption = '+'
97 Enabled = False
98 TabOrder = 2
99 OnClick = btn_incClick
100 end
101 end
102 end
103 object panel_files: TPanel
104 Left = 0
105 Top = 0
106 Width = 150
107 Height = 473
108 Align = alLeft
109 BevelOuter = bvNone
110 TabOrder = 1
111 object list: TListBox
112 Left = 0
113 Top = 0
114 Width = 150
115 Height = 370
116 Align = alClient
117 ItemHeight = 13
118 TabOrder = 0
119 OnClick = listClick
120 end
121 object panel_extension: TPanel
122 Left = 0
123 Top = 370
124 Width = 150
125 Height = 103
126 Align = alBottom
127 BevelOuter = bvNone
128 TabOrder = 1
129 OnResize = panel_extensionResize
130 object lbl_filter: TLabel
131 Left = 2
132 Top = 62
133 Width = 100
134 Height = 17
135 AutoSize = False
136 Caption = 'Filter by &extension:'
137 FocusControl = combo_extension
138 end
139 object combo_extension: TComboBox
140 Left = 2
141 Top = 76
142 Width = 145
143 Height = 21
144 Style = csDropDownList
145 DropDownCount = 12
146 Font.Charset = DEFAULT_CHARSET
147 Font.Color = clWindowText
148 Font.Height = -11
149 Font.Name = 'Tahoma'
150 Font.Style = []
151 ItemHeight = 13
152 ParentFont = False
153 Sorted = True
154 TabOrder = 3
155 OnClick = combo_extensionClick
156 end
157 object check_zerobyte: TCheckBox
158 Left = 2
159 Top = 44
160 Width = 130
161 Height = 13
162 Caption = 'Show &zero-byte files'
163 TabOrder = 2
164 OnClick = check_zerobyteClick
165 end
166 object edit_filtername: TEdit
167 Left = 2
168 Top = 20
169 Width = 145
170 Height = 18
171 AutoSize = False
172 TabOrder = 1
173 end
174 object check_filtername: TCheckBox
175 Left = 2
176 Top = 5
177 Width = 130
178 Height = 15
179 Caption = 'Filter by file&name:'
180 TabOrder = 0
181 OnClick = check_filternameClick
182 end
183 end
184 end
185 object timer: TTimer
186 Enabled = False
187 OnTimer = timerTimer
188 Left = 144
189 Top = 24
190 end
191end
Note: See TracBrowser for help on using the repository browser.