Паскаль в линукс\висте

@Abyss · Регистрация: 06.09.2009

Студворк — интернет-сервис помощи студентам

Всем привет.Возникла проблема в том что не могу запустить паскаль с модульем граф на висте 64 битной.По этому пробывал на лиунксе тоже не вышло.Люди добрые помогите установить! Хр не предлагать!

@dim-hj · 08.09.2009, 11:22

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

при желании можно сделать чтобы сразу после запуска эмулятора запускался паскаль, раз досбокс нужен только для него

Вот как раз для этого есть уже готовые решения.

@Abyss · 08.09.2009, 17:23 **[ТС]**

Сообщение от dim-hj

Вот как раз для этого есть уже готовые решения.

решения в студию =)

@Abyss · 08.09.2009, 22:38 **[ТС]**

СкулПак.1.2 все время вылетает, а в 1.1 не могу запустить граф оО

@dim-hj · 09.09.2009, 09:04

Pascal
1
InitGraph(Gd, Gm, 'x:\bp');

так инициализируется графика?

@Xentar · 09.09.2009, 10:42

dim-hj, если паскаль запускается в досбоксе, а для маунта выбрана папка c:\bp, то ваше 'x:\bp' превращается в просто 'x:\'
Насколько я помню букву диска x можно поменять при маунте.

Abyss, насколько я помню для графики нужен файл Graph.tpu
По умолчанию этот файл лежит в папке BGI, но в разных версиях паскаля может находится в разных папках. Папки необходимо прописать в меню "опции -> каталоги" (у меня Русский паскаль, по английский точно так же называется)
Если папку там укажите то в Initgraph(gd,gm,'<здесь не надо будет ничего указывать>'); а можно просто поставить ''.

PS: Graph.tpu - стандартный модуль графики, так же есть некоторые нестандартные, которых много, тот же Graph32.tpu, но по мне так самый правильный это всё таки Graph.tpu - он удобный.

@dim-hj · 09.09.2009, 14:11

Скрипты инициализации обычно запускаются из директории C:\Program Files\SchoolPak и монтируют в качестве x pak. Соответственно, x получается C:\Program Files\SchoolPak\pak. Внутри pak стоят разные программы: Turbo Pascal, Norton Commander, Hiew, Avputil, русификаторы и ещё немного всячины.

Так или иначе, должно быть X:\BP.

У меня есть идея, которую обязательно стоит попробовать. Накатаю резидентик типа APPEND.COM, чтобы InitGraph работал с любым третьим параметром.

@Abyss · 09.09.2009, 14:34 **[ТС]**

пробывал и X:\BP и С:\BP и прописывал полностью путь типа С:\скулПак\шо-то там..всеравно не хочет(

@dim-hj · 09.09.2009, 14:41

С:\... не надо пробовать

Код в студию.

@Abyss · 09.09.2009, 14:55 **[ТС]**

код программы?

@dim-hj · 09.09.2009, 14:57

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

код программы?

Ага.

Такая программа работает?

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses Graph;
 
var
  ErrorCode        : Integer;
  GrDriver, GrMode : Integer;
 
begin
  GrDriver := Detect;
  InitGraph(GrDriver, GrMode, 'X:\BP');
  ErrorCode := GraphResult;
  if ErrorCode <> grOk then
  begin
    WriteLn('Ошибка инициализации графики:');
    WriteLn(GraphErrorMsg(ErrorCode));
    Halt(1);
  end;
  ClearDevice;
  SetColor(White);
  Rectangle(0, 0, GetMaxX, GetMaxY);
  Line(0, 0, GetMaxX, GetMaxY);
  Line(0, GetMaxY, GetMaxX, 0);
  ReadLn;
  CloseGraph;
end.

@Abyss · 09.09.2009, 15:39 **[ТС]**

да роботает.уже все заработало,странно писал же именно так х:\бп.хз

Новые блоги и статьи Все статьи Все блоги /
Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .	У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35". kumehtar 04.08.2026 С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .
Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники). Hrethgir 04.08.2026 Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .	Термопринтер QR701 Argus19 03.08.2026 Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .	Создание формы заимствованного документа Maks 03.08.2026 Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .	Задача предоставления скидок покупателям Maks 03.08.2026 Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .

@Abyss 0 / 0 / 0 Регистрация: 06.09.2009 Сообщений: 14

	Паскаль в линукс\висте 06.09.2009, 14:10. Показов 7588. Ответов 30 Метки нет (Все метки) Всем привет.Возникла проблема в том что не могу запустить паскаль с модульем граф на висте 64 битной.По этому пробывал на лиунксе тоже не вышло.Люди добрые помогите установить! Хр не предлагать! 0

@Abyss 0 / 0 / 0 Регистрация: 06.09.2009 Сообщений: 14
	08.09.2009, 22:38 [ТС]
	СкулПак.1.2 все время вылетает, а в 1.1 не могу запустить граф оО 0

@Xentar Of Wolf and Man 999 / 198 / 5 Регистрация: 09.07.2008 Сообщений: 1,784
	09.09.2009, 10:42
	dim-hj, если паскаль запускается в досбоксе, а для маунта выбрана папка c:\bp, то ваше 'x:\bp' превращается в просто 'x:\' Насколько я помню букву диска x можно поменять при маунте. Abyss, насколько я помню для графики нужен файл Graph.tpu По умолчанию этот файл лежит в папке BGI, но в разных версиях паскаля может находится в разных папках. Папки необходимо прописать в меню "опции -> каталоги" (у меня Русский паскаль, по английский точно так же называется) Если папку там укажите то в Initgraph(gd,gm,'<здесь не надо будет ничего указывать>'); а можно просто поставить ''. PS: Graph.tpu - стандартный модуль графики, так же есть некоторые нестандартные, которых много, тот же Graph32.tpu, но по мне так самый правильный это всё таки Graph.tpu - он удобный. 0

@dim-hj 28 / 25 / 1 Регистрация: 28.07.2009 Сообщений: 109
	09.09.2009, 14:11
	Скрипты инициализации обычно запускаются из директории C:\Program Files\SchoolPak и монтируют в качестве x pak. Соответственно, x получается C:\Program Files\SchoolPak\pak. Внутри pak стоят разные программы: Turbo Pascal, Norton Commander, Hiew, Avputil, русификаторы и ещё немного всячины. Так или иначе, должно быть X:\BP. У меня есть идея, которую обязательно стоит попробовать. Накатаю резидентик типа APPEND.COM, чтобы InitGraph работал с любым третьим параметром. 0

@Abyss 0 / 0 / 0 Регистрация: 06.09.2009 Сообщений: 14
	09.09.2009, 14:34 [ТС]
	пробывал и X:\BP и С:\BP и прописывал полностью путь типа С:\скулПак\шо-то там..всеравно не хочет( 0

@dim-hj 28 / 25 / 1 Регистрация: 28.07.2009 Сообщений: 109
	09.09.2009, 14:41
	С:\... не надо пробовать Код в студию. 0

@Abyss 0 / 0 / 0 Регистрация: 06.09.2009 Сообщений: 14
	09.09.2009, 14:55 [ТС]
	код программы? 0

@Abyss 0 / 0 / 0 Регистрация: 06.09.2009 Сообщений: 14
	09.09.2009, 15:39 [ТС]
	да роботает.уже все заработало,странно писал же именно так х:\бп.хз 0

Опции темы