Форум: "Начинающим";
Текущий архив: 2011.06.26;
Скачать: [xml.tar.bz2];
ВнизTsplitter и Timage Найти похожие ветки
← →
Labor © (2011-03-19 14:27) [0]Стоит img1:Timage (align=bottom) и над ним splitter:tsplitter (тоже align=bottom)
по таймеру рисуется график в img_buf:Timage и копируется в тот img1
...
temp_rect:=TImage(FindComponent("img"+x).Canvas.ClipRect;
...
TImage(FindComponent("img"+x).Canvas.Lock;
try
TImage(FindComponent("img"+x).Canvas.CopyRect(temp_rect,img_buf.Canvas,Rect(se4.Value,se1.Value,img_buf.Wid th-se2.Value,img_buf.Height-se3.Value));
finally
TImage(FindComponent("img"+x).Canvas.Unlock;
end;
...
Тут все "вкусно". Чудеса начинаются если подвинуть splitter при работающем таймере. Такое впечатление, что img1 увеличивается/уменьшается, а вот его Canvas каким был по размерам таким и остался...
Пробовал отключить таймер - тоже самое.
Но перед запуском таймера все нормально работает (размер меняется).
Подскажите как это вылечить.
← →
sniknik © (2011-03-20 17:11) [1]> Тут все "вкусно".
перестань лизать всякую гадость, и начни наконец то (учись) программировать...
p.s. поиск имеджей по имени, и отрисовка по таймеру, если уж сравнивать со вкусом то это блевотина.
лучше все переделать на отрисовку по событию онпаинт, с заменой имежда компонентом у которого оно есть (PaintBox).
p.p.s. если же по существу конкретно этого вопроса, то сплитер меняет размер компонента, но не битмапа. а имеджа нет совмещения размеров (не для того видать делали), озаботься им сам... ну вот, пойду сблюю.
← →
Amoeba_ (2011-03-20 19:20) [2]
> Labor © (19.03.11 14:27)
Этот вопрос уже рассматривался здесь
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=79325
, и суть ответов была та же. Что не устраивает?
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2011.06.26;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.003 c