Lazarus canvas.StretchDraw

[BLACK_RAIN]

Здравствуйте.
В событии OnResize формы делаю Panel1.canvas.StretchDraw(r,bmp);
Картинка становится видна на мгновение, после чего сразу заливается сплошным цветом.
Как это можно обойти?
Или как заставить компонент TImage работать в режиме плитки?

[Stilet]

Как это можно обойти?

Рисовать все в OnPaint

как заставить компонент TImage работать в режиме плитки?

Что-то я не пойму, ты про Image говоришь или про Panel?

[BLACK_RAIN]

Сообщение от Stilet

Что-то я не пойму, ты про Image говоришь или про Panel?

Мне надо отобразить картинку в режиме плитки. TImage вроде этого делать не умеет (или умеет?), по-этому приходится юзать panel.canvas.StretchDraw.

[Stilet]

TImage вроде этого делать не умеет (или умеет?)

Неа.

по-этому приходится юзать panel.canvas.StretchDraw.

А DrawGrid попробовать не желаешь? Там плитка

[BLACK_RAIN]

Сообщение от Stilet

А DrawGrid попробовать не желаешь? Там плитка

И как туда битмап запихать? Это же не timage.
Мне надо будет переключаться с плитки на простой вид и обратно. Юзать DrawGrid как-то сомнительно.

[BLACK_RAIN]

спасибо, заюзал OnPaint

[Stilet]

И как туда битмап запихать? Это же не timage.

А не надо ничего никуда засовывать. Делаешь список TComponentList. В него напихиваешь jpeg или bitmap, а в ДравГриде отрисовываешь.

Юзать DrawGrid как-то сомнительно.

Как скажешь )