Changeset 460 for cprs/branches/foia-cprs/CPRS-Chart/fAllgyFind.dfm
- Timestamp:
- Jul 6, 2008, 8:20:14 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/branches/foia-cprs/CPRS-Chart/fAllgyFind.dfm
r459 r460 4 4 BorderIcons = [] 5 5 BorderStyle = bsDialog 6 Caption = 'Allergy Reactant Lookup' 7 ClientHeight = 410 8 ClientWidth = 443 9 FormStyle = fsStayOnTop 6 Caption = 'Causative Agent Lookup' 7 ClientHeight = 472 8 ClientWidth = 445 10 9 Position = poScreenCenter 11 10 OnCreate = FormCreate … … 13 12 TextHeight = 13 14 13 object lblSearch: TLabel 14 Left = 0 15 Top = 0 16 Width = 445 17 Height = 25 18 Align = alTop 19 AutoSize = False 20 Caption = 'Enter causative agent for Allergy or Adverse Drug Reaction:' 21 Font.Charset = DEFAULT_CHARSET 22 Font.Color = clWindowText 23 Font.Height = -11 24 Font.Name = 'MS Sans Serif' 25 Font.Style = [fsBold] 26 ParentFont = False 27 Layout = tlBottom 28 end 29 object lblSelect: TLabel 30 Left = 5 31 Top = 124 32 Width = 152 33 Height = 13 34 Caption = 'Select one of the following items' 35 Visible = False 36 end 37 object lblDetail: TLabel 38 Left = 0 39 Top = 25 40 Width = 445 41 Height = 39 42 Align = alTop 43 AutoSize = False 44 Caption = 45 '(Enter the FIRST FEW LETTERS of the causative agent (minimum of ' + 46 '3) to allow for a comprehensive search. Only one reactant may be' + 47 ' entered at a time)' 48 Layout = tlBottom 49 WordWrap = True 50 end 51 object lblSearchCaption: TLabel 15 52 Left = 6 16 Top = 917 Width = 28253 Top = 73 54 Width = 52 18 55 Height = 13 19 Caption = 'Enter causative agent for Allergy or Adverse Drug Reaction:' 20 end 21 object lblSelect: TLabel 22 Left = 6 23 Top = 67 24 Width = 175 25 Height = 13 26 Caption = 'Select from one of the following items' 27 Visible = False 28 end 29 object Label1: TLabel 30 Left = 6 31 Top = 23 32 Width = 130 33 Height = 13 34 Caption = '(Enter at least 3 characters)' 56 Caption = 'Search for:' 35 57 end 36 58 object txtSearch: TCaptionEdit 37 Left = 538 Top = 3859 Left = 4 60 Top = 88 39 61 Width = 331 40 62 Height = 21 … … 46 68 end 47 69 object cmdSearch: TButton 48 Left = 36 349 Top = 3870 Left = 362 71 Top = 88 50 72 Width = 75 51 73 Height = 21 … … 56 78 end 57 79 object cmdOK: TButton 58 Left = 26 459 Top = 36580 Left = 263 81 Top = 422 60 82 Width = 75 61 83 Height = 22 … … 65 87 end 66 88 object cmdCancel: TButton 67 Left = 34 668 Top = 36589 Left = 345 90 Top = 422 69 91 Width = 75 70 92 Height = 22 … … 76 98 object stsFound: TStatusBar 77 99 Left = 0 78 Top = 39179 Width = 44 3100 Top = 453 101 Width = 445 80 102 Height = 19 81 103 Panels = <> … … 83 105 end 84 106 object ckNoKnownAllergies: TCheckBox 85 Left = 8086 Top = 368107 Left = 320 108 Top = 118 87 109 Width = 119 88 110 Height = 17 … … 92 114 end 93 115 object tvAgent: TORTreeView 94 Left = 395 Top = 81116 Left = 2 117 Top = 138 96 118 Width = 437 97 119 Height = 270 … … 106 128 end 107 129 object imTree: TImageList 108 Left = 39 7109 Top = 93130 Left = 396 131 Top = 150 110 132 Bitmap = { 111 133 494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
Note:
See TracChangeset
for help on using the changeset viewer.