[Agasfer2010]

Что-то вроде этого надо было? Тут ещё и более хорошее расширение фенкционала есть, но оно для вашей программы не будет нужно. Если уж так, для расширения кругозора) http://secretmail.delphiexpert.ru/flyshape.html