Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

проблема с TImage   Найти похожие ветки 

 
TGrey ©   (2004-05-08 11:21) [0]

Создаю на форме TImage, рисую на его конве квадрат белым цветом, размер квадрата как размер TImage, изменяю размер TImage, опять рисую квадрат по его размерам, но отображается только та часть квадрата которая была нарисована до изменения размера.
Как сделать так, что бы после измения размеров TImage, корректно перерисовывался квадрат?


 
Adil   (2004-05-08 11:27) [1]

Kak menyayesh razmeri?
Image1.width:=???


 
Gero ©   (2004-05-08 11:52) [2]

Image.Bitmap.Canvas


 
Gero ©   (2004-05-08 11:52) [3]

Sorry,
Image.Picture.Bitmap.Canvas


 
KilkennyCat ©   (2004-05-08 11:58) [4]


> Gero ©   (08.05.04 11:52) [3]
> Sorry,
> Image.Picture.Bitmap.Canvas

Ну и?


 
KilkennyCat ©   (2004-05-08 12:25) [5]

После того, как на Image что-то отрисовалось, изменить размер можно только в меньшую сторону (да и это, наверное, некорректно, ИМХО, возможна утечка памяти). В большую сторону менять размер только после того, как очистите содержимое.

Image1.Picture := nil;


 
Семен Сорокин ©   (2004-05-08 13:49) [6]

TGrey ©   (08.05.04 11:21)
Для отрисовки обычно используют перекрытый метод Paint, для рисования на канве же есть специальный TPaintBox. По subj"у - меняй размер канвы битмапа вместе с размерами Image.


 
Семен Сорокин ©   (2004-05-08 13:50) [7]

[6] + для того чтобы поменять размер канвы битмапа надо поменять размер самого битмапа.



Страницы: 1 вся ветка

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.044 c
3-1083207788
Нуждающийся
2004-04-29 07:03
2004.05.23
Как получить значение тригера при вставке(FireBird)


6-1080730866
tRiNEX
2004-03-31 15:01
2004.05.23
Перехват данных.


14-1083257947
Delphi5.01
2004-04-29 20:59
2004.05.23
Как получить Sender?


14-1083255316
Daniel
2004-04-29 20:15
2004.05.23
Пропустить элемент из цепи полиморфных вызовов


1-1083743709
half_litre
2004-05-05 11:55
2004.05.23
Переход с Delphi 3 на Delphi 7