Mercurial > cdar
annotate unit_Editor_ws.dfm @ 0:ef71164288c1
begin of using hg for cdar
author | "Meillo r e t u r n s <meillo@marmaro.de>" |
---|---|
date | Sun, 03 Dec 2006 21:54:43 +0100 |
parents | |
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_ws: Tform_Editor_ws |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
2 Left = 171 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
3 Top = 275 |
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 = 'Welcome-Screen Settings' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
7 ClientHeight = 350 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
8 ClientWidth = 470 |
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 Icon.Data = { |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
17 0000010001002020100000000000E80200001600000028000000200000004000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
18 0000010004000000000080020000000000000000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
19 000000008000008000000080800080000000800080008080000080808000C0C0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
20 C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
21 0000000000000000000000000000000000000000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
22 0000000000000000000000000000000000000000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
23 000000000000BBBBBBBB000000000000000000000BBBBBBBBBBBBB0000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
24 0000000BBBBBBBBBBB0000000000000000000BBBBBBBBBB000BBBB0000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
25 0000BBBBBBBBB00BBBBBB00000000000000BBBBBBBB00BBBBBB0000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
26 000BBBBBBB0BBBBBB00000000000000000BBBBBBB0BBBBB00000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
27 00BBBBBB0BBBBB0000000000000000000BBBBBB0BBBB00000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
28 0BBBBB0BBBB0000000000000000000000BBBB0BBBB0000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
29 BBBB0BBBB00000000000000000000000BBBB0BBB000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
30 BBB0BBB0000000000000000000000000BBB0BB00000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
31 BB0BBB00000000000000000000000000BB0BB000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
32 0B0BB0000000000000000000000000000B0B0000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
33 0000000000000000000000000000000000000000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
34 0000000000000000000000000000000000000000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
35 0000000000000000000000000000000000000000000000000000000000000000 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
36 000000000000000000000000000000000000000000000000000000000000FFFF |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
37 FFFFFFFFFFFFFFFFFFFFFFFF00FFFFF8003FFFE0001FFF80000FFF00000FFE00 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
38 001FFC00007FFC0001FFF80007FFF8001FFFF0003FFFF000FFFFF001FFFFE003 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
39 FFFFE007FFFFE00FFFFFE01FFFFFE01FFFFFE03FFFFFE03FFFFFF07FFFFFF07F |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
40 FFFFF8FFFFFFF8FFFFFFF8FFFFFFF8FFFFFFFCFFFFFFFFFFFFFFFFFFFFFF} |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
41 OldCreateOrder = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
42 Position = poScreenCenter |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
43 OnClose = FormClose |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
44 OnCreate = FormCreate |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
45 OnShow = FormShow |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
46 PixelsPerInch = 96 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
47 TextHeight = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
48 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
|
49 Left = 250 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
50 Top = 310 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
51 Width = 101 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
52 Height = 31 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
53 Caption = 'Cancel Changes' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
54 TabOrder = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
55 OnClick = btn_cancelClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
56 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
57 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
|
58 Left = 360 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
59 Top = 310 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
60 Width = 101 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
61 Height = 31 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
62 Caption = 'Apply Changes' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
63 TabOrder = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
64 OnClick = btn_ApplyClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
65 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
66 object gbx_BilderLaden: TGroupBox |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
67 Left = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
68 Top = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
69 Width = 451 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
70 Height = 141 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
71 TabOrder = 2 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
72 object lbl_1: TLabel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
73 Left = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
74 Top = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
75 Width = 234 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
76 Height = 16 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
77 Caption = 'Background-Picture: (600x450 px)' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
78 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
|
79 Font.Color = clWindowText |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
80 Font.Height = -13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
81 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
|
82 Font.Style = [fsBold] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
83 ParentFont = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
84 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
85 object lbl_2: TLabel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
86 Left = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
87 Top = 80 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
88 Width = 282 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
89 Height = 16 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
90 Caption = 'Enter-Picture: (150x40 px recommended)' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
91 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
|
92 Font.Color = clWindowText |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
93 Font.Height = -13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
94 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
|
95 Font.Style = [fsBold] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
96 ParentFont = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
97 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
98 object btn_bp: TButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
99 Left = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
100 Top = 40 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
101 Width = 91 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
102 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
103 Caption = 'Browse' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
104 TabOrder = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
105 OnClick = btn_bpClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
106 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
107 object tbx_BackgroundPath: TEdit |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
108 Left = 130 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
109 Top = 40 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
110 Width = 311 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
111 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
112 TabOrder = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
113 Text = 'tbx_BackgroundPath' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
114 OnChange = tbx_BackgroundPathChange |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
115 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
116 object tbx_EnterPath: TEdit |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
117 Left = 130 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
118 Top = 100 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
119 Width = 311 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
120 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
121 TabOrder = 3 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
122 Text = 'tbx_EnterPath' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
123 OnChange = tbx_EnterPathChange |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
124 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
125 object btn_ep: TButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
126 Left = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
127 Top = 100 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
128 Width = 91 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
129 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
130 Caption = 'Browse' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
131 TabOrder = 2 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
132 OnClick = btn_epClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
133 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
134 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
135 object gbx_EnterPos: TGroupBox |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
136 Left = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
137 Top = 160 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
138 Width = 231 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
139 Height = 181 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
140 TabOrder = 3 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
141 object lbl_3: TLabel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
142 Left = 110 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
143 Top = 50 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
144 Width = 47 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
145 Height = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
146 Caption = 'X-Position' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
147 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
|
148 Font.Color = clWindowText |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
149 Font.Height = -11 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
150 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
|
151 Font.Style = [] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
152 ParentFont = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
153 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
154 object lbl_4: TLabel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
155 Left = 40 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
156 Top = 90 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
157 Width = 47 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
158 Height = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
159 Caption = 'Y-Position' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
160 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
|
161 Font.Color = clWindowText |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
162 Font.Height = -11 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
163 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
|
164 Font.Style = [] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
165 ParentFont = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
166 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
167 object lbl_5: TLabel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
168 Left = 80 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
169 Top = 120 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
170 Width = 128 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
171 Height = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
172 Caption = '... of the Enter-Picture' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
173 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
|
174 Font.Color = clWindowText |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
175 Font.Height = -11 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
176 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
|
177 Font.Style = [fsBold] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
178 ParentFont = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
179 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
180 object lbl_6: TLabel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
181 Left = 50 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
182 Top = 150 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
183 Width = 166 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
184 Height = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
185 Caption = '(You can move by Drag'#39'n'#39'Drop too)' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
186 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
187 object hsb_EnterXPos: TScrollBar |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
188 Left = 30 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
189 Top = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
190 Width = 191 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
191 Height = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
192 LargeChange = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
193 Max = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
194 PageSize = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
195 TabOrder = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
196 OnChange = hsb_EnterXPosChange |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
197 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
198 object tbx_XPos: TEdit |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
199 Left = 170 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
200 Top = 50 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
201 Width = 31 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
202 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
203 TabStop = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
204 AutoSize = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
205 BevelEdges = [] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
206 BevelInner = bvNone |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
207 BevelKind = bkFlat |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
208 BevelOuter = bvNone |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
209 Enabled = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
210 TabOrder = 2 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
211 Text = '325' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
212 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
213 object tbx_YPos: TEdit |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
214 Left = 100 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
215 Top = 90 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
216 Width = 31 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
217 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
218 TabStop = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
219 AutoSize = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
220 BevelEdges = [] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
221 BevelInner = bvNone |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
222 BevelKind = bkFlat |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
223 BevelOuter = bvNone |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
224 BiDiMode = bdLeftToRight |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
225 Enabled = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
226 ParentBiDiMode = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
227 TabOrder = 3 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
228 Text = '225' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
229 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
230 object vsb_EnterYPos: TScrollBar |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
231 Left = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
232 Top = 40 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
233 Width = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
234 Height = 131 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
235 Kind = sbVertical |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
236 LargeChange = 10 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
237 Max = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
238 PageSize = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
239 TabOrder = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
240 OnChange = vsb_EnterYPosChange |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
241 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
242 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
243 object gbx_ShowTill: TGroupBox |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
244 Left = 250 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
245 Top = 160 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
246 Width = 211 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
247 Height = 141 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
248 TabOrder = 4 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
249 object rbtn_DoShow: TRadioButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
250 Left = 30 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
251 Top = 30 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
252 Width = 171 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
253 Height = 17 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
254 Caption = 'Show Welcome-Screen ...' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
255 Checked = True |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
256 TabOrder = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
257 TabStop = True |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
258 OnClick = rbtn_DoShowClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
259 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
260 object rbtn_NotShow: TRadioButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
261 Left = 30 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
262 Top = 100 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
263 Width = 171 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
264 Height = 17 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
265 Caption = 'Don'#39't show Welcome-Screen' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
266 TabOrder = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
267 OnClick = rbtn_NotShowClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
268 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
269 object pan_ShowTill: TPanel |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
270 Left = 60 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
271 Top = 50 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
272 Width = 141 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
273 Height = 41 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
274 BevelOuter = bvNone |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
275 TabOrder = 2 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
276 object rbtn_TillClick: TRadioButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
277 Left = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
278 Top = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
279 Width = 131 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
280 Height = 17 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
281 Caption = '... till click' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
282 Checked = True |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
283 TabOrder = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
284 TabStop = True |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
285 OnClick = rbtn_TillClickClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
286 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
287 object rbtn_TillTime: TRadioButton |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
288 Left = 0 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
289 Top = 22 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
290 Width = 141 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
291 Height = 17 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
292 Caption = '... seconds' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
293 TabOrder = 1 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
294 OnClick = rbtn_TillTimeClick |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
295 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
296 object cobx_Delay: TComboBox |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
297 Left = 30 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
298 Top = 20 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
299 Width = 41 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
300 Height = 21 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
301 Style = csDropDownList |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
302 Enabled = False |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
303 ItemHeight = 13 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
304 TabOrder = 2 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
305 Items.Strings = ( |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
306 '1' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
307 '2' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
308 '3' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
309 '5' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
310 '7' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
311 '10' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
312 '15' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
313 '20') |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
314 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
315 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
316 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
317 object OpenDialog1: TOpenPictureDialog |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
318 Filter = 'JPEG Image File (*.jpg)|*.jpg;*.jpeg' |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
319 OptionsEx = [ofExNoPlacesBar] |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
320 Left = 440 |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
321 end |
ef71164288c1
begin of using hg for cdar
"Meillo r e t u r n s <meillo@marmaro.de>"
parents:
diff
changeset
|
322 end |