Jetzt hab ich was gan queer. Ich versuche folgenden Code:
Delphi-Quellcode:
if (Source is TLabel) then begin
kalender.Caption := TLabel(Source).Caption;
if PlannerCalendar1.DateAtXY(4, 5, d) then
ShowMessage(PlannerCalendar1.DatesAsText(d));
Aber es geht nicht, ich bekomme die Fehlermeldung "Operator oder Semikolon fehlt"...Normalerweise ist es dann ne einfache Kleinigkeit. Aber ich finde einfach nix....