Readiing reprot from file crashes Printersetup
Hi,
we are printing reports into files in order to print them later-
Saving to a files works great, but reading the report later again
creates an exception
The exception occurs in TppPrinter.UpdateForm on line
if (FPrinterSetup.PDeviceMode <> nil) then
StrPCopy(FPrinterSetup.FPDevMode.dmFormName,
FPrinterSetup.PaperName);
as FPrinterSetup.PDeviceMode is undefined our pointing anyware.
Just catching a raises exceptions works fine, but is not good solution.
The strange thing is, that paperformat is A4/poPortrait but in
TppPrinter.UpdateForm FPrinterSetup.PageDef.mmWidth is 5.334.011 and
not 297.000 as expected, FPrinterSetup.PageDef.mmHeight is 210.000 as
expected;
A sample of a defect report can be provided
--
Hint: We altered the sources!Hint: We altered the sources!
we are printing reports into files in order to print them later-
Saving to a files works great, but reading the report later again
creates an exception
The exception occurs in TppPrinter.UpdateForm on line
if (FPrinterSetup.PDeviceMode <> nil) then
StrPCopy(FPrinterSetup.FPDevMode.dmFormName,
FPrinterSetup.PaperName);
as FPrinterSetup.PDeviceMode is undefined our pointing anyware.
Just catching a raises exceptions works fine, but is not good solution.
The strange thing is, that paperformat is A4/poPortrait but in
TppPrinter.UpdateForm FPrinterSetup.PageDef.mmWidth is 5.334.011 and
not 297.000 as expected, FPrinterSetup.PageDef.mmHeight is 210.000 as
expected;
A sample of a defect report can be provided
--
Hint: We altered the sources!Hint: We altered the sources!
This discussion has been closed.
Comments
There are no known issues such as this and cannot reproduce it here.
If you would like to create a simple example project that I can build and
run here in the debugger I can test it. Please use standard Delphi
components and RB. Copy data to TClientDataSets. Send in zip format -
include only .dpr, .pas, .dfm. Send to support@
Best regards,
-
Nard Moseley
Digital Metaphors
www.digital-metaphors.com
Best regards,
Nard Moseley
Digital Metaphors
www.digital-metaphors.com
on line FPDevMode^.dmPaperWidth := lPaperDimensions.X;
as lPaperDimensions.X is 55340 which is to big for SHORT=SMALLINT
Nard Moseley (Digital Metaphors) legte dieses als Verknüpfung auf
seinen Bildschirm :
--
Hint: We altered the sources!Hint: We altered the sources!
Carsten Eider schrieb am 25.08.2016 :
--
Hint: We altered the sources!Hint: We altered the sources!