Rev | Line | |
---|
[829] | 1 | inherited frmConsultsByDate: TfrmConsultsByDate
|
---|
[456] | 2 | Left = 372
|
---|
| 3 | Top = 217
|
---|
| 4 | BorderIcons = []
|
---|
| 5 | Caption = 'List Consults by Date Range'
|
---|
[829] | 6 | ClientHeight = 151
|
---|
| 7 | ClientWidth = 251
|
---|
[456] | 8 | OldCreateOrder = True
|
---|
| 9 | Position = poScreenCenter
|
---|
[829] | 10 | ExplicitWidth = 259
|
---|
| 11 | ExplicitHeight = 178
|
---|
[456] | 12 | PixelsPerInch = 96
|
---|
| 13 | TextHeight = 13
|
---|
[829] | 14 | object pnlBase: TORAutoPanel [0]
|
---|
[456] | 15 | Left = 0
|
---|
| 16 | Top = 0
|
---|
| 17 | Width = 251
|
---|
| 18 | Height = 151
|
---|
| 19 | Align = alClient
|
---|
| 20 | BevelOuter = bvNone
|
---|
| 21 | TabOrder = 0
|
---|
| 22 | object lblBeginDate: TLabel
|
---|
| 23 | Left = 8
|
---|
| 24 | Top = 8
|
---|
| 25 | Width = 73
|
---|
| 26 | Height = 13
|
---|
| 27 | Caption = 'Beginning Date'
|
---|
| 28 | end
|
---|
| 29 | object lblEndDate: TLabel
|
---|
| 30 | Left = 8
|
---|
| 31 | Top = 51
|
---|
| 32 | Width = 59
|
---|
| 33 | Height = 13
|
---|
| 34 | Caption = 'Ending Date'
|
---|
| 35 | end
|
---|
| 36 | object calBeginDate: TORDateBox
|
---|
| 37 | Left = 8
|
---|
| 38 | Top = 22
|
---|
| 39 | Width = 155
|
---|
| 40 | Height = 21
|
---|
| 41 | TabOrder = 0
|
---|
| 42 | DateOnly = False
|
---|
| 43 | RequireTime = False
|
---|
| 44 | Caption = 'Beginning Date'
|
---|
| 45 | end
|
---|
| 46 | object calEndDate: TORDateBox
|
---|
| 47 | Left = 8
|
---|
| 48 | Top = 65
|
---|
| 49 | Width = 155
|
---|
| 50 | Height = 21
|
---|
| 51 | TabOrder = 1
|
---|
| 52 | DateOnly = False
|
---|
| 53 | RequireTime = False
|
---|
| 54 | Caption = 'Ending Date'
|
---|
| 55 | end
|
---|
| 56 | object radSort: TRadioGroup
|
---|
| 57 | Left = 8
|
---|
| 58 | Top = 94
|
---|
| 59 | Width = 155
|
---|
| 60 | Height = 49
|
---|
| 61 | Caption = 'Sort Order'
|
---|
| 62 | Items.Strings = (
|
---|
| 63 | '&Ascending (oldest first)'
|
---|
| 64 | '&Descending (newest first)')
|
---|
| 65 | TabOrder = 2
|
---|
| 66 | end
|
---|
| 67 | object cmdOK: TButton
|
---|
| 68 | Left = 171
|
---|
| 69 | Top = 95
|
---|
| 70 | Width = 72
|
---|
| 71 | Height = 21
|
---|
| 72 | Caption = 'OK'
|
---|
| 73 | Default = True
|
---|
| 74 | TabOrder = 3
|
---|
| 75 | OnClick = cmdOKClick
|
---|
| 76 | end
|
---|
| 77 | object cmdCancel: TButton
|
---|
| 78 | Left = 171
|
---|
| 79 | Top = 122
|
---|
| 80 | Width = 72
|
---|
| 81 | Height = 21
|
---|
| 82 | Cancel = True
|
---|
| 83 | Caption = 'Cancel'
|
---|
| 84 | TabOrder = 4
|
---|
| 85 | OnClick = cmdCancelClick
|
---|
| 86 | end
|
---|
| 87 | end
|
---|
[829] | 88 | inherited amgrMain: TVA508AccessibilityManager
|
---|
| 89 | Data = (
|
---|
| 90 | (
|
---|
| 91 | 'Component = pnlBase'
|
---|
| 92 | 'Status = stsDefault')
|
---|
| 93 | (
|
---|
| 94 | 'Component = calBeginDate'
|
---|
| 95 | 'Status = stsDefault')
|
---|
| 96 | (
|
---|
| 97 | 'Component = calEndDate'
|
---|
| 98 | 'Status = stsDefault')
|
---|
| 99 | (
|
---|
| 100 | 'Component = radSort'
|
---|
| 101 | 'Status = stsDefault')
|
---|
| 102 | (
|
---|
| 103 | 'Component = cmdOK'
|
---|
| 104 | 'Status = stsDefault')
|
---|
| 105 | (
|
---|
| 106 | 'Component = cmdCancel'
|
---|
| 107 | 'Status = stsDefault')
|
---|
| 108 | (
|
---|
| 109 | 'Component = frmConsultsByDate'
|
---|
| 110 | 'Status = stsDefault'))
|
---|
| 111 | end
|
---|
[456] | 112 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.