Hallo,
achso, das meinst Du, das hab ich auch so eingebaut, damit die Ansicht einheitlich und ruhiger bleibt.
Wo soll beim horizontalen Scrollen der Monat ausgegeben werden?
so sieht es
imho besser aus:
Die Ausgabe des Monats passiert in dem Codestückchen:
Delphi-Quellcode:
if aTag in [15..20] then
Canvas.TextOut(R.Left+2-((aTag-15)*17),R.Top+2,LongMonthNames[aMonat]);
Immer wenn eine Zelle oberhalb der Tage 15. bis 20. des jeweiligen Monats gezeichnet werden muss, wird der Monat über diesen Zellenbereich ausgegeben. Wenn man die Bedingung und den Ausgabebereich bezogen auf LeftCol variabel hält, ist jede denkbare Ausgabeart möglich.
