hicon to bitmap

[pavellyba]

как преобразовать переменную hicon в bitmap?

[waleri]

Берем HDC, создаем HBITMAP с нужными размерами,
SelectObject(hDC, hBitmap)
DrawIcon(hDC, hIcon)

Вопрос только - а зачем?

[Nuklon]

//HICON icon
ICONINFO info = {0};
GetObject(icon, sizeof(ICONINFO), (LPVOID)&info);

info. здесь получишь маску, цвета и размер иконки по x,y

[Exception]

Я написал себе такую функцию. Не идеал конечно. Но для моего приложения самое то.

function CreateBitmapFromIcon(const himi: HICON; dwBitCount: DWORD): HBITMAP;
var
  bRet   : Boolean;
  imgInfo: TIconInfo;
  biSize : TSize;
  hdcIn  : HDC;
  hdcMem : HDC;
  hbmMem : HBITMAP;
  hbmOld : HBITMAP;
  bmi    : TBitmapInfo;
  bmBits : PRGBQuad;
begin

  Result := 0;

  bRet := GetIconInfo(himi, imgInfo);
  if bRet then
  try

    biSize.cx := imgInfo.xHotspot * 2;
    biSize.cy := imgInfo.yHotspot * 2;

    hdcIn := GetDC(0);
    if (hdcIn <> 0) then
    try

     hdcMem := CreateCompatibleDC(hdcIn);
     if (hdcMem <> 0) then
     try

       ZeroMemory(@bmi, SizeOf(TBitmapInfo));

       bmi.bmiHeader.biSize        := SizeOf(bmi.bmiHeader);
       bmi.bmiHeader.biWidth       := biSize.cx;
       bmi.bmiHeader.biHeight      := -biSize.cy;
       bmi.bmiHeader.biPlanes      := 1;
       bmi.bmiHeader.biBitCount    := dwBitCount;
       bmi.bmiHeader.biCompression := BI_RGB;

       hbmMem := CreateDIBSection(hdcIn, bmi, DIB_RGB_COLORS, Pointer(bmBits), 0, 0);
       if (hbmMem <> 0) then
       try

         hbmOld := SelectObject(hdcMem, hbmMem);
         if (hbmOld <> 0) then
         try

           DrawIconEx(hdcMem, 0, 0, himi, biSize.cx, biSize.cy, 0, 0, DI_NORMAL);

           Result := hbmMem;

         finally
           SelectObject(hdcMem, hbmOld);
         end;

       finally
       end;

     finally
       DeleteDC(hdcMem);
     end;

    finally
      ReleaseDC(0, hdcIn);
    end;

  finally
    if (imgInfo.hbmColor <> 0) then
      DeleteObject(imgInfo.hbmColor);
    if (imgInfo.hbmMask <> 0) then
      DeleteObject(imgInfo.hbmMask);
  end;

end;