|
Last change
on this file since 962 was 460, checked in by Kevin Toppenberg, 17 years ago |
|
Uploading from OR_30_258
|
|
File size:
1.9 KB
|
| Line | |
|---|
| 1 | inherited frmOCSession: TfrmOCSession
|
|---|
| 2 | Left = 365
|
|---|
| 3 | Top = 221
|
|---|
| 4 | Width = 504
|
|---|
| 5 | Height = 298
|
|---|
| 6 | BorderIcons = []
|
|---|
| 7 | Caption = 'Order Checks'
|
|---|
| 8 | Position = poScreenCenter
|
|---|
| 9 | ShowHint = True
|
|---|
| 10 | OnClose = FormClose
|
|---|
| 11 | OnShow = FormShow
|
|---|
| 12 | PixelsPerInch = 96
|
|---|
| 13 | TextHeight = 13
|
|---|
| 14 | object lstChecks: TCaptionListBox
|
|---|
| 15 | Left = 0
|
|---|
| 16 | Top = 0
|
|---|
| 17 | Width = 496
|
|---|
| 18 | Height = 160
|
|---|
| 19 | Style = lbOwnerDrawVariable
|
|---|
| 20 | Align = alClient
|
|---|
| 21 | ItemHeight = 13
|
|---|
| 22 | MultiSelect = True
|
|---|
| 23 | ParentShowHint = False
|
|---|
| 24 | ShowHint = True
|
|---|
| 25 | TabOrder = 1
|
|---|
| 26 | OnDrawItem = lstChecksDrawItem
|
|---|
| 27 | OnMeasureItem = lstChecksMeasureItem
|
|---|
| 28 | HintOnItem = True
|
|---|
| 29 | end
|
|---|
| 30 | object pnlBottom: TPanel
|
|---|
| 31 | Left = 0
|
|---|
| 32 | Top = 160
|
|---|
| 33 | Width = 496
|
|---|
| 34 | Height = 111
|
|---|
| 35 | Align = alBottom
|
|---|
| 36 | BevelOuter = bvNone
|
|---|
| 37 | TabOrder = 0
|
|---|
| 38 | DesignSize = (
|
|---|
| 39 | 496
|
|---|
| 40 | 111)
|
|---|
| 41 | object lblJustify: TLabel
|
|---|
| 42 | Left = 8
|
|---|
| 43 | Top = 34
|
|---|
| 44 | Width = 248
|
|---|
| 45 | Height = 13
|
|---|
| 46 | Anchors = [akLeft, akTop, akRight]
|
|---|
| 47 | Caption = 'Enter justification for overriding critical order checks -'
|
|---|
| 48 | end
|
|---|
| 49 | object txtJustify: TCaptionEdit
|
|---|
| 50 | Left = 8
|
|---|
| 51 | Top = 50
|
|---|
| 52 | Width = 480
|
|---|
| 53 | Height = 21
|
|---|
| 54 | Anchors = [akLeft, akTop, akRight]
|
|---|
| 55 | MaxLength = 80
|
|---|
| 56 | TabOrder = 0
|
|---|
| 57 | OnKeyDown = txtJustifyKeyDown
|
|---|
| 58 | Caption = 'Enter justification for overriding critical order checks -'
|
|---|
| 59 | end
|
|---|
| 60 | object cmdCancelOrder: TButton
|
|---|
| 61 | Left = 356
|
|---|
| 62 | Top = 5
|
|---|
| 63 | Width = 133
|
|---|
| 64 | Height = 21
|
|---|
| 65 | Anchors = [akLeft, akTop, akRight]
|
|---|
| 66 | Caption = 'Cancel Selected Order(s)'
|
|---|
| 67 | TabOrder = 2
|
|---|
| 68 | OnClick = cmdCancelOrderClick
|
|---|
| 69 | end
|
|---|
| 70 | object cmdContinue: TButton
|
|---|
| 71 | Left = 212
|
|---|
| 72 | Top = 82
|
|---|
| 73 | Width = 72
|
|---|
| 74 | Height = 21
|
|---|
| 75 | Anchors = [akLeft, akTop, akRight]
|
|---|
| 76 | Caption = 'Continue'
|
|---|
| 77 | TabOrder = 3
|
|---|
| 78 | OnClick = cmdContinueClick
|
|---|
| 79 | end
|
|---|
| 80 | end
|
|---|
| 81 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.