Produced by Araxis Merge on 1/31/2019 1:51:40 PM Central Standard Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.
| # | Location | File | Last Modified |
|---|---|---|---|
| 1 | CPRS v31b Phase 2 T257 CiF Submission..zip\CPRS v31b Phase 2 T257 CiF Submission\OR_30_377V257_src\Cover Sheet | mCoverSheetDisplayPanel.pas | Thu Nov 15 18:27:48 2018 UTC |
| 2 | CPRS v31b Phase 2 T257 CiF Submission.zip\CPRS v31b Phase 2 T257 CiF Submission\OR_30_377V257_src\Cover Sheet | mCoverSheetDisplayPanel.pas | Tue Jan 29 15:30:06 2019 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 226 |
| Changed | 1 | 2 |
| Inserted | 0 | 0 |
| Removed | 0 | 0 |
| Whitespace | |
|---|---|
| Character case | Differences in character case are significant |
| Line endings | Differences in line endings (CR and LF characters) are ignored |
| CR/LF characters | Not shown in the comparison detail |
No regular expressions were active.
| 1 | unit mCove rSheetDisp layPanel; | |
| 2 | { | |
| 3 | ======== ========== ========== ========== ========== ========== ========== ========== == | |
| 4 | * | |
| 5 | * Applicatio n: CPRS - CoverShee t | |
| 6 | * Developer: PII | |
| 7 | * Site: Salt L ake City I SC | |
| 8 | * Date: 2015-1 2-04 | |
| 9 | * | |
| 10 | * Descriptio n: Inheri ted from T fraGridPan elFrame. T his displa y panel | |
| 11 | * provid es the min imum funct ionality f or display ing anythi ng | |
| 12 | * in the CPRS Cove rSheet. | |
| 13 | * | |
| 14 | * Notes: This f rame is an ancestor object and heavily i nherited f rom. | |
| 15 | * ABSOLU TELY NO CH ANGES SHOU LD BE MADE WITHOUT F IRST | |
| 16 | * CONFER RING WITH THE CPRS D EVELOPMENT TEAM ABOU T POSSIBLE | |
| 17 | * RAMIFI CATIONS WI TH DESCEND ANT FRAMES . | |
| 18 | * | |
| 19 | ======== ========== ========== ========== ========== ========== ========== ========== == | |
| 20 | } | |
| 21 | ||
| 22 | interface | |
| 23 | ||
| 24 | uses | |
| 25 | Winapi.W indows, | |
| 26 | Winapi.M essages, | |
| 27 | System.S ysUtils, | |
| 28 | System.V ariants, | |
| 29 | System.C lasses, | |
| 30 | System.I mageList, | |
| 31 | Vcl.Grap hics, | |
| 32 | Vcl.Cont rols, | |
| 33 | Vcl.Form s, | |
| 34 | Vcl.Dial ogs, | |
| 35 | Vcl.ImgL ist, | |
| 36 | Vcl.Menu s, | |
| 37 | Vcl.Butt ons, | |
| 38 | Vcl.StdC trls, | |
| 39 | Vcl.ExtC trls, | |
| 40 | iGridPan elIntf, | |
| 41 | iCoverSh eetIntf, | |
| 42 | mGridPan elFrame; | |
| 43 | ||
| 44 | type | |
| 45 | TfraCove rSheetDisp layPanel = class(Tfr aGridPanel Frame, ICo verSheetDi splayPanel , ICPRS508 ) | |
| 46 | private | |
| 47 | fParam : ICoverSh eetParam; | |
| 48 | protecte d | |
| 49 | { Prot ected decl arations } | |
| 50 | ||
| 51 | functi on getPara m: ICoverS heetParam; virtual; | |
| 52 | proced ure setPar am(const a Value: ICo verSheetPa ram); virt ual; | |
| 53 | functi on getIsFi nishedLoad ing: boole an; virtua l; | |
| 54 | ||
| 55 | { Intr oduced eve nts } | |
| 56 | proced ure OnClea rPtData(Se nder: TObj ect); virt ual; | |
| 57 | proced ure OnBegi nUpdate(Se nder: TObj ect); virt ual; | |
| 58 | proced ure OnEndU pdate(Send er: TObjec t); virtua l; | |
| 59 | public | |
| 60 | { Publ ic declara tions } | |
| 61 | constr uctor Crea te(aOwner: TComponen t); overri de; | |
| 62 | destru ctor Destr oy; overri de; | |
| 63 | end; | |
| 64 | ||
| 65 | var | |
| 66 | fraCover SheetDispl ayPanel: T fraCoverSh eetDisplay Panel; | |
| 67 | ||
| 68 | implementa tion | |
| 69 | ||
| 70 | {$R *.dfm} | |
| 71 | ||
| 72 | { TfraCove rSheetDisp layPanel } | |
| 73 | ||
| 74 | constructo r TfraCove rSheetDisp layPanel.C reate(aOwn er: TCompo nent); | |
| 75 | begin | |
| 76 | inherite d; | |
| 77 | end; | |
| 78 | ||
| 79 | destructor TfraCover SheetDispl ayPanel.De stroy; | |
| 80 | begin | |
| 81 | inherite d; | |
| 82 | end; | |
| 83 | ||
| 84 | procedure TfraCoverS heetDispla yPanel.OnB eginUpdate (Sender: T Object); | |
| 85 | begin | |
| 86 | // | |
| 87 | end; | |
| 88 | ||
| 89 | procedure TfraCoverS heetDispla yPanel.OnC learPtData (Sender: T Object); | |
| 90 | begin | |
| 91 | // | |
| 92 | end; | |
| 93 | ||
| 94 | procedure TfraCoverS heetDispla yPanel.OnE ndUpdate(S ender: TOb ject); | |
| 95 | begin | |
| 96 | // | |
| 97 | end; | |
| 98 | ||
| 99 | function T fraCoverSh eetDisplay Panel.getI sFinishedL oading: bo olean; | |
| 100 | begin | |
| 101 | Result : = True; | |
| 102 | end; | |
| 103 | ||
| 104 | function T fraCoverSh eetDisplay Panel.getP aram: ICov erSheetPar am; | |
| 105 | begin | |
| 106 | Supports (fParam, I CoverSheet Param, Res ult); | |
| 107 | end; | |
| 108 | ||
| 109 | procedure TfraCoverS heetDispla yPanel.set Param(cons t aValue: ICoverShee tParam); | |
| 110 | begin | |
| 111 | Supports (aValue, I CoverSheet Param, fPa ram); | |
| 112 | end; | |
| 113 | ||
| 114 | end. |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.