| 
            Last change
 on this file since 920 was             460, checked in by Kevin Toppenberg, 17 years ago           | 
        
        
          | 
             
Uploading from OR_30_258 
 
           | 
        
        
          | 
            File size:
            1.1 KB
           | 
        
      
      
| Line |   | 
|---|
| 1 | object frmPtSelMsg: TfrmPtSelMsg
 | 
|---|
| 2 |   Left = 375
 | 
|---|
| 3 |   Top = 421
 | 
|---|
| 4 |   Width = 375
 | 
|---|
| 5 |   Height = 174
 | 
|---|
| 6 |   Caption = 'Patient Lookup Messages'
 | 
|---|
| 7 |   Color = clBtnFace
 | 
|---|
| 8 |   Font.Charset = DEFAULT_CHARSET
 | 
|---|
| 9 |   Font.Color = clWindowText
 | 
|---|
| 10 |   Font.Height = -11
 | 
|---|
| 11 |   Font.Name = 'MS Sans Serif'
 | 
|---|
| 12 |   Font.Style = []
 | 
|---|
| 13 |   FormStyle = fsStayOnTop
 | 
|---|
| 14 |   OldCreateOrder = False
 | 
|---|
| 15 |   Position = poScreenCenter
 | 
|---|
| 16 |   OnClose = FormClose
 | 
|---|
| 17 |   OnCreate = FormCreate
 | 
|---|
| 18 |   OnDestroy = FormDestroy
 | 
|---|
| 19 |   DesignSize = (
 | 
|---|
| 20 |     367
 | 
|---|
| 21 |     140)
 | 
|---|
| 22 |   PixelsPerInch = 96
 | 
|---|
| 23 |   TextHeight = 13
 | 
|---|
| 24 |   object cmdClose: TButton
 | 
|---|
| 25 |     Left = 158
 | 
|---|
| 26 |     Top = 114
 | 
|---|
| 27 |     Width = 60
 | 
|---|
| 28 |     Height = 21
 | 
|---|
| 29 |     Anchors = [akLeft, akRight, akBottom]
 | 
|---|
| 30 |     Cancel = True
 | 
|---|
| 31 |     Caption = 'Close'
 | 
|---|
| 32 |     Default = True
 | 
|---|
| 33 |     TabOrder = 0
 | 
|---|
| 34 |     OnClick = cmdCloseClick
 | 
|---|
| 35 |   end
 | 
|---|
| 36 |   object memMessages: TRichEdit
 | 
|---|
| 37 |     Left = 0
 | 
|---|
| 38 |     Top = 0
 | 
|---|
| 39 |     Width = 367
 | 
|---|
| 40 |     Height = 107
 | 
|---|
| 41 |     Anchors = [akLeft, akTop, akRight, akBottom]
 | 
|---|
| 42 |     Color = clCream
 | 
|---|
| 43 |     ReadOnly = True
 | 
|---|
| 44 |     ScrollBars = ssVertical
 | 
|---|
| 45 |     TabOrder = 1
 | 
|---|
| 46 |     WantReturns = False
 | 
|---|
| 47 |   end
 | 
|---|
| 48 |   object timClose: TTimer
 | 
|---|
| 49 |     OnTimer = timCloseTimer
 | 
|---|
| 50 |     Left = 6
 | 
|---|
| 51 |     Top = 126
 | 
|---|
| 52 |   end
 | 
|---|
| 53 | end
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.