Borland C Builder 6. Захват курсора

Тема в разделе "Другие языки", создана пользователем antidote, 2 ноя 2009.

Статус темы:
Закрыта.
Модераторы: Цукер
  1. antidote

    antidote

    Регистр.:
    21 янв 2008
    Сообщения:
    167
    Симпатии:
    42
    Как в Borland C Builder 6 можно получить иконку/битмап курсора мыши? В интернетах нашел пример для Delphi
    Код:
    Icon cursor = Icon.FromHandle(Cursor.Current.Handle);
    g.DrawIcon(cursor, new Rectangle(Cursor.Position, cursor.Size));
    cursor.Dispose();
    
    и С#
    http://www.codeproject.com/KB/cs/DesktopCaptureWithMouse.aspx
    Но в Борланде нет такого метода FromHandle. Ума не приложу что делать. Подскажите, а? Очень надо
     
  2. ZCFD

    ZCFD

    Регистр.:
    16 янв 2008
    Сообщения:
    989
    Симпатии:
    437
    Метод TIcon::LoadFromResourceID загружает иконку из указанного ресурса, определяемого по его идентификатору.
     
    antidote нравится это.
  3. antidote

    antidote

    Регистр.:
    21 янв 2008
    Сообщения:
    167
    Симпатии:
    42
    Все равно не понял. Забил и пошел по аналогии со вторым примером - через API
    Код:
            HICON hico;
            Graphics::TIcon *tico = new Graphics::TIcon;
            ICONINFO *icInfo;
            CURSORINFO *ci = new CURSORINFO();
            ci->cbSize = sizeof(ci);
            hico = CopyIcon(ci->hCursor);
            tico->Handle = hico;
            Canvas->Draw(10,10,tico);
    
    Но не работает!


    UPD. А вот так да))))
    Код:
    CURSORINFO pci;
    pci.cbSize = sizeof(CURSORINFO);
    GetCursorInfo(&pci);
    DrawIcon(GetDC(Form1->Handle), 0, 0, pci.hCursor);
    
     
Статус темы:
Закрыта.