Jak umístit ProgressBar na StatusBar

Standardní komponenta StatusBar není příliš přívětivá při pokusu umístit na ni jiné komponenty. Dalo by se říct, že se na ni běžným způsobem nedá umístit v podstatě nic (hovořím o komponentě, která je součástí Delphi 5; nevím, jak to vypadá v nové verzi). Ukážeme si, jak na ni "umístit" komponentu ProgressBar. No, vlastně se nejedná tak docela o umístění v pravém slova smyslu, spíše překryjeme StatusBar komponentou ProgressBar.