Hi

I am trying to merely display some previously run reports, saved
in .QRP format. (Using QR V2)

I have done the following:

procedure TMain.OwnDetBtnClick(Sender: TObject);
var RepName: String;
begin
     if Sender = BitBtn1 then RepName := 'OwnDet';
    (some more of this)
end;

with ReportFrm do
     begin
        QR1.Prepare;
        QR1.QRPrinter.Load('Reports\'+RepName+'.QRP');
        QR1.QRPrinter.Preview;
        QR1.QRPrinter.Free;
     end;
end;

which works fine - except the report displays at about 150% size,
and when I click on any of the "size" buttons I get an Access
Violation error.

Patrick suggested that I should be using a QRPreview component
bacause that would let me set a zoom % for display.

Trouble is I can't find any examples of how to use this component
and anything that I have tried just gives me an Access Violation
error.

If anyone has any suggestions based either on the above code or
examples of the use of QRPreview for this sort of purpose, I
would be eternally grateful

TIA

Mark


begin:vcard 
n:Howard;Mark
tel;cell:(021) 477 564
tel;fax:(07) 348 8178
tel;work:(07) 348 8177
x-mozilla-html:FALSE
adr:;;;;;;
version:2.1
email;internet:[EMAIL PROTECTED]
fn:Forest Production Systems Ltd
end:vcard

Reply via email to