FreeLaunch
114 строк · 2.2 Кб
1object ChangeIconForm: TChangeIconForm
2Left = 0
3Top = 0
4BorderIcons = [biSystemMenu]
5BorderStyle = bsSingle
6ClientHeight = 172
7ClientWidth = 378
8Color = clBtnFace
9Font.Charset = DEFAULT_CHARSET
10Font.Color = clWindowText
11Font.Height = -11
12Font.Name = 'Tahoma'
13Font.Style = []
14KeyPreview = True
15Position = poScreenCenter
16OnClose = FormClose
17OnShow = FormShow
18TextHeight = 13
19object GroupBox1: TGroupBox
20Left = 0
21Top = 0
22Width = 378
23Height = 130
24Align = alTop
25TabOrder = 0
26object Label1: TLabel
27Left = 50
28Top = 25
29Width = 3
30Height = 13
31Alignment = taRightJustify
32end
33object Label2: TLabel
34Left = 50
35Top = 55
36Width = 3
37Height = 13
38Alignment = taRightJustify
39end
40object IcImage: TImage
41Left = 328
42Top = 50
43Width = 32
44Height = 32
45end
46object Label3: TLabel
47Left = 135
48Top = 55
49Width = 3
50Height = 13
51end
52object IndexEdit: TSpinEdit
53Left = 60
54Top = 50
55Width = 65
56Height = 22
57MaxValue = 1
58MinValue = 1
59TabOrder = 2
60Value = 0
61OnChange = IndexEditChange
62end
63object RefProps: TButton
64Left = 340
65Top = 20
66Width = 20
67Height = 20
68HotImageIndex = 3
69ImageAlignment = iaCenter
70ImageIndex = 2
71Images = Data.Images
72TabOrder = 1
73OnClick = RefPropsClick
74end
75object IconEdit: TButtonedEdit
76Left = 60
77Top = 20
78Width = 250
79Height = 21
80Images = Data.Images
81RightButton.HotImageIndex = 1
82RightButton.ImageIndex = 0
83RightButton.Visible = True
84TabOrder = 0
85OnRightButtonClick = BrowseIconClick
86end
87object NegativeBox: TCheckBox
88Left = 60
89Top = 100
90Width = 250
91Height = 17
92TabOrder = 3
93OnClick = IndexEditChange
94end
95end
96object CancelButton: TButton
97Left = 300
98Top = 140
99Width = 75
100Height = 25
101Cancel = True
102TabOrder = 2
103OnClick = CancelButtonClick
104end
105object OKButton: TButton
106Left = 210
107Top = 140
108Width = 75
109Height = 25
110Default = True
111TabOrder = 1
112OnClick = OKButtonClick
113end
114end
115