Рисование иконки в TImage

DrawIcon(Image1.Canvas.Handle, 0, 0, LoadCursor(0, IDC_ARROW));

Другое по теме:

• Как извлечь иконку из файлов ICO
• Создание ICO из BMP
• Анимированная иконка приложения