Помогите с инициализацией графики Опции

[LOSOS]

Я пытаюсь подключить модуль graph но выдает ошибку: graphics not initializated (use INITgraph)

[volvo]

А то, что TP это DOS-программа, и не позволяет пробелов в путях, ты не подумал? Ты должен записать путь в формате DOS (8.3 - 8 символов на имя + 3 на расширение)...

И не надо прописывать АДРЕС ФАЙЛА. Сказано было - ПУТЬ к файлу, имя файла не должно участвовать! У тебя же нет директории

d:\programs\TP 7.1\BIN\Graph.TPU\

[Morfey85]

Я графику так инициировал

Код

Procedure InitGr;
var
  GrDr,GrMode,ErrorCode:Integer;
begin  {InitGr}
  GrDr:=Detect;
  InitGraph(GrDr, GrMode, '');
  ErrorCode := GraphResult;
  if ErrorCode <> grOk then
  begin
    Writeln('Graphics error: ', GraphErrorMsg(ErrorCode));
    Readln; Halt(1);
  end;
end;  {InitGr}

и все работало хорошо

А файл EGAVGA.BGI у меня лежит скопированый в папке с прогой.

Сообщение отредактировано: Morfey85 - 16.04.2006 14:35