странное дело с рисованием...

← →
tchn © (2003-12-28 18:44) [0]

извиняюсь, но не получается рисовать на канве...
беру пример из хелпа
procedure TForm1.FormActivate(Sender: TObject); begin Canvas.Brush.Color := clTeal; Canvas.Polygon([Point(10, 10), Point(30, 10), Point(130, 30), Point(240, 120)]); end;
при активизации формы заметно, что что-то прорисовалось, моргнуло, и изчезло.
куда исчезает?
с остальными методами канвы то же самое

← →
BOA_KAA © (2003-12-28 18:58) [1]

Попробуй не в OnActinate, а в OnPaint

← →
tchn © (2003-12-28 19:34) [2]

в OnPaint работает..
но почему ж сами Borland такой пример дали? выходит, что должно работать в любом месте, не только в OnPaint?
где что не так?

← →
Липа (2003-12-28 19:47) [3]

FormActivate - это активация.
перерисовка (OnPaint) идёт после, поэтому твое творение и стирается.

да пример из хелпа смутил...

странное дело с рисованием... Найти похожие ветки