Update des Fensters für eine Zeit unterbinden

[loirad]

Da fliegt mir ne Exception um die Ohren, wenn ich es so mache:

Delphi-Quellcode:

for i:=0 to length(Tage)-1 do
  begin
   [B]Tage[i].Items.BeginUpdate;[/B]
   Tage[i]:=TListbox.Create(Kalender);
   Tage[i].Parent:=Kalender;
   Tage[i].Width:=Kalender.DefaultColWidth;
   Tage[i].Height:=Kalender.DefaultRowHeight;
   Tage[i].Left:=((i+Wochentag-1) mod 7)*(Kalender.DefaultColWidth+1);
   Tage[i].Top:=((i+Wochentag-1) div 7)*(Kalender.DefaultRowHeight+1)+40;
   Tage[i].Style:=lbOwnerDrawFixed;
   Tage[i].Font.Size:=10;
   Tage[i].Items.Add(Zentriere(inttostr(i+1)+'.'+inttostr(m)+'.'+inttostr(y),Tage[i].ClientWidth,
   Tage[i].Font));
   [B]Tage[i].Items.EndUpdate;[/B]
  end;

Tage ist ein array of TListBox!

Vielen Dank für weitere und gegebene Lösungen

PS.: Bei der Lösung von Zacherl fliegt die gleiche Exception!