![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() ![]() |
![]() |
Xamil |
![]()
Сообщение
#1
|
Новичок ![]() Группа: Пользователи Сообщений: 19 Пол: Мужской Реальное имя: Xamil Репутация: ![]() ![]() ![]() |
Вот код процедуры
procedure TForm1.FormPaint(Sender: TObject); begin with Canvas do begin Canvas.Pen.Width:=1; Canvas.Pen.Color:=clBlack; Canvas.Brush.Color:=clCream; Rectangle(30,30,150,115); Pen.Width:=2; Brush.Style:=bsClear;все запускается, но окно пустое, со стандартным синим фоном.. Пробовал на седьмой делфи, поставил еще и шестую, та же история.. Два знакомых в инете пробовали, у них все пашет.. Если кто-нибудь знает, в чем дело, подскажите, плз.. Сообщение отредактировано: Xamil - 5.05.2007 19:08 |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Дельфи 6 - все прекрасно отработало... Олимпийские кольца видел...
![]() Ты через Object Inspector добавлял событие OnPaint? |
мисс_граффити |
![]()
Сообщение
#3
|
![]() просто человек ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: ![]() ![]() ![]() |
работает...
попробуй свернуть и опять развернуть окно - нарисуются? или прикрепи в архиве весь свой проект. -------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
Xamil |
![]()
Сообщение
#4
|
Новичок ![]() Группа: Пользователи Сообщений: 19 Пол: Мужской Реальное имя: Xamil Репутация: ![]() ![]() ![]() |
Блин, действительно, не подумал.. Добавил, заработало =) спасибо за помощь!
Добавлено через 0.29999 мин. Эт я про object inspector Сообщение отредактировано: Xamil - 5.05.2007 19:54 |
![]() ![]() |
![]() |
Текстовая версия | 11.07.2025 13:09 |