DELPHI превращение окружности в треугольник посредством анимации, анимация Опции

[leha]

Дана окружность с тремя отмеченными точками на ней. Надо сделать так, чтобы эта окружность превратилась в треугольник
это осуществляется посредством втягивания дуги окружности, образованной между заданными точками,
на первом шаге из дуги должна получится некая синусоида в полтора периода
причем все это должно происходить плавно (анимацией)
затем прогибаем 3 полученные вершины внутрь себя
продолжаем этот процесс до тех пор пока дуги не перейдут в "горбатые" прямые
Нужен алгоритм на Delphi или Pascal(если это возможно)
Заранее Спасибо!