| 
            Last change
 on this file since 1581 was             460, checked in by Kevin Toppenberg, 17 years ago           | 
        
        
          | 
             
Uploading from OR_30_258 
 
           | 
        
        
          | 
            File size:
            2.0 KB
           | 
        
      
      
| Line |   | 
|---|
| 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
 | 
|---|
| 86 |     Date = 36507.6194967361
 | 
|---|
| 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.