Пытаюсь нарисовать иконку на канве. Что я не так делаю?

← →
Alexander (2002-05-02 12:25) [0]

FIcon.Handle := ExtractIcon(HInstance, "%SystemRoot%\explorer.exe"{@TempFile}, 0);
BitBlt(Canvas.Handle, 0, 0, 32, 32, FIcon.Handle, 0, 0, SrcCopy);
хотя так вот работает:
FIcon.Handle := ExtractIcon(HInstance, "%SystemRoot%\explorer.exe"{@TempFile}, 0);
Pic := TPicture.Create;
Pic.Icon := FIcon;
Canvas.Draw(0, 0, Pic.Graphic);

← →
Song (2002-05-02 12:36) [1]

Рисуйте иконку через DrawIcon()

← →
SPeller (2002-05-02 13:49) [2]

Первое не работает потому что в BitBlt надо передавать только контексты с которыми осуществляются операции рисования, а ты передаёшь хэндл иконки - манипулятор самого рисунка, а не контекст через которые осуществляется рисование.

← →
Alexander (2002-05-02 14:47) [3]

Спасибо, с DrawIcon заработало.

Пытаюсь нарисовать иконку на канве. Что я не так делаю? Найти похожие ветки