Как перевести картинку в иконку

Мне интересно, можно ли на дельфе перевести TBitmap в TIcon, И если да, то как?

Пока на собственное сообщение не было ответов, его можно удалить.

Заголовок: