А я то причём, я когда компонент ентот написал, он работал корректно, а вот с портированием под FPC стал вот так неправильно, ИМХО...