source: oup/current/Tool_Preview.dfm @ 43

Last change on this file since 43 was 43, checked in by alloc, 17 years ago

DevTree 0.33a.

File size: 4.3 KB
Line 
1object Form_Preview: TForm_Preview
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 = 200
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 = 209
33    Top = 0
34    Width = 263
35    Height = 473
36    Align = alClient
37    BevelOuter = bvNone
38    TabOrder = 0
39    object img: TImage
40      Left = 0
41      Top = 20
42      Width = 263
43      Height = 453
44      Align = alClient
45      ExplicitWidth = 313
46    end
47    object lbl_notpossible: TLabel
48      Left = 16
49      Top = 56
50      Width = 97
51      Height = 65
52      AutoSize = False
53      Caption = 'No preview possible for this filetype'
54      Font.Charset = DEFAULT_CHARSET
55      Font.Color = clWindowText
56      Font.Height = -16
57      Font.Name = 'Tahoma'
58      Font.Style = []
59      ParentFont = False
60      Visible = False
61      WordWrap = True
62    end
63    object panel_buttons: TPanel
64      Left = 0
65      Top = 0
66      Width = 263
67      Height = 20
68      Align = alTop
69      BevelOuter = bvNone
70      TabOrder = 0
71      Visible = False
72      OnResize = panel_buttonsResize
73      object btn_dec: TButton
74        Left = 0
75        Top = 0
76        Width = 20
77        Height = 20
78        Caption = '-'
79        Enabled = False
80        TabOrder = 0
81        OnClick = btn_decClick
82      end
83      object btn_startstop: TButton
84        Left = 21
85        Top = 0
86        Width = 80
87        Height = 20
88        Caption = 'Stop automatic'
89        TabOrder = 1
90        OnClick = btn_startstopClick
91      end
92      object btn_inc: TButton
93        Left = 102
94        Top = 0
95        Width = 20
96        Height = 20
97        Caption = '+'
98        Enabled = False
99        TabOrder = 2
100        OnClick = btn_incClick
101      end
102    end
103  end
104  object panel_files: TPanel
105    Left = 0
106    Top = 0
107    Width = 200
108    Height = 473
109    Align = alLeft
110    BevelOuter = bvNone
111    TabOrder = 1
112    object list: TListBox
113      Left = 0
114      Top = 0
115      Width = 200
116      Height = 370
117      Align = alClient
118      ItemHeight = 13
119      TabOrder = 0
120      OnClick = listClick
121      OnMouseDown = listMouseDown
122    end
123    object panel_extension: TPanel
124      Left = 0
125      Top = 370
126      Width = 200
127      Height = 103
128      Align = alBottom
129      BevelOuter = bvNone
130      TabOrder = 1
131      OnResize = panel_extensionResize
132      object lbl_filter: TLabel
133        Left = 2
134        Top = 62
135        Width = 100
136        Height = 17
137        AutoSize = False
138        Caption = 'Filter by &extension:'
139        FocusControl = combo_extension
140      end
141      object combo_extension: TComboBox
142        Left = 2
143        Top = 76
144        Width = 145
145        Height = 21
146        Style = csDropDownList
147        DropDownCount = 12
148        Font.Charset = DEFAULT_CHARSET
149        Font.Color = clWindowText
150        Font.Height = -11
151        Font.Name = 'Tahoma'
152        Font.Style = []
153        ItemHeight = 13
154        ParentFont = False
155        Sorted = True
156        TabOrder = 3
157        OnClick = combo_extensionClick
158      end
159      object check_zerobyte: TCheckBox
160        Left = 2
161        Top = 44
162        Width = 130
163        Height = 13
164        Caption = 'Show &zero-byte files'
165        TabOrder = 2
166        OnClick = check_zerobyteClick
167      end
168      object edit_filtername: TEdit
169        Left = 2
170        Top = 20
171        Width = 145
172        Height = 18
173        AutoSize = False
174        TabOrder = 1
175      end
176      object check_filtername: TCheckBox
177        Left = 2
178        Top = 5
179        Width = 130
180        Height = 15
181        Caption = 'Filter by file&name:'
182        TabOrder = 0
183        OnClick = check_filternameClick
184      end
185    end
186  end
187  object timer: TTimer
188    Enabled = False
189    OnTimer = timerTimer
190    Left = 144
191    Top = 24
192  end
193end
Note: See TracBrowser for help on using the repository browser.