Changeset 686 for cprs/branches/tmg-cprs/CPRS-Chart/Templates
- Timestamp:
- Jan 27, 2010, 12:14:12 PM (15 years ago)
- Location:
- cprs/branches/tmg-cprs/CPRS-Chart/Templates
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/branches/tmg-cprs/CPRS-Chart/Templates/fTemplateDialog.pas
r655 r686 81 81 frmTemplateDialog: TfrmTemplateDialog; 82 82 83 implementation84 85 uses dShared, uConst, uTemplateFields, fRptBox, uInit, rMisc;86 87 {$R *.DFM}88 89 83 const 90 Gap = 4;91 IndentGap = 18;92 84 HTMLBEGINNINGTAG = '{HTML:'; //kt 93 85 HTMLENDINGTAG = '}'; //kt 94 86 HTMLBEGINNINGTAGLEN = length(HTMLBEGINNINGTAG); //kt 95 87 HTMLENDINGTAGLEN = length(HTMLENDINGTAG); //kt 88 89 implementation 90 91 uses dShared, uConst, uTemplateFields, fRptBox, uInit, rMisc; 92 93 {$R *.DFM} 94 95 const 96 Gap = 4; 97 IndentGap = 18; 98 96 99 97 100 -
cprs/branches/tmg-cprs/CPRS-Chart/Templates/uTemplates.pas
r654 r686 1621 1621 FPrintName := Piece(DataString, U, 4); 1622 1622 FExclude := (Piece(DataString, U, 5) = '1'); 1623 FDialog := (Piece(DataString, U, 9) = '1'); 1623 FDialog := (Piece(DataString, U, 9) = '1'); //TEMPLATE //ELH 1624 1624 FDisplayOnly := (Piece(DataString, U, 10) = '1'); 1625 1625 FFirstLine := (Piece(DataString, U, 11) = '1');
Note:
See TracChangeset
for help on using the changeset viewer.