Wie lösch ich eine Bitmap aus einer Paintbox??

[legalex]

hab hier nen timer... der soll in jedem intervall eine bitmap erstellen und dann wieder löschen... die bitmap soll sich also mit der zeit in der paintbox nach unten bewegen.. das problem ist halt nur das ich die bitmaps nicht gelöscht kriege

toms antwort funktioniert nicht... da werden dann überhaupt keine bitmaps mehr angezeigt!

Bemerkung: TetrisBox ist die Paintbox

Delphi-Quellcode:

procedure TForm1.TimerTimer(Sender: TObject);
begin
Brix4 := TBitmap.Create;
Brix4.LoadFromFile(Random_Parts);
Tetrisbox.Canvas.Draw(240,y,brix4);
y:=y+30;
Brix4.Canvas.FillRect(clientrect);
//TetrisBox.Canvas.FillRect(TetrisBox.ClientRect);
if y >= 400 then
  Timer.Enabled := False;
end;