Не работает StretchBlt

[burik]

Помогите люди добрые, уже мозги совсем не варят.. (а завтра в школу )
Вообщем есть у меня контрол (самописный). Надо на нем слева нарисовать плюсик. Делаю PictureBox с картинкой (точнее с двумя: минус и плюс). Картинки квадратные (135x135).
Объявление функции:

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


Public Declare Function StretchBlt Lib "gdi32.dll" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal hSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long
Public Const SRCCOPY = &HCC0020

Это в модуле.

Вот использование:

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


Retval = StretchBlt(hdc, 50, mtop + 470, 135, 135, picPM.hdc, 0, 0, 135, 135, SRCCOPY)

Функция возвращает 1, но "плюсика" я за полчаса долбания над прогой не увидел.

[dr.MIG]

Что есть hdc? Куда ты рисуешь?
В любом случае, что-то подсказывает мне что для ЭТОГО у тебя установлено свойство AutoRedraw=True, а надо False...

[burik]

AutoRedraw = False
Рисую в UserControl. Написал UserControl.hdc (если тебя это так беспокоит), но результат тот же.

[dr.MIG]

Ещё мне не нравится mtop+470... У меня твой пример работает прекрасно, только вместо mtop+470 я ставил 0. А вообще, показывай тогда всё, вдруг там кто-то этот контрол перерисовывает...

[burik]

Все решилось. Не могу понять что там было, но так как кода было немного, я его просто переписал и все заработало.