| Last change
 on this file since 1137 was             460, checked in by Kevin Toppenberg, 17 years ago | 
        
          | 
Uploading from OR_30_258
 | 
        
          | File size:
            1.1 KB | 
      
      
| Rev | Line |  | 
|---|
| [459] | 1 | object frmPtSelMsg: TfrmPtSelMsg | 
|---|
|  | 2 | Left = 375 | 
|---|
|  | 3 | Top = 421 | 
|---|
|  | 4 | Width = 375 | 
|---|
| [460] | 5 | Height = 174 | 
|---|
| [459] | 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 | 
|---|
| [460] | 21 | 140) | 
|---|
| [459] | 22 | PixelsPerInch = 96 | 
|---|
|  | 23 | TextHeight = 13 | 
|---|
|  | 24 | object cmdClose: TButton | 
|---|
|  | 25 | Left = 158 | 
|---|
| [460] | 26 | Top = 114 | 
|---|
| [459] | 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 | 
|---|
| [460] | 40 | Height = 107 | 
|---|
| [459] | 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.