Фрагмент на C++

[ism]

Кто знает как можно перевести это на VB. Просто незнаю как из Long, корорый возвращается LockResource получается Byte

Код: Выделить всё

BYTE *lpResource;
...
lpResource = LockResource(hMem);
nID = LookupIconIdFromDirectoryEx((PBYTE) lpResource, TRUE,
    CXICON, CYICON, LR_DEFAULTCOLOR);

[GSerg]

А Byte и не получается. Получается BYTE*, а это разные вещи...

Код: Выделить всё

dim lpResource as long
...
lpResource = LockResource(hMem)
nID = LookupIconIdFromDirectoryEx(lpResource, 1, CXICON, CYICON, LR_DEFAULTCOLOR)

[ism]

Не, ты меня неправильно понял, просто LookupIconIdFromDirectoryEx тоже Byte, а LockResource возвращает Long

... LookupIconIdFromDirectoryEx Lib "user32" Alias "LookupIconIdFromDirectoryEx" (presbits As Byte, ...

Конечно этот первый байт можно с помощью CopyMemory получить, но я думаю врятли апи нужен только первый байт

[tyomitch]

ism, обрати внимание, что в объявлении ByVal нету. Значит, передаётся адрес байта.
Переобъяви по-нормальному и сделай, как говорит GSerg. Он тебя понял правильно