Логотип

izma · 10.11.2011, 21:49

здравствуйте! нужна срочная помощь. вот лольный рисунок

uses crt, graph;
var gd,gm:integer;

begin
gd:=detect;
initgraph(gd,gm, 'c:\tp7\bgi');
cleardevice;
{ekran**}
SetLineStyle(SolidLn,0,3);
SetFillStyle(SolidFill,1);
bar(350,200,650,450);
{krisha}
line(350,200,500,70);
line(650,200,500,70);
{okna}
rectangle(450,135,540,180);
line(495,135,495,180);
{klava}
line(350,450,300,560);
line(650,450,700,560);
line(300,560,700,560);
ReadKey;
closegraph;
end.

как сделать чтоб грани квадрата были также белыми как все линии?

Vladimir_S · 10.11.2011, 22:50

Цитата:

Сообщение от izma

как сделать чтоб грани квадрата были также белыми как все линии?

В команде
SetFillStyle(SolidFill,1);
заменить 1 на 15.

izma · 10.11.2011, 23:01

Цитата:

Сообщение от Vladimir_S

В команде
SetFillStyle(SolidFill,1);
заменить 1 на 15.

он закрашивает квадрат полностью белым... надо чтоб синий остался

izma · 11.11.2011, 00:00

может я не так его рисую? пробовал через rectangle - рисует как надо (белым), но закрасить синим не могу

Vladimir_S · 11.11.2011, 10:11

Цитата:

Сообщение от izma

может я не так его рисую? пробовал через rectangle - рисует как надо (белым), но закрасить синим не могу

А Вы сначала нарисуйте синий Bar, а после поверх Rectangle.

izma · 12.11.2011, 21:16

благодарю

10.11.2011, 21:49	#1 (permalink)
izma Новичок Регистрация: 10.11.2011 Сообщений: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Логотип здравствуйте! нужна срочная помощь. вот лольный рисунок uses crt, graph; var gd,gm:integer; begin gd:=detect; initgraph(gd,gm, 'c:\tp7\bgi'); cleardevice; {ekran**} SetLineStyle(SolidLn,0,3); SetFillStyle(SolidFill,1); bar(350,200,650,450); {krisha} line(350,200,500,70); line(650,200,500,70); {okna} rectangle(450,135,540,180); line(495,135,495,180); {klava} line(350,450,300,560); line(650,450,700,560); line(300,560,700,560); ReadKey; closegraph; end. как сделать чтоб грани квадрата были также белыми как все линии?

10.11.2011, 21:49
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Дам вам темы в которых возможно есть ответы на интересующие вас вопросы Светящийся логотип на крышке ноутбука Хочу сделать логотип из светодиодов Логотип с подсветкой в панели отсека 3.5″ Логотип

11.11.2011, 00:00	#4 (permalink)
izma Новичок Регистрация: 10.11.2011 Сообщений: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	может я не так его рисую? пробовал через rectangle - рисует как надо (белым), но закрасить синим не могу

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

12.11.2011, 21:16	#6 (permalink)
izma Новичок Регистрация: 10.11.2011 Сообщений: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	благодарю