Forum Replies Created
-
AuthorPosts
-
vadim_ck
ParticipantСпасибо!
vadim_ck
Participant'TCount' wrote:В MouseDown вместо Repaint() нужно сделать RepaintForms SkinManager'a:
sSkinmanager1.RepaintForms(true);
Должны в месте нажатия появляться кружки. Только снова хочу обратить внимание на “Mode” в OnPaint…
Если сделать эту переменную глобальной и убрать ее объявление как локальной в процедурах OnMouseDown и OnPaint, то все нормально.
Видимо, это просто какой-то глюк в AlphaControls, не знаю)
или я что то не понимаю или так и не работает. Вы не могли бы сами отредачить и скинуть мне?
Спасибо
vadim_ck
Participant'TCount' wrote:Ну так и говорите, что при клике не рисует. Опишите точно, что Вам нужно) Если это клик, то клик по чему? по кнопке, по форме или по чему?
при клике на форму должно рисовать.
vadim_ck
Participant'TCount' wrote:Одно дело, если вообще не рисует, а другое дело – кривой код. Пробовали в событии OnPaint нарисовать что-нибудь? У Вас там было закомментирована в конце процедуры прорисовка эллипса и линий. Рисует же!
да. но у меня не рисует по клику мышки. при клике должно рисовать эллипс.
vadim_ck
Participant'TCount' wrote:Все рисуется, ошибка непосредственно в Вашем коде. Обратите внимание на строку в OnPaint формы:
Mode := ComboBox1.ItemIndex;
Именно она всему виной. Попробуйте ее удалить и увидите, что все прорисовывается. Так что, подумайте над этим:)
Удалил. по прежнему не рисует.
vadim_ck
Participant'TCount' wrote:Демка есть? Потому что у меня все рисуется и не исчезает.
вот проект. только скины по стандарту лежат в C:Skins
[attachment=6990:qw.rar]
vadim_ck
Participant'TCount' wrote:Если я правильно понял, Вы рисуете на форме. Если да, то лучше рисовать в PaintPox'е, который положить на форму.
Да. просто по заданию нужно на форме.
-
AuthorPosts