source: cprs/branches/foia-cprs/CPRS-Chart/Consults/fConsultBS.dfm@ 1154

Last change on this file since 1154 was 459, checked in by Kevin Toppenberg, 16 years ago

Adding foia-cprs branch

File size: 2.2 KB
RevLine 
[459]1object frmConsultsByService: TfrmConsultsByService
2 Left = 339
3 Top = 175
4 Width = 328
5 Height = 412
6 BorderIcons = []
7 Caption = 'List Consults by Service'
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 = True
15 Position = poScreenCenter
16 PixelsPerInch = 96
17 TextHeight = 13
18 object pnlBase: TORAutoPanel
19 Left = 0
20 Top = 0
21 Width = 320
22 Height = 385
23 Align = alClient
24 BevelOuter = bvNone
25 TabOrder = 0
26 object lblService: TLabel
27 Left = 8
28 Top = 8
29 Width = 36
30 Height = 13
31 Caption = 'Service'
32 end
33 object radSort: TRadioGroup
34 Left = 52
35 Top = 289
36 Width = 212
37 Height = 49
38 Caption = 'Sort Order'
39 Items.Strings = (
40 '&Ascending (A-Z)'
41 '&Descending (Z-A)')
42 TabOrder = 2
43 end
44 object cmdOK: TButton
45 Left = 70
46 Top = 350
47 Width = 72
48 Height = 21
49 Caption = 'OK'
50 Default = True
51 TabOrder = 3
52 OnClick = cmdOKClick
53 end
54 object cmdCancel: TButton
55 Left = 157
56 Top = 350
57 Width = 72
58 Height = 21
59 Cancel = True
60 Caption = 'Cancel'
61 TabOrder = 4
62 OnClick = cmdCancelClick
63 end
64 object treService: TORTreeView
65 Left = 7
66 Top = 57
67 Width = 305
68 Height = 225
69 HideSelection = False
70 Indent = 19
71 ReadOnly = True
72 TabOrder = 1
73 OnChange = treServiceChange
74 Caption = 'Service'
75 NodePiece = 0
76 end
77 object cboService: TORComboBox
78 Left = 8
79 Top = 28
80 Width = 305
81 Height = 21
82 Style = orcsDropDown
83 AutoSelect = True
84 Caption = 'Service'
85 Color = clWindow
86 DropDownCount = 8
87 ItemHeight = 13
88 ItemTipColor = clWindow
89 ItemTipEnable = True
90 ListItemsOnly = True
91 LongList = False
92 MaxLength = 0
93 Pieces = '2'
94 Sorted = True
95 SynonymChars = '<>'
96 TabOrder = 0
97 OnKeyPause = cboServiceSelect
98 OnMouseClick = cboServiceSelect
99 end
100 end
101end
Note: See TracBrowser for help on using the repository browser.