Форум «Всё о Паскале» _ Теоретические вопросы _ Всё вылетает при использовании InitGraph((
Автор: kapusta 3.03.2007 20:47
Не могу понять в чём дело, пытаюсь нарисовать точку прямую, без разницы, програма вылетает на любой из этих команд... Глянте плиз, что я не так делаю?
Код
program test; uses graph, crt; const gpath = 'Y:WIN_APPSBPBGI'; var c: char; gd,gm: integer; begin clrscr; gd:=detect; initgraph (gd,gm,gpath); readln; line(1,1,100,100); {Вот на этом месте всё вылетает} closegraph; readln; end.
Автор: Алена 3.03.2007 20:56
const gpath = 'Y:WIN_APPSBPBGI';
Это чего такое?
Инициализирована ли графика - надо проверять, чтобы не было вот таких вопросов... GraphResult не просто так придумали...
Автор: kapusta 3.03.2007 21:24
упс, да, точняк, спс, он не грузит egavga.bgi.. блин..
Автор: compiler 3.03.2007 23:00
Цитата(kapusta @ 3.03.2007 16:24)
блин..
акуратнее в выражениях, тем-более ты адресовал сообщение Алене, а не Васе...
М
Флудить не по теме тоже не стоит...
Автор: Vanekk 9.03.2007 4:58
Люди, хелп начинающему программеру Суть проблемы такова. впервые попробовал работать с графикой, переписал в паскаль букву в букву программу-пример из учебника - не работает. ошибку выдает. Посмотрите, это с прогой не то, или у меня что то7 что это может быть?
Вот прога
Код
program proba; uses graph; var gd, gm : integer; begin gd:=VGA; gm:=VGAhi; Initgraph (gd,gm,' '); if GraphResult = grok then begin line (0,0,270,270); readln; closeGraph; end.
Или дайте пример подобной проги. попробую ее набрать. Заранее спасибо
Автор: volvo 9.03.2007 5:26
Цитата
ошибку выдает
Какую ошибку, и где выдает?
Автор: compiler 9.03.2007 16:02
Цитата
Флудить не по теме тоже не стоит...
Флуд...— пустословие, сообщения в интернет-форумах и чатах, занимающие ... большие объёмы и не несущие никакой-либо информации или очень малое количество полезной информации... Наверное я все-таки оффтопик (запись на веб-форуме, не соответствующая либо общему направлению форума, либо той теме, в рамках которой запись оставлена). Ну а если так вопрос к администрации что хуже оффтопик или употребление не красивых выражений? ой опять оффтопик...
Автор: TarasBer 9.03.2007 19:39
Цитата(Vanekk @ 9.03.2007 0:58)
Люди, хелп начинающему программеру Суть проблемы такова. впервые попробовал работать с графикой, переписал в паскаль букву в букву программу-пример из учебника - не работает. ошибку выдает. Посмотрите, это с прогой не то, или у меня что то7 что это может быть?
Вот прога
Код
program proba; uses graph; var gd, gm : integer; begin gd:=VGA; gm:=VGAhi; Initgraph (gd,gm,' '); if GraphResult = grok then begin line (0,0,270,270); readln; closeGraph; end.
Или дайте пример подобной проги. попробую ее набрать. Заранее спасибо
Если бы вы отступы делали, то сразу бы заметили, что количество бегинов не совпадает с количеством ендов. И между кавычками в инитграфе ничего не надо ставить. Только надо egavga.bgi не забудьте скопировать в папку с паскалём и с программой. И зачем в форум задавать вопросы про синтаксические ошибки, если на них прекрасно отвечает сам компилятор? Исправил:
Код
program proba;
uses graph;
var gd, gm : integer;
begin gd := VGA; gm := VGAhi; InitGraph (gd, gm, ''); if GraphResult = grok then begin Line (0 ,0 ,270 ,270); ReadLn; CloseGraph; end; end.
Автор: Vanekk 9.03.2007 20:34
Пасиба Огромное! прост выскакивающее Error 84 Unit expected мне ни о чем не говорило )
P.S. это все не из-за того что неправильно стояло... просто сначала надо было откомпилировать программу, а потом уж запускать