Графика

[Dizman]

Спасибо, на такой ерунде запоролся
Знать бы еще решение первой задачи

[Dizman]

Помогите первую задачу сделать, идей вообще нет никаких. Все книжки пересмотрел, ничего не понимаю.

[mutabor]

Неужели это труднее человечка?
Меню - надписи на экране. По нажатию клавиши одну надпись рисуешь ярким цветом, остальные тусклым. И одновременно с этим рисуешь нужную фигуру, затерев предыдущую.

[Dizman]

Мне нужно создать меню, где я должен выбирать клавишами. Хотя бы подскажите как мою прогу про человечка превратить в прогу с меню?

[mutabor]

repeat;  
c:=readkey;  
if c=#0 then c:=readkey;  
case c of  
#72: begin
       очищаешь экран, подсвечиваешь надпись "Круг" и рисуешь сам круг
       end;
#75: begin
       очищаешь экран, подсвечиваешь надпись "Квадрат" и 
       рисуешь квадрат
       end;
#80: // и так далее...
#77: ;
end;  
putimage(xold,yold,p1^,1);  
until c=#27;

Очищать экран можно по разному, или совсем - CLS (или как там в Паскале) или поверх того что есть на экране нарисовать то же самое еще раз, но черным цветом.
Под словом "подсвечивать" я имел ввиду это: выводишь все строки меню каким нибудь серым цветом, а одну нужную например белым.

[Dizman]

Это вся программа или куда ее сувать то?

[Dizman]

mutabor выручай, завтра последняя пара по информатике!!! Я попробовал сделать как ты написал, он мне после Case около цифры 2 пишет Unknow identifacator, что-то в этом роде короче... Хотя я все модули подключил и все правильно написал... Идей у меня вообще никаких нет, выручай, век не забуду.

[Dizman]

Не сильно вы мне помогли программисты

[Abbatik]

Вот тока не надо тут после помощи ругаться! забанять тя щас и все!
з.ы. прошу прощения за флуд!

[Dizman]

Ну помогите мне пожалуйста!!!!!