Last change
on this file since 1797 was 1679, checked in by healthsevak, 10 years ago |
Updating the working copy to CPRS version 28
|
File size:
2.1 KB
|
Rev | Line | |
---|
[456] | 1 | inherited frmOMVerify: TfrmOMVerify
|
---|
| 2 | Left = 328
|
---|
| 3 | Top = 243
|
---|
| 4 | BorderIcons = []
|
---|
| 5 | Caption = 'New Order'
|
---|
[829] | 6 | ClientHeight = 181
|
---|
| 7 | ClientWidth = 579
|
---|
[456] | 8 | OnClose = FormClose
|
---|
| 9 | OnCreate = FormCreate
|
---|
[1679] | 10 | OnShow = FormShow
|
---|
[829] | 11 | ExplicitWidth = 587
|
---|
| 12 | ExplicitHeight = 208
|
---|
[456] | 13 | PixelsPerInch = 96
|
---|
| 14 | TextHeight = 13
|
---|
[829] | 15 | object cmdAccept: TButton [0]
|
---|
[456] | 16 | Left = 165
|
---|
| 17 | Top = 154
|
---|
| 18 | Width = 72
|
---|
| 19 | Height = 21
|
---|
| 20 | Caption = 'Accept'
|
---|
| 21 | Default = True
|
---|
| 22 | TabOrder = 0
|
---|
| 23 | OnClick = cmdAcceptClick
|
---|
| 24 | end
|
---|
[829] | 25 | object cmdEdit: TButton [1]
|
---|
[456] | 26 | Left = 253
|
---|
| 27 | Top = 154
|
---|
| 28 | Width = 72
|
---|
| 29 | Height = 21
|
---|
| 30 | Caption = 'Edit'
|
---|
| 31 | TabOrder = 1
|
---|
| 32 | OnClick = cmdEditClick
|
---|
| 33 | end
|
---|
[829] | 34 | object cmdCancel: TButton [2]
|
---|
[456] | 35 | Left = 341
|
---|
| 36 | Top = 154
|
---|
| 37 | Width = 72
|
---|
| 38 | Height = 21
|
---|
| 39 | Cancel = True
|
---|
| 40 | Caption = 'Cancel'
|
---|
| 41 | TabOrder = 2
|
---|
| 42 | OnClick = cmdCancelClick
|
---|
| 43 | end
|
---|
[829] | 44 | object memText: TRichEdit [3]
|
---|
[456] | 45 | Left = 6
|
---|
| 46 | Top = 6
|
---|
| 47 | Width = 567
|
---|
| 48 | Height = 132
|
---|
[1679] | 49 | TabStop = False
|
---|
[456] | 50 | Font.Charset = ANSI_CHARSET
|
---|
| 51 | Font.Color = clWindowText
|
---|
| 52 | Font.Height = -11
|
---|
| 53 | Font.Name = 'Courier New'
|
---|
| 54 | Font.Style = []
|
---|
| 55 | Lines.Strings = (
|
---|
| 56 |
|
---|
| 57 | '1234567890123456789012345678901234567890123456789012345678901234' +
|
---|
| 58 | '5678901234567890'
|
---|
| 59 | '2'
|
---|
| 60 | '3'
|
---|
| 61 | '4'
|
---|
| 62 | '5'
|
---|
| 63 | '6'
|
---|
| 64 | '7'
|
---|
| 65 | '8'
|
---|
| 66 | '9'
|
---|
| 67 | '10')
|
---|
| 68 | ParentFont = False
|
---|
[1679] | 69 | ReadOnly = True
|
---|
[456] | 70 | ScrollBars = ssBoth
|
---|
| 71 | TabOrder = 3
|
---|
| 72 | WantTabs = True
|
---|
| 73 | WordWrap = False
|
---|
[1679] | 74 | OnKeyDown = memTextKeyDown
|
---|
[456] | 75 | end
|
---|
[829] | 76 | inherited amgrMain: TVA508AccessibilityManager
|
---|
| 77 | Data = (
|
---|
| 78 | (
|
---|
| 79 | 'Component = cmdAccept'
|
---|
| 80 | 'Status = stsDefault')
|
---|
| 81 | (
|
---|
| 82 | 'Component = cmdEdit'
|
---|
| 83 | 'Status = stsDefault')
|
---|
| 84 | (
|
---|
| 85 | 'Component = cmdCancel'
|
---|
| 86 | 'Status = stsDefault')
|
---|
| 87 | (
|
---|
| 88 | 'Component = memText'
|
---|
[1679] | 89 | 'Text = Order information.'
|
---|
| 90 | 'Status = stsOK')
|
---|
[829] | 91 | (
|
---|
| 92 | 'Component = frmOMVerify'
|
---|
| 93 | 'Status = stsDefault'))
|
---|
| 94 | end
|
---|
[1679] | 95 | object VA508ComponentAccessibility1: TVA508ComponentAccessibility
|
---|
| 96 | Component = memText
|
---|
| 97 | OnStateQuery = VA508ComponentAccessibility1StateQuery
|
---|
| 98 | Left = 48
|
---|
| 99 | Top = 32
|
---|
| 100 | end
|
---|
[456] | 101 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.