procedure TForm1.Button1Click(Sender: TObject);
begin
  Screen.DrawAnimatedRects(Handle, 3, Rect(Width-20, Height, Width-10, Height), BoundsRect);
end;
Tento článok pridal igo dňa 19.05.2003 o 00:00. Je zaradený v kategóriách Delphi a má priradené tagy , , . Ak chcete, môžete reagovať na tento článok. Sledovať reakcie na tento článok môžete aj pomocou RSS 2.0.