Mercurial > cdar
annotate unit_Editor_as_BrowseDir.dfm @ 2:104f349dcfcc default tip
Added tag cdar-2.3 for changeset 87b91371db05b8cabe2dc3e2d2dc3ba830ab463b
author | "Meillo r e t u r n s <meillo@marmaro.de>" |
---|---|
date | Sun, 03 Dec 2006 21:56:41 +0100 |
parents | ef71164288c1 |
children |
rev | line source |
---|---|
0
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
1 object form_Editor_as_BrowseDir: Tform_Editor_as_BrowseDir |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
2 Left = 436 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
3 Top = 201 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
4 BorderIcons = [] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
5 BorderStyle = bsSingle |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
6 Caption = 'Chose Directory' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
7 ClientHeight = 299 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
8 ClientWidth = 290 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
9 Color = clBtnFace |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
10 Font.Charset = DEFAULT_CHARSET |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
11 Font.Color = clWindowText |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
12 Font.Height = -11 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
13 Font.Name = 'MS Sans Serif' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
14 Font.Style = [] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
15 FormStyle = fsStayOnTop |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
16 OldCreateOrder = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
17 Position = poScreenCenter |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
18 OnClose = FormClose |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
19 OnCreate = FormCreate |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
20 OnShow = FormShow |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
21 PixelsPerInch = 96 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
22 TextHeight = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
23 object dirlbx_1: TDirectoryListBox |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
24 Left = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
25 Top = 40 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
26 Width = 271 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
27 Height = 191 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
28 ItemHeight = 16 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
29 TabOrder = 2 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
30 OnChange = dirlbx_1Change |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
31 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
32 object tbx_Path: TEdit |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
33 Left = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
34 Top = 240 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
35 Width = 271 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
36 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
37 TabStop = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
38 ReadOnly = True |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
39 TabOrder = 4 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
40 Text = 'tbx_Path' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
41 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
42 object btn_NewDir: TBitBtn |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
43 Left = 180 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
44 Top = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
45 Width = 101 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
46 Height = 19 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
47 Caption = 'Create new Dir' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
48 TabOrder = 3 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
49 OnClick = btn_NewDirClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
50 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
51 object btn_Apply: TButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
52 Left = 180 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
53 Top = 270 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
54 Width = 101 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
55 Height = 25 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
56 Caption = 'Apply Changes' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
57 TabOrder = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
58 OnClick = btn_ApplyClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
59 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
60 object btn_Cancel: TButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
61 Left = 70 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
62 Top = 270 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
63 Width = 101 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
64 Height = 25 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
65 Caption = 'Cancel Changes' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
66 TabOrder = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
67 OnClick = btn_CancelClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
68 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
69 object dcobx_1: TDriveComboBox |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
70 Left = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
71 Top = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
72 Width = 161 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
73 Height = 19 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
74 TabOrder = 5 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
75 OnChange = dcobx_1Change |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
76 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
77 end |