OpenGL на Delphi

Есть допустим брусок 40 на 20 на 10 мм (рисунок 1). В нем делается отверстие диаметром 6 мм, только не на всю глубину, а на 5 мм (рисунок 2). Дальше идет анимация процесса обработки (таймером, хотя задумано будет исчезновение материала в зависимости от координат, считываемых из RichEdit). Направление указано зелеными стрелками (рисунок 3). В итоге получается вырезанный паз на глубине 5 мм при общей толщине 10 мм (рисунок 4). На рисунке 5 представлен альтернативный способ обработки, только обработка на всю глубину,чтобы при вырезании паза, ненужная часть которая остается в середине, просто отвалилалсь (исчезла).

Нужно сделать на OpenGL на Delphi.

Рисунки в прилагаемом архиве.