мета-данные страницы
  •  
Загрузка не удалась. Возможно, проблемы с правами доступа?

Различия

Показаны различия между двумя версиями страницы.

Ссылка на это сравнение

Предыдущая версия справа и слеваПредыдущая версия
pascal:graph [18/03/2016 04:49] – ybezrukovpascal:graph [05/10/2018 05:39] (текущий) – ybezrukov
Строка 1: Строка 1:
 ===== Графика в Паскале ===== ===== Графика в Паскале =====
-FIXME 
- 
-Пример работы с графикой в системе Borland (что тоже самое - Turbo) Pascal: 
- 
-<code pascal> 
-USES GRAPH;                           // подключение "графической библиотеки" 
- 
-VAR h,k,l: INTEGER; 
- 
-BEGIN 
- ...                                  // "Неграфическое" начало программы (если есть) 
- 
- DetectGrahp(k,l);                    // Определение параметров графики 
- InitGraph(k,l,'d:\tp7\bgi\');        // Инициализация графики 
-  
- h:=GraphResult;                      // Проверка на ошибку запуска графики 
- If h<>0 then                         // Реакция на ошибку запуска графики  
- begin 
-   writeln('Error - ', h); 
-   writeln('Press ENTER for EXIT!');  // Ожидание  
-   readln;  
-   halt;                               // Выход из программы 
- end 
- else ... ;                            // Здесь - код для работы с графикой  
- 
- ...                                   // "Неграфическое" окончание программы (если есть) 
- 
-END. 
-</code> 
- 
  
 Пример работы с графикой в нашей системе. Пример работы с графикой в нашей системе.