- Timestamp:
- Aug 12, 2009, 7:14:16 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/branches/tmg-cprs/CPRS-Chart/Consults/fConsult513Prt.pas
r453 r541 195 195 begin 196 196 FReportText.Lines.Assign(GetFormattedSF513(FConsult, ChartCopy)); 197 PrintWindowsReport(FReportText, PAGE_BREAK, Self.Caption, ErrMsg );197 PrintWindowsReport(FReportText, PAGE_BREAK, Self.Caption, ErrMsg, Application); //kt 8/09, Added ',Application' 198 198 if Length(ErrMsg) > 0 then InfoBox(ErrMsg, TX_ERR_CAP, MB_OK); 199 199 end;
Note:
See TracChangeset
for help on using the changeset viewer.