Помогите картинку на 90 градусов повернуть через gdiplus

[Pantalone]

Ни у кого образца кода не завалялось?

[Debugger]

Вроде бы можно через PlgBlt:

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

Public Declare Function PlgBlt Lib "gdi32" Alias "PlgBlt" (ByVal hdcDest As Long, lpPoint As POINTAPI, ByVal hdcSrc As Long, ByVal nXSrc As Long, ByVal nYSrc As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hbmMask As Long, ByVal xMask As Long, ByVal yMask As Long) As Long

[Pantalone]

Спасибо, работает.
Получаю повернутую вартинку в пикчабоксе Picture1.
Но картинка получается какая-то непонятная, почему-то не работает Picture2.Picture = Picture1.Picture или Image1.Picture = Picture1.Picture после поворачивания. Т.е. я повернутую картинку никак не могу на другой пикчабокс перетащить стандартным присваиванием.

[Debugger]

Попробуй .Image:

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

Picture2.Image = Picture1.Image

[Pantalone]

Разобрался, спасибо.

[Debugger]

Ой.

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

Picture1.Picture = Picture2.Image

Так?

[Pantalone]

Да.