Изменение размеров TImage
От: Пономаренко Андрей Николаевич  
Дата: 19.08.02 11:23
Оценка:
Нужно менять размеры имеджа во время работы программы. Сперва его размер по нулям. Потом делаю ему нормальный размер, что-то рисую... Все нормально. Через некоторое время нужно снова изменить его размеры. Размеры меняются, но на канве рисуется только то, что было до этого, то есть, как я думаю, ClipRect не меняется... Что тут может быть, подскажите пожалуйста. Я совсем ничего не понимаю — вроде простая вещь же.
Re: Изменение размеров TImage
От: Пономаренко Андрей Николаевич  
Дата: 20.08.02 08:38
Оценка:
Здравствуйте Пономаренко Андрей Николаевич, Вы писали:

ПАН>Нужно менять размеры имеджа во время работы программы. Сперва его размер по нулям. Потом делаю ему нормальный размер, что-то рисую... Все нормально. Через некоторое время нужно снова изменить его размеры. Размеры меняются, но на канве рисуется только то, что было до этого, то есть, как я думаю, ClipRect не меняется... Что тут может быть, подскажите пожалуйста. Я совсем ничего не понимаю — вроде простая вещь же.


Блин, все на самом деле просто — нашел решение сразу после написания
письма в конфу Просто при создании имеджа в нем создается битмап,
в котором и происходит рисование, так вот еще нужно переопределять
размеры имеджа. Например:

FViewImage.Width := max(FViewImage.Width, (FXS * 2) + w);
FViewImage.Height := FViewImage.Height + FYS * 2 * FImageList.Count + h;
FViewImage.Picture.Bitmap.Width := FViewImage.Width;
FViewImage.Picture.Bitmap.Height := FViewImage.Height;
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.