TExtraDev ERangeError problem (2.52, D5, RB6.03)

rbuser

Hi!

I get a (at least on my system ;-) reproducable ERangeError "range check
error" in TXCrypt.pas in class procedure TPDFEncryption.MD5Decode.

D5 Enterprise SP 2 German Edition
ReportBuilder 6.03 Standard
Windows 2000 Prof. German Edition SP3
TExtraDevices 2.52

Just create a new application, drop a TppReport (set AllowPrintToFile
property to true), a TExtraOptions and a TButton component on the form and
insert the following code in the OnClick event handler of the TButton:

procedure TForm1.Button1Click(Sender: TObject);
begin
ppReport1.Print;
ppReport1.DeviceType := 'RTFFile';
ppReport1.TextFileName := 'Test.RTF';
ppReport1.Print;
ppReport1.DeviceType := 'PDFFile';
ppReport1.TextFileName := 'Test.PDF';
ppReport1.Print;
ppReport1.DeviceType := 'Printer';
end;

Now compile and start the application - the (empty) report prints fine on
the printer, is exported correct to the RTF-file, but throws the above
mentioned error when trying to create the PDF-file.

Can anyone confirm this or - even better - is there a solution?

tia

Greetings from Cologne

Robert

rbuser

This has been reported and I will release a fix for it today.

James Waler
Waler Ltd
http://www.waler.com

rbuser

Hi!