wie Lemmy schon schreibt, das mit der Definition als Konstante könnte das Problem sein.
eine einfache Umbenennung könnte vllt. schon helfen:
Delphi-Quellcode:
const
c_bDebugMode : boolean = false; //***
c_bCaptionMode : boolean = false; //***
.
.
.
constructor tAlReport.Create (AOwner:tComponent);
begin
inherited Create (AOwner);
FOrientation := poPortrait;
FPapersize := alr_A4;
if csDesigning in ComponentState then
UpdateScrollBars
else
with Owner as TForm do begin
HorzScrollBar.Position := 0;
VertScrollBar.Position := 0;
end;
bDebugMode := c_bDebugMode; //***
bCaptionMode := c_bCaptionMode; //***
FLogProc := NIL;
end;