source: cprs/branches/foia-cprs/CPRS-Chart/Orders/fODValidateAction.dfm@ 1806

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

Adding foia-cprs branch

File size: 2.9 KB
RevLine 
[459]1object frmInvalidActionList: TfrmInvalidActionList
2 Left = 445
3 Top = 142
4 Width = 534
5 Height = 553
6 Caption = 'Invalidated action orders'
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 OldCreateOrder = False
14 Position = poScreenCenter
15 OnCreate = FormCreate
16 OnResize = FormResize
17 PixelsPerInch = 96
18 TextHeight = 13
19 object pnlTop: TPanel
20 Left = 0
21 Top = 0
22 Width = 526
23 Height = 229
24 Align = alTop
25 TabOrder = 0
26 object Label1: TLabel
27 Left = 1
28 Top = 1
29 Width = 524
30 Height = 24
31 Align = alTop
32 AutoSize = False
33 Caption = 'You can'#39't take this action on the following orders'
34 end
35 object lstActDeniedOrders: TCaptionListBox
36 Left = 1
37 Top = 52
38 Width = 524
39 Height = 176
40 Align = alClient
41 ItemHeight = 16
42 Style = lbOwnerDrawVariable
43 TabOrder = 0
44 OnDrawItem = lstActDeniedOrdersDrawItem
45 OnMeasureItem = lstActDeniedOrdersMeasureItem
46 Caption = 'You can'#39't take this action on the following orders'
47 end
48 object hdrAction: THeaderControl
49 Left = 1
50 Top = 25
51 Width = 524
52 Height = 27
53 DragReorder = False
54 Sections = <
55 item
56 ImageIndex = -1
57 MinWidth = 300
58 Text = 'Order'
59 Width = 350
60 end
61 item
62 ImageIndex = -1
63 MinWidth = 150
64 Text = 'Reason'
65 Width = 150
66 end>
67 OnSectionResize = hdrActionSectionResize
68 end
69 end
70 object pnlBottom: TPanel
71 Left = 0
72 Top = 229
73 Width = 526
74 Height = 256
75 Align = alClient
76 TabOrder = 1
77 object Label2: TLabel
78 Left = 1
79 Top = 1
80 Width = 524
81 Height = 40
82 Align = alTop
83 AutoSize = False
84 Caption = 'The following orders will be taken action:'
85 Font.Charset = DEFAULT_CHARSET
86 Font.Color = clWindowText
87 Font.Height = -11
88 Font.Name = 'MS Sans Serif'
89 Font.Style = []
90 ParentFont = False
91 Layout = tlCenter
92 end
93 object lstValidOrders: TCaptionListBox
94 Left = 1
95 Top = 41
96 Width = 524
97 Height = 214
98 Align = alClient
99 ItemHeight = 16
100 Style = lbOwnerDrawVariable
101 TabOrder = 0
102 OnDrawItem = lstValidOrdersDrawItem
103 OnMeasureItem = lstValidOrdersMeasureItem
104 Caption = 'The following orders will be taken action'
105 end
106 end
107 object Panel1: TPanel
108 Left = 0
109 Top = 485
110 Width = 526
111 Height = 41
112 Align = alBottom
113 TabOrder = 2
114 object btnOK: TButton
115 Left = 440
116 Top = 12
117 Width = 75
118 Height = 21
119 Anchors = [akRight, akBottom]
120 Caption = 'OK'
121 TabOrder = 0
122 OnClick = btnOKClick
123 end
124 end
125end
Note: See TracBrowser for help on using the repository browser.