графика TP7

NeedForSpeert · 04 ноя 2009, 17:38

При запуске программы, с использованием графики выскакивает черный экран и ничего не происходит. Вот, например, легкая программа, с которой это происходит:

Program graphika;
Uses crt, graph;
var GraphDriver, GraphMode : integer;
Begin
clrscr;
GraphDriver:=detect;
InitGraph(GraphDriver, GraphMode, '');
SetColor(4);
Rectangle(300,300,600,600);
SetFillStyle(8,10);
FloodFill(301,301,4);
Readln;
CloseGraph;
End.
Вроде и монитор автоматом должно определить и все равно ничего, просто черный экран во весь размер.
Спасибо.

atavin-ta · 05 ноя 2009, 07:43

Ты вышел за границы экрана. Самый большой под этим диалектом - 640*480. А у тебя y=600. Этого быть не может. Максимальный y - это 479 (480-1).

NeedForSpeert · 05 ноя 2009, 11:14

atavin-ta писал(а):Ты вышел за границы экрана. Самый большой под этим диалектом - 640*480. А у тебя y=600. Этого быть не может. Максимальный y - это 479 (480-1).

Уменьшил - не помогло, какие еще могут біть причины?

atavin-ta · 05 ноя 2009, 11:22

Проверь значения GraphDriver GraphMode сразу после InitGraph. Проверь путь в третьем параметре (действительно ли бжи валяются в бине).

NeedForSpeert · 05 ноя 2009, 12:17

atavin-ta писал(а):Проверь значения GraphDriver GraphMode сразу после InitGraph. Проверь путь в третьем параметре (действительно ли бжи валяются в бине).

Да, все нужные файлы в папке BIN. А как проверить значения GraphDriver GraphMode сразу после InitGraph?

atavin-ta · 05 ноя 2009, 12:19

Скопирожай их сразу после инта присваиванием в 2 другие переменные, а после клоузграфа - копии в студию (райтом конечно).

NeedForSpeert · 05 ноя 2009, 12:40

atavin-ta писал(а):Скопирожай их сразу после инта присваиванием в 2 другие переменные, а после клоузграфа - копии в студию (райтом конечно).

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

BBB · 09 ноя 2009, 09:45

NeedForSpeert писал(а):Да, все нужные файлы в папке BIN. А как проверить значения GraphDriver GraphMode сразу после InitGraph?

Скопируй BGI-файлы в тот каталог, где лежит запускаемый EXE-файл.

atavin-ta · 09 ноя 2009, 09:49

Если у других именно твой файл работает нормально, то проблема в файловом окружении и дефолтных путях. Скопирожай все бжи в каталог своего экзэшника.