source: cprs/branches/foia-cprs/CPRS-Chart/Consults/fConsultBD.dfm@ 1119

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

Adding foia-cprs branch

File size: 1.9 KB
RevLine 
[459]1object frmConsultsByDate: TfrmConsultsByDate
2 Left = 372
3 Top = 217
4 Width = 259
5 Height = 178
6 BorderIcons = []
7 Caption = 'List Consults by Date Range'
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 = 251
22 Height = 151
23 Align = alClient
24 BevelOuter = bvNone
25 TabOrder = 0
26 object lblBeginDate: TLabel
27 Left = 8
28 Top = 8
29 Width = 73
30 Height = 13
31 Caption = 'Beginning Date'
32 end
33 object lblEndDate: TLabel
34 Left = 8
35 Top = 51
36 Width = 59
37 Height = 13
38 Caption = 'Ending Date'
39 end
40 object calBeginDate: TORDateBox
41 Left = 8
42 Top = 22
43 Width = 155
44 Height = 21
45 TabOrder = 0
46 DateOnly = False
47 RequireTime = False
48 Caption = 'Beginning Date'
49 end
50 object calEndDate: TORDateBox
51 Left = 8
52 Top = 65
53 Width = 155
54 Height = 21
55 TabOrder = 1
56 DateOnly = False
57 RequireTime = False
58 Caption = 'Ending Date'
59 end
60 object radSort: TRadioGroup
61 Left = 8
62 Top = 94
63 Width = 155
64 Height = 49
65 Caption = 'Sort Order'
66 Items.Strings = (
67 '&Ascending (oldest first)'
68 '&Descending (newest first)')
69 TabOrder = 2
70 end
71 object cmdOK: TButton
72 Left = 171
73 Top = 95
74 Width = 72
75 Height = 21
76 Caption = 'OK'
77 Default = True
78 TabOrder = 3
79 OnClick = cmdOKClick
80 end
81 object cmdCancel: TButton
82 Left = 171
83 Top = 122
84 Width = 72
85 Height = 21
86 Cancel = True
87 Caption = 'Cancel'
88 TabOrder = 4
89 OnClick = cmdCancelClick
90 end
91 end
92end
Note: See TracBrowser for help on using the repository browser.