source: cprs/trunk/CPRS-Chart/mCoPayDesc.pas@ 730

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

Initial Upload of Official WV CPRS 1.0.26.76

File size: 1.9 KB
Line 
1unit mCoPayDesc;
2
3interface
4
5uses
6 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
7 ExtCtrls, StdCtrls, ORCtrls, UBAConst;
8
9type
10 TfraCoPayDesc = class(TFrame)
11 pnlRight: TPanel;
12 lblCaption: TStaticText;
13 pnlSC: TPanel;
14 lblSCDisplay: TLabel;
15 memSCDisplay: TCaptionMemo;
16 Spacer2: TLabel;
17 pnlMain: TPanel;
18 spacer1: TLabel;
19 Panel7: TPanel;
20 lblHNC2: TORStaticText;
21 lblHNC: TORStaticText;
22 Panel8: TPanel;
23 Label12: TORStaticText;
24 Label11: TORStaticText;
25 Panel9: TPanel;
26 Label14: TORStaticText;
27 Label13: TORStaticText;
28 Panel10: TPanel;
29 Label16: TORStaticText;
30 Label15: TORStaticText;
31 Panel11: TPanel;
32 Label18: TORStaticText;
33 Label17: TORStaticText;
34 Panel12: TPanel;
35 Label24: TORStaticText;
36 Label23: TORStaticText;
37 Panel1: TPanel;
38 StaticText4: TORStaticText;
39 StaticText1: TORStaticText;
40 private
41 { Private declarations }
42 public
43 constructor Create(AOwner: TComponent); override;
44 end;
45
46implementation
47
48uses rPCE, UBAGlobals;
49
50{$R *.DFM}
51
52{ TfraCoPayDesc }
53
54constructor TfraCoPayDesc.Create(AOwner: TComponent);
55begin
56 inherited;
57 ListSCDisabilities(memSCDisplay.Lines);
58 Label23.Hint := BAFactorsRec.FBAFactorSC;
59 Label24.Hint := BAFactorsRec.FBAFactorSC;
60 staticText1.Hint := BAFactorsRec.FBAFactorCV;
61 staticText4.Hint := BAFactorsRec.FBAFactorCV;
62 Label17.Hint := BAFactorsRec.FBAFactorAO;
63 Label18.Hint := BAFactorsRec.FBAFactorAO;
64 Label15.Hint := BAFactorsRec.FBAFactorIR;
65 Label16.Hint := BAFactorsRec.FBAFactorIR;
66 Label13.Hint := BAFactorsRec.FBAFactorEC;
67 Label14.Hint := BAFactorsRec.FBAFactorEC;
68 Label11.Hint := BAFactorsRec.FBAFactorMST;
69 Label12.Hint := BAFactorsRec.FBAFactorMST;
70 lblHNC.Hint := BAFactorsRec.FBAFactorHNC;
71 lblHNC2.Hint := BAFactorsRec.FBAFactorHNC;
72
73end;
74
75end.
Note: See TracBrowser for help on using the repository browser.