Доработка функции передачи bitmap между процессами

Я только начал изучать Делфи. При написании приложения столкнулся с проблемой передачи битмап между dll(C++) и моей программой (Делфи).

Моя нынешняя реализация дает утечку памяти.

Задача: подправить мой код или прописать свой вариант.

Исходники брошу по запросу.

Спасибо.