Line | |
---|
1 | object frmOptionsNewList: TfrmOptionsNewList
|
---|
2 | Left = 863
|
---|
3 | Top = 101
|
---|
4 | HelpContext = 9085
|
---|
5 | BorderIcons = [biSystemMenu, biHelp]
|
---|
6 | BorderStyle = bsDialog
|
---|
7 | Caption = 'New Personal List'
|
---|
8 | ClientHeight = 115
|
---|
9 | ClientWidth = 175
|
---|
10 | Color = clBtnFace
|
---|
11 | ParentFont = True
|
---|
12 | HelpFile = 'CPRSWT.HLP'
|
---|
13 | OldCreateOrder = True
|
---|
14 | Position = poScreenCenter
|
---|
15 | PixelsPerInch = 96
|
---|
16 | TextHeight = 13
|
---|
17 | object lblEnter: TLabel
|
---|
18 | Left = 10
|
---|
19 | Top = 8
|
---|
20 | Width = 93
|
---|
21 | Height = 13
|
---|
22 | Caption = 'Enter the name of a'
|
---|
23 | end
|
---|
24 | object lblNew: TLabel
|
---|
25 | Left = 10
|
---|
26 | Top = 24
|
---|
27 | Width = 81
|
---|
28 | Height = 13
|
---|
29 | Caption = 'new personal list.'
|
---|
30 | end
|
---|
31 | object pnlBottom: TPanel
|
---|
32 | Left = 0
|
---|
33 | Top = 81
|
---|
34 | Width = 175
|
---|
35 | Height = 34
|
---|
36 | HelpContext = 9085
|
---|
37 | Align = alBottom
|
---|
38 | BevelOuter = bvNone
|
---|
39 | ParentColor = True
|
---|
40 | TabOrder = 1
|
---|
41 | object btnOK: TButton
|
---|
42 | Left = 11
|
---|
43 | Top = 7
|
---|
44 | Width = 75
|
---|
45 | Height = 22
|
---|
46 | HelpContext = 9997
|
---|
47 | Caption = 'OK'
|
---|
48 | Default = True
|
---|
49 | Enabled = False
|
---|
50 | TabOrder = 0
|
---|
51 | OnClick = btnOKClick
|
---|
52 | end
|
---|
53 | object btnCancel: TButton
|
---|
54 | Left = 91
|
---|
55 | Top = 7
|
---|
56 | Width = 75
|
---|
57 | Height = 22
|
---|
58 | HelpContext = 9996
|
---|
59 | Cancel = True
|
---|
60 | Caption = 'Cancel'
|
---|
61 | ModalResult = 2
|
---|
62 | TabOrder = 1
|
---|
63 | end
|
---|
64 | end
|
---|
65 | object txtNewList: TCaptionEdit
|
---|
66 | Left = 10
|
---|
67 | Top = 45
|
---|
68 | Width = 153
|
---|
69 | Height = 21
|
---|
70 | HelpContext = 9086
|
---|
71 | MaxLength = 30
|
---|
72 | TabOrder = 0
|
---|
73 | OnChange = txtNewListChange
|
---|
74 | OnKeyPress = txtNewListKeyPress
|
---|
75 | Caption = 'Enter the name of a new personal list'
|
---|
76 | end
|
---|
77 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.