Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль

Купить рекламу на форуме 15-35 тыс рублей в месяц

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы Поиск в этой теме
Старый 14.05.2013, 13:14   #1
Pilyla
Пользователь
 
Регистрация: 16.12.2012
Сообщений: 42
По умолчанию Рамка Image

Не получается вывести рамку для Image, так как выводит белый закрашенный прямоугольник. в чем дело-не пойму. помогите
Код:
procedure TForm1.Image4Click(Sender: TObject);
begin
Image4.Canvas.pen.Color := clBlack;
Image4.Canvas.Pen.Width:=10;
Image4.Canvas.Rectangle(584, 64,    584+Image4.Width,   64+ Image4.Height);
 end;

Последний раз редактировалось Stilet; 14.05.2013 в 16:23.
Pilyla вне форума Ответить с цитированием
Старый 14.05.2013, 16:23   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,803
По умолчанию

Добавь
Код:
Image4.Canvas.Brush:=bsNone;
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 15.05.2013, 06:15   #3
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,855
По умолчанию

Или вообще заменить на
Код:
Image4.Canvas.FrameRect
phomm вне форума Ответить с цитированием
Ответ
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
При столкновении между image переместить другой Image Алексей_2012 Общие вопросы Delphi 1 07.03.2013 09:32
Рамка shanluu Общие вопросы Delphi 2 30.04.2011 23:35
EPNGMissingMultipleIDAT. This PNG Image is invalid because it has missing image parts kardinal94 Общие вопросы Delphi 0 08.10.2010 20:31
Вопрос по Image (скачанная картинка не хочет выводиться в Image) Radnor Мультимедиа в Delphi 2 06.07.2009 02:20
Рамка Vladya Помощь студентам 2 12.11.2008 23:54