Einzelnen Beitrag anzeigen

Benutzerbild von alphaflight83
alphaflight83

Registriert seit: 5. Jun 2008
Ort: Würzburg
148 Beiträge
 
Delphi 12 Athens
 
#2

AW: RaveReport V7.7.0 (deutsche Dialoge)

  Alt 8. Jun 2010, 12:28
Schau mal in den verlinkten Beitrag in Thomas Pfisters Blog ob dir das weiterhilft, da ist das ZIP-file aus den alten Nevrona Tipps angehängt.
Im 2ten Link ist auch noch ein Beispiel zum Renderpreview angehängt, das sollte auch recht interessant sein.
(Edit: Beide jetzt auch im Anhang)
Wie das mit Delphi 2010 zusammenspielt weiß ich nicht, mit 2009 gehts nach kleinen Anpassungen ganz gut.

Edit: Bevor die Nevrona Tipps irgendwann nicht mehr abrufbar sind stell ich Tipp #72 mal hier rein:

--------------------------------------------

Category
Rave - General
Question
How can I change the setup-dialogbox in an other look or in an other language, for example german ?
Solution
In Rave 5 exist a standard setup-form. Many users, especially in "non"-english countries, would localize this dialog.
Normally the Printsetup Form is displayed when executing the report to allow the user to select the report destination and other settings (copies, file format to use).
Copy the rpFormSetup.pas- and rpFormSetup.dfm-file in the project folder and change the filenames and the unit-name inside the pas-file and the form-name.
For example, in dtFormSetup (dt is the abbreviation of "deutsch"- german).

Sample Files: rave_dtformsetup.zip (Siehe Link oben oder Anhang)

Add dtFormSetup to the uses statement in the project. Make visual changes and localization to the form and save it.
Connect the RvSystem component with the RvProject component.

Select the RvSystem component and create the OverrideSetup event and enter the following code:
Delphi-Quellcode:
procedure TForm1.RvSystem1OverrideSetup(ReportSystem: TRvSystem;
OverrideMode: TOverrideMode; var OverrideForm: TForm);
begin
  case OverrideMode of
    omCreate:
      begin
        OverrideForm := TdtSetupForm.Create(nil);
        OverrideForm.Caption := RvSystem1.TitleSetup;
        (OverrideForm as TdtSetupForm).ReportSystem := ReportSystem;
      end;
    omShow:
      begin
        with OverrideForm as TdtSetupForm, ReportSystem do
        begin
          PreviewSetup := False;
          Aborted := ShowModal = mrCancel;
        end;
      end;
    omWait:
      begin
        {because showModal: no wait necessary!}
      end;
    omFree:
      begin
        OverrideForm.Free;
      end;
  end;
end;
Compile and run any of the reports, your special Setup Form should be displayed when you execute a rave-report.
-> this way doesn't override your setupform on a rave-update, too.

Tip created by Thomas Pfister

--------------------------------------------

Im Anhang die besagten ZIPs
Angehängte Dateien
Dateityp: zip rave_dtformsetup.zip (10,8 KB, 81x aufgerufen)
Dateityp: zip render_preview.zip (654,5 KB, 41x aufgerufen)
Make me a sandwich! - What? Make it yourself. - Sudo make me a sandwich! - Okay

Geändert von alphaflight83 ( 9. Jun 2010 um 09:00 Uhr) Grund: Code-Tag durch Delphi-Tag ersetzt
  Mit Zitat antworten Zitat