Stundenpläne nicht druckbar

[CReinhardt]

Ich erhalte mit der Version 3.80.8.407 (zentraler Server Köln) die Fehlermeldung ReportBeforePrint konnte nicht ausgeführt werden. Fehler beim Lesen von frmDateTime.Color: Eigenschaft Color existiert nicht.
Ich würde gerne das Formular so ändern, dass der Fehler verschwindet; ich weiß aber nicht, wo die Eigenschaft eine Rolle spielt. Vielleicht kann mir jemand auf die Schnelle sage, was ich im Code ändern muss.
Subreport:
procedure DetailBeforePrint;
begin
if IndividualPlan1['Tag'] = 0 then begin
Region3.Visible:=True;
Region2.Visible:=false;
end else begin
Region3.Visible:=false;
Region2.Visible:=true;
end;
end;
------
Main:
procedure ReportBeforePrint;
var
T1,T2, D : TDateTime;
begin
ReadDateTime('Stundenplan gültig ab', D, T1, T2, False);
Label4.caption:=DateToStr(D);
Label8.Caption:=TimeToStr(T1);
end;
Main:

[Falko Müller]

Hallo,
es gibt in der Version offenbar Probleme mit dem Befehl ReadDateTime (siehe hier: viewtopic.php?f=27&t=4424).
Kommentieren Sie die Zeile aus und setzen Sie in den nächsen beiden Zeilen manuell Datum und Uhrzeit ein, dann sollte es klappen:

Main:
procedure ReportBeforePrint;
var
T1,T2, D : TDateTime;
begin
//ReadDateTime('Stundenplan gültig ab', D, T1, T2, False);
Label4.caption:='10.08.2022';
Label8.Caption:='8:00';
end;

[CReinhardt]

DANKE! Hat wunderbar geklappt.