Thema: Delphi Rave- Fehlermeldung

Einzelnen Beitrag anzeigen

merlin17

Registriert seit: 15. Dez 2002
Ort: Mittelfranken
980 Beiträge
 
Delphi 10 Seattle Enterprise
 
#10

Re: Rave- Fehlermeldung

  Alt 2. Feb 2006, 13:24
hmmmm, durch das load wird die rav einfach als raveBlob im Formular persistent gespeichert;
wenn Du es dynamisch willst, schau dir einmal Nr. 2.4.1 aus dem RaveFAQ (seit Rave6 in der RaveDevGuide.pdf)
an:

Zitat:
2.4.1 How to Deploy
QUESTION:
How can I deploy my Rave-Reports?
ANSWER:
There are several ways to store / deliver your reports:
1. Use the external RAV-file. Requires that you define it in the TRaveProject-component.
Delphi-Quellcode:
RvProject1.ProjectFile := ExtractFilePath(Application.ExeName) +
'Project1.rav';
RvProject1.Open;
Be alert that if you select the RAV-file in the Delphi-IDE, then Delphi will store the complete
path information including the developer folder. Normally, the User will not have the same
folder structure and that will result in an error that your application can not find the RAV file.
2. Store the RAV file directly in your EXE application (only one file to distribute).
Go to your RvProject component and select the "StoreRav" property. Click on the ellipse
(3dots) and point to your RAV file. Remember to use the "Load" and "Save" buttons
whenever you have made changes to the RAV file.
NOTE: with Rave 5.0.4 or earlier, the form that contains the RvProject must NOT be set to
"text" format. To change it, go to the form that contains the RvProject-component.
Right-click on the form and be sure that the Delphi DFM format is not set as "Text Format".
3. Store the Rave-file inside a Resource-file, BLOB-Field or in a DLL like the following:
Delphi-Quellcode:
Var
TP_res : TResourceStream; (or all the other ways)
Begin
TP_res := TResourceStream.create(Hinstance,'mein_report','RAVE');
If (res = NIL) Then Begin
MessageDlg("There is a problem, please call the developer g>…..',
mtError, [mbok],0);
exit;
End;
RvProject1.New;
RvProject1.LoadFromStream(TP_res);
RvProject1.SelectReport(
'Invoice',false);
RvProject1.Execute; // or ExecuteReport….
RvProject1.Close;
TP_res.Free; // the pre-.net Garbage Collector <g>
End;

thomas, TeamNevrona
- TeamNevrona cannot respond to questions received via email -
http://rave-notes.blogspot.com
  Mit Zitat antworten Zitat