Вниз
Скачать: CL | DM;

Компонент на базе TImage   Найти похожие ветки 

← →
I_D ©   (2012-01-27 14:58) [0]

Доброго времени суток! Не судите строго, пишу второй компонент в жизни. Компонент для построения графиков. Возникла проблема. Если меняю размер компонента, то после запуска приложения на экран выводится лишь фрагмент. Компонент перекомпелировал. Не помогло.
Если детализировать проблему, то не отрабатывает на уровне Canvas.FillRect(imgRect); Причем в отладчике проверял - размеры передаются верно, все математические расчеты ведутся верно, с учетом нового размера, а на экран выводится не корректно


{---------------------------------RefreshGraph-------------------------------}
procedure TMyGraph.RefreshGraph;
var imgRect: TRect;
begin
imgRect.Top := 0;
imgRect.Left := 0;
imgRect.Bottom := height;
imgRect.Right := width;
Canvas.Brush.Color:=FBkgClr;
Canvas.FillRect(imgRect);
end;

...



← →
Dimka Maslov ©   (2012-01-27 15:11) [1]

Канвас.ФиллРект лишь заполняет собой область. Графиков он не рисует. Надо вставить перерисовку в OnResize


← →
MBo ©   (2012-01-27 15:14) [2]

http://www.delphimaster.ru/cgi-bin/forum.pl?n=18&search=timage


← →
Dennis I. Komarov ©   (2012-01-27 15:22) [3]

TPaintBox


← →
I_D ©   (2012-01-27 16:52) [4]

спасибо всем, кто откликнулся. Пока пробую разные варианты. Решил переделать на TPaintBox и добавить свойство OnResize. О результатах сообщу :)


← →
brother ©   (2012-01-27 21:12) [5]

> Решил переделать на TPaintBox и добавить свойство OnResize.
> О результатах сообщу :)

может не надо?


← →
U_D   (2012-01-27 23:40) [6]

>> Компонент на базе TImage
>> Решил переделать на TPaintBox


Может, все же, не будешь изобретать велосипед, унаследуешь свой "компонент для рисования графиков" от TGraphicControl и переопределишь в нем метод Paint()?


← →
Юрий Зотов ©   (2012-01-28 00:10) [7]

> U_D   (27.01.12 23:40) [6]

Справедливо, но я бы наследовался от TPaintBox. Меньше кодить придется (раз) и готовое полезное событие OnPaint (два).



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.006 c
2-1327842847
Alex_C
2012-01-29 17:14
2012.06.03
Считать текстовый файл с диска


2-1327746260
Festil
2012-01-28 14:24
2012.06.03
Динамические TButton, определение нажатия.


15-1327682610
tesseract
2012-01-27 20:43
2012.06.03
По поводу совместимости Delphi


15-1328085629
Faceless
2012-02-01 12:40
2012.06.03
Настройки Delphi7


15-1326538361
xayam
2012-01-14 14:52
2012.06.03
База данных совместимости чернил/картриджей/принтеров




   Наверх