Einzelnen Beitrag anzeigen

Benutzerbild von alphaflight83
alphaflight83

Registriert seit: 5. Jun 2008
Ort: Würzburg
147 Beiträge
 
Delphi 10.4 Sydney
 
#5

Re: Rave Programm hängt beim beenden

  Alt 7. Apr 2009, 13:04
Hatte nun den Umstieg auf Rave 7.6
Doch auch nach Umstieg und dem Patch auf 7.6.2 besteht nach wie vor dieses Problem.
Sobald ich ein Rave Report mit Datenbankzugriff öffne, kann ich im Nachhinein mein Programm nicht mehr schließen.
Im gegensatz zu Delphi 7 sehe ich nun aber auch noch mein Mainfenster und nicht nur den Taskleisteneintrag.
Hab mir schon beinahe nen Wolf gesucht, aber bisher immer noch keine Lösung gefunden.
Falls jemand dieses Problem mittlerweile gelöst hat, oder es einfach nur ein Bedienungsfehler ist,
wäre ich um jeden Tipp oder Workaround dankbar.

Der Aufruf sieht folgendermaßen aus:
Delphi-Quellcode:
(*******************************
** Procedure: Print_MenuClick **
*******************************)

procedure TForm_ACS_Module.Print_MenuClick(Sender: TObject);
var
  // AccessData : TRvDataSetConnection;
  Form_RavePreview : TForm_RavePreview;
begin

  // AccessData := TRvDataSetConnection.Create(Form_ACS_Module);
  // AccessData.DataSet := DataModule1.ADOQueryACSHistory;

  Form_RavePreview := TForm_RavePreview.Create(Form_ACS_Module);
  Form_RavePreview.RvProject.ProjectFile := (AP_Path + '\DATA\REPORT\ACS_List.rav');

  Form_RavePreview.RvSystem.TitlePreview := st_RV_Preview; // i18n String
  Form_RavePreview.RvSystem.SystemPreview.FormState := wsMaximized;

  with Form_RavePreview.RvProject do begin
    Open;
    try
      SetParam('Status_Left', st_Menu_Filter + ': '+ SelectionString);
      SetParam('Status_Center', st_Printdate + ': '+ DateTimeToStr(Now));
     
      // Execute;
      ExecuteReport('Report1');
    finally
      Close;
      // AccessData.Destroy;
    end;
  end;
  // FreeAndNil(Form_RavePreview);
end;
Alle Kommentare waren verschiedenste Versuche.
Die TRvDataSetConnection wird im momentanen Stadium auf dem ausgehenden Form statisch erstellt.
Mit der dynamischen Erstellung hat sich das ganze beim Erstellen der Vorschau aufgehängt.
TForm_RavePreview ist nach einem irgendwann mal geposteten Beispiel zur Preview-Selbstgestaltung von merlin gestaltet.
(Nach Nevrona Tipp 72 war das glaub ich)

Wäre schön, wenn jemand helfen könnte.

Grüße
Make me a sandwich! - What? Make it yourself. - Sudo make me a sandwich! - Okay
  Mit Zitat antworten Zitat