| Line | |
|---|
| 1 | object InputDlg: TInputDlg
|
|---|
| 2 | Left = 514
|
|---|
| 3 | Height = 99
|
|---|
| 4 | Top = 236
|
|---|
| 5 | Width = 232
|
|---|
| 6 | BorderStyle = bsNone
|
|---|
| 7 | ClientHeight = 99
|
|---|
| 8 | ClientWidth = 232
|
|---|
| 9 | Color = clBtnFace
|
|---|
| 10 | DesignTimePPI = 144
|
|---|
| 11 | Font.Color = clWindowText
|
|---|
| 12 | Font.Height = -20
|
|---|
| 13 | Font.Name = 'MS Sans Serif'
|
|---|
| 14 | FormStyle = fsStayOnTop
|
|---|
| 15 | OnClose = FormClose
|
|---|
| 16 | OnCreate = FormCreate
|
|---|
| 17 | OnPaint = FormPaint
|
|---|
| 18 | OnShow = FormShow
|
|---|
| 19 | LCLVersion = '2.2.6.0'
|
|---|
| 20 | Scaled = False
|
|---|
| 21 | object ButtonOk: TButtonA
|
|---|
| 22 | Left = 66
|
|---|
| 23 | Height = 25
|
|---|
| 24 | Top = 67
|
|---|
| 25 | Width = 100
|
|---|
| 26 | Down = False
|
|---|
| 27 | Permanent = False
|
|---|
| 28 | OnClick = ButtonOkClick
|
|---|
| 29 | end
|
|---|
| 30 | object EditInput: TEdit
|
|---|
| 31 | Left = 16
|
|---|
| 32 | Height = 27
|
|---|
| 33 | Top = 40
|
|---|
| 34 | Width = 200
|
|---|
| 35 | BorderStyle = bsNone
|
|---|
| 36 | Color = clBlack
|
|---|
| 37 | Font.Color = 4176863
|
|---|
| 38 | Font.Height = -15
|
|---|
| 39 | Font.Name = 'Times New Roman'
|
|---|
| 40 | Font.Style = [fsBold]
|
|---|
| 41 | OnKeyPress = EInputKeyPress
|
|---|
| 42 | ParentFont = False
|
|---|
| 43 | TabOrder = 0
|
|---|
| 44 | end
|
|---|
| 45 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
