#delphi #rotation #shape
#delphi #вращение #формы
Вопрос:
Я нашел функцию
function RotateBitmap(var hDIB: HGlobal;
radang: Double; clrBack: TColor): Boolean;
это поворачивает изображение. Но я не знаю, как вызвать эту функцию. Какие параметры я могу передать этой функции.
Я вообще не знаю, как использовать эту функцию.
Комментарии:
1. Спасибо Дэвиду. Во-первых, я не знаю этого параметра :
hDIB: HGlobal.2. Это звучит как дескриптор DIB. Но код выполняет для него глобальную блокировку и интерпретирует его как указатель на заголовок bitmap info. Мне это кажется странным. Я бы поискал другую процедуру. Вы уже пробовали graphics32? Я уверен, что это будет сделано очень естественным способом Delphi.
3. этот код работает с дескриптором раздела DIB, а не с TBitmap. Сначала вы должны вызвать GetObject
Ответ №1:
Судя по представленному коду hDIB , это указатель на один блок памяти, содержащий 2 структуры — BitmapInfo и массив пикселей bitmap. Вы можете получить эти структуры с TBitmap помощью GetDIBSizes GetDIB функций и .
Если вас интересуют преобразования растровых изображений, вы можете последовать совету Дэвида и попробовать graphics32