Ignore:
Timestamp:
Jul 6, 2008, 8:20:14 PM (16 years ago)
Author:
Kevin Toppenberg
Message:

Uploading from OR_30_258

File:
1 edited

Legend:

Unmodified
Added
Removed

  • cprs/branches/foia-cprs/CPRS-Chart/fPatientFlagMulti.dfm

    r459 r460  
    11object frmFlags: TfrmFlags
    2   Left = 457
    3   Top = 74
     2  Left = 210
     3  Top = 169
    44  Width = 505
    5   Height = 398
     5  Height = 498
     6  VertScrollBar.Range = 116
     7  AutoScroll = False
    68  Caption = 'Patient Record Flags'
    79  Color = clBtnFace
    … …  
    1517  OnClose = FormClose
    1618  OnCreate = FormCreate
     19  OnDestroy = FormDestroy
    1720  OnKeyDown = FormKeyDown
    1821  OnShow = FormShow
    … …  
    2730    Align = alNone
    2831  end
    29   object Panel1: TPanel
     32  object Splitter2: TSplitter
    3033    Left = 0
    31     Top = 340
     34    Top = 308
    3235    Width = 497
    33     Height = 31
     36    Height = 4
     37    Cursor = crVSplit
    3438    Align = alBottom
    35     TabOrder = 1
    36     DesignSize = (
    37       497
    38       31)
    39     object btnClose: TButton
    40       Left = 410
    41       Top = 5
    42       Width = 77
    43       Height = 21
    44       Anchors = [akRight, akBottom]
    45       Cancel = True
    46       Caption = 'Close'
    47       TabOrder = 0
    48       OnClick = btnCloseClick
    49     end
     39    MinSize = 45
    5040  end
    51   object Panel2: TPanel
     41  object pnlTop: TORAutoPanel
    5242    Left = 0
    5343    Top = 0
    … …  
    5747    Constraints.MinHeight = 40
    5848    Constraints.MinWidth = 300
    59     TabOrder = 2
     49    TabOrder = 0
    6050    object lblFlags: TLabel
    6151      Left = 1
    … …  
    7363      Height = 65
    7464      Align = alClient
    75       Font.Charset = DEFAULT_CHARSET
    76       Font.Color = clWindowText
    77       Font.Height = -11
    78       Font.Name = 'Courier New'
    79       Font.Style = []
    80       ItemHeight = 14
    81       ParentFont = False
     65      ItemHeight = 13
    8266      ParentShowHint = False
    8367      ShowHint = True
    … …  
    9074    end
    9175  end
    92   object memFlags: TCaptionMemo
     76  object memFlags: TRichEdit
    9377    Left = 0
    9478    Top = 80
    9579    Width = 497
    96     Height = 260
     80    Height = 228
    9781    Align = alClient
    98     Font.Charset = DEFAULT_CHARSET
     82    Font.Charset = ANSI_CHARSET
    9983    Font.Color = clWindowText
    10084    Font.Height = -11
    10185    Font.Name = 'Courier New'
    10286    Font.Style = []
     87    HideScrollBars = False
    10388    Lines.Strings = (
    10489      '')
    … …  
    10691    ReadOnly = True
    10792    ScrollBars = ssBoth
    108     TabOrder = 0
     93    TabOrder = 1
    10994    WantReturns = False
    11095    WordWrap = False
    11196  end
     97  object pnlNotes: TPanel
     98    Left = 0
     99    Top = 312
     100    Width = 497
     101    Height = 152
     102    Align = alBottom
     103    TabOrder = 2
     104    object lblNoteTitle: TLabel
     105      Left = 1
     106      Top = 1
     107      Width = 495
     108      Height = 13
     109      Align = alTop
     110      Caption = 'lblNoteTitle'
     111    end
     112    object lvPRF: TCaptionListView
     113      Left = 1
     114      Top = 14
     115      Width = 495
     116      Height = 106
     117      Align = alClient
     118      Columns = <
     119        item
     120          Caption = 'Used For Screen Readers'
     121          Width = 1
     122        end
     123        item
     124          AutoSize = True
     125          Caption = 'Date'
     126        end
     127        item
     128          AutoSize = True
     129          Caption = 'Action'
     130        end
     131        item
     132          AutoSize = True
     133          Caption = 'Author'
     134        end>
     135      Constraints.MinHeight = 50
     136      HideSelection = False
     137      Items.Data = {
     138        6C0000000100000000000000FFFFFFFFFFFFFFFF03000000000000000857414E
     139        44455245521C4F63746F6265722032302C20323030334031303A31353A32333A
     140        3233115245414C4C59204C4F4E47205354554646115069636B6572696E672C20
     141        4D6F726F6E69FFFFFFFFFFFF}
     142      ReadOnly = True
     143      RowSelect = True
     144      TabOrder = 0
     145      ViewStyle = vsReport
     146      OnClick = lvPRFClick
     147      OnKeyDown = lvPRFKeyDown
     148    end
     149    object pnlBottom: TORAutoPanel
     150      Left = 1
     151      Top = 120
     152      Width = 495
     153      Height = 31
     154      Align = alBottom
     155      TabOrder = 1
     156      DesignSize = (
     157        495
     158        31)
     159      object btnClose: TButton
     160        Left = 410
     161        Top = 5
     162        Width = 77
     163        Height = 21
     164        Anchors = [akRight, akBottom]
     165        Cancel = True
     166        Caption = 'Close'
     167        ModalResult = 2
     168        TabOrder = 0
     169      end
     170    end
     171  end
    112172end
Note: See TracChangeset for help on using the changeset viewer.