Forum: Win32/Win64 API (native code)
by ConnorMcLeod,
5. Sep 2016
Hallo Tanja,
für deine Frage hätte ich diese Antwort unten ... aber Du könntest Dir auch mal überlegen, Kompenenten selbst abzuleiten.
Ein TDatumsLabel, ein TTagesLabel, ein TKalenderTagesPanel und so weiter. Die bekommen ein zusätzliches Property 'Date' und wenn man ein Datum zuweist, dann richten sie sich selbst darauf ein. Dein TKalender bestünde dann aus TKalenderTagesPanels und der Code...
Forum: Win32/Win64 API (native code)
by ConnorMcLeod,
2. Sep 2016
Vllt mit einer Prozedur, die alles macht und als Parameter die Anzeigeobjekte bekommt...
procedure ProcessOneDay(ADate: TDate; const AWochenTag: string; var ADateLabel: TLabel; var ADayLabel: TLabel; var ACountLabel: TLabel; var AFeld: TPanel??);
begin
ADayLabel.Caption := AWochentag;
if (AWochenTag = 'Sa') or (AWochenTag = 'So') then begin
ADateLabel.Font.Style := ;
...