Forum: Object-Pascal / Delphi-Language
by BerndS,
12. Jul 2022
Was ein Close verhindern könnte ist OnCloseQuery.
Gibt es in dem Form ein OnCloseQuery, dann setze das mal vor dem close auf nil.
TQRStandardPreview(Screen.CustomForms).OnCloseQuery := nil;
TQRStandardPreview(Screen.CustomForms).Close;
Forum: Object-Pascal / Delphi-Language
by BerndS,
12. Jul 2022
Dann vesuch mal den Parent bzw Parentform der Reportvorschau zu schließen.
Forum: Object-Pascal / Delphi-Language
by BerndS,
12. Jul 2022
Wenn du die Klasse kennst bzw TQRStandardPreview verwendest, dann kannst du das mal versuchen:
for i := 0 to Screen.CustomFormCount - 1 do
if (Screen.CustomForms is TQRStandardPreview) then
TQRStandardPreview(Screen.CustomForms).Release; // oder close
Ich hab das nur hingetippt und nicht getestet.