Last change
on this file since 834 was 460, checked in by Kevin Toppenberg, 16 years ago |
Uploading from OR_30_258
|
File size:
2.0 KB
|
Rev | Line | |
---|
[459] | 1 | object frmLabCollectTimes: TfrmLabCollectTimes
|
---|
| 2 | Left = 332
|
---|
| 3 | Top = 310
|
---|
| 4 | Width = 447
|
---|
| 5 | Height = 197
|
---|
| 6 | BorderIcons = []
|
---|
| 7 | Caption = 'Future Lab Collect Times'
|
---|
| 8 | Color = clBtnFace
|
---|
| 9 | Font.Charset = DEFAULT_CHARSET
|
---|
| 10 | Font.Color = clWindowText
|
---|
| 11 | Font.Height = -11
|
---|
| 12 | Font.Name = 'MS Sans Serif'
|
---|
| 13 | Font.Style = []
|
---|
| 14 | OldCreateOrder = False
|
---|
| 15 | Position = poScreenCenter
|
---|
| 16 | OnCreate = FormCreate
|
---|
| 17 | PixelsPerInch = 96
|
---|
| 18 | TextHeight = 13
|
---|
| 19 | object lblFutureTimes: TMemo
|
---|
| 20 | Left = 211
|
---|
| 21 | Top = 113
|
---|
| 22 | Width = 129
|
---|
| 23 | Height = 46
|
---|
| 24 | TabStop = False
|
---|
| 25 | BorderStyle = bsNone
|
---|
| 26 | Color = clBtnFace
|
---|
| 27 | Lines.Strings = (
|
---|
| 28 | 'Select a date and a routine '
|
---|
| 29 | 'lab collect time for that '
|
---|
| 30 | 'date.')
|
---|
| 31 | ReadOnly = True
|
---|
| 32 | TabOrder = 5
|
---|
| 33 | end
|
---|
| 34 | object calLabCollect: TORDateBox
|
---|
| 35 | Left = 241
|
---|
| 36 | Top = 22
|
---|
| 37 | Width = 158
|
---|
| 38 | Height = 21
|
---|
| 39 | TabOrder = 0
|
---|
| 40 | Visible = False
|
---|
| 41 | OnChange = calLabCollectChange
|
---|
| 42 | DateOnly = True
|
---|
| 43 | RequireTime = False
|
---|
| 44 | end
|
---|
| 45 | object lstLabCollTimes: TORListBox
|
---|
| 46 | Left = 210
|
---|
| 47 | Top = 6
|
---|
| 48 | Width = 218
|
---|
| 49 | Height = 98
|
---|
| 50 | ItemHeight = 13
|
---|
| 51 | ParentShowHint = False
|
---|
| 52 | ShowHint = True
|
---|
| 53 | TabOrder = 1
|
---|
| 54 | ItemTipColor = clWindow
|
---|
| 55 | LongList = False
|
---|
| 56 | Pieces = '2'
|
---|
| 57 | end
|
---|
| 58 | object cmdOK: TButton
|
---|
| 59 | Left = 353
|
---|
| 60 | Top = 112
|
---|
| 61 | Width = 75
|
---|
| 62 | Height = 21
|
---|
| 63 | Caption = 'OK'
|
---|
| 64 | TabOrder = 2
|
---|
| 65 | OnClick = cmdOKClick
|
---|
| 66 | end
|
---|
| 67 | object cmdCancel: TButton
|
---|
| 68 | Left = 353
|
---|
| 69 | Top = 139
|
---|
| 70 | Width = 75
|
---|
| 71 | Height = 21
|
---|
| 72 | Cancel = True
|
---|
| 73 | Caption = 'Cancel'
|
---|
| 74 | TabOrder = 3
|
---|
| 75 | OnClick = cmdCancelClick
|
---|
| 76 | end
|
---|
| 77 | object calMonth: TMonthCalendar
|
---|
| 78 | Left = 8
|
---|
| 79 | Top = 5
|
---|
| 80 | Width = 190
|
---|
| 81 | Height = 153
|
---|
| 82 | CalColors.TitleBackColor = clBtnFace
|
---|
| 83 | CalColors.TitleTextColor = clBtnText
|
---|
| 84 | CalColors.MonthBackColor = clWindow
|
---|
| 85 | CalColors.TrailingTextColor = clGrayText
|
---|
[460] | 86 | Date = 36507.6194967361
|
---|
[459] | 87 | ShowTodayCircle = False
|
---|
| 88 | TabOrder = 4
|
---|
| 89 | TabStop = True
|
---|
| 90 | OnClick = calMonthClick
|
---|
| 91 | OnKeyDown = calMonthKeyDown
|
---|
| 92 | end
|
---|
| 93 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.