Dynamisch erstellte Labels neu zeichnen...

[Codix32]

Ok, ich habs fast

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 i,idx, tg:Integer;
 MDate:TDatetime;

begin
Panel1.Free;
Panel1:=TPanel.Create(Form1);
Panel1.Parent:=Form1;
Panel1.Left:= 8;
Panel1.top:=24;
Panel1.width:=649;
Panel1.height:=345;
...
...