Главная » Free Pascal

Альтернативные средства работы с датами и временем Free Pascal

Добавлено Дата: 23 July, 2014 категория: Free Pascal

Одна из дополнительных возможностей определения компонентов текущей ка- лендарной даты и показаний системных часов заключается в прямом обращении к соответствующей функции операционной системы (листинг 14.7).

   Листинг 1 4 .7 .  Программа  Win_Date                                            

Читать »

Новые функции преобразования числовых данных Free Pascal

Добавлено Дата: 23 July, 2014 категория: Free Pascal

В системе Free Pascal довольно много функций по прямому и обратному преоб- разованию числовых данных, представленных в машинном и символьном форма- тах. В некоторых случаях они функционально повторяют действия традиционных функций и процедур, в других случаях включают дополнительные указания по форматированию числовых данных. Наконец, появились и новые функции. Пере- чень дополнительных функций приведен в табл. 5.3.

Читать »

Программирование с объектами Free Pascal

Добавлено Дата: 22 July, 2014 категория: Free Pascal

В этом разделе демонстрируются некоторые идеи объектно-ориентированного программирования, реализованные в режиме Object Pascal extension on, который устанавливается с помощью команды Options      Compiler.

Читать »

Введение в Free Pascal. Исторический обзор

Добавлено Дата: 22 July, 2014 категория: Free Pascal

В 1965 г. был объявлен международный конкурс на создание нового алгорит- мического языка — преемника АЛГОЛА-60. В конкурсе принял участие молодой швейцарский ученый Никлаус Вирт (Nicklaus E. Wirth), работавший в то время доцентом Стэндфордского университета. В 1967 г. его проект комиссией был о т- вергнут — победителем оказался АЛГОЛ-68. Но Вирт продолжил работу над своим замыслом и, вернувшись в Швейцарию, вместе с коллегами из Федераль- ного института технологии (ETH, Цюрих) разработал новую версию языка, на- званную в честь известного французского инженера Блеза Паскаля — создателя одного  из  первых  механических  калькуляторов.  В  1970  г.  под  руководством

Читать »

Множества Free Pascal

Добавлено Дата: 22 July, 2014 категория: Free Pascal

Если массив представляет собой упорядоченный набор однотипных данных, то множество — это не упорядоченный набор не повторяющихся объектов любой при- роды. Максимальное количество объектов, из которых может состоять множество, не должно превышать 255. Специфика любого множества заключается в том, что при его описании должен быть перечислен весь список значений, который может входить в состав множества. Способ такого перечисления может быть разным:

Читать »

Закраска и заполнение замкнутых областей Free Pascal

Добавлено Дата: 20 July, 2014 категория: Free Pascal

В этом разделе речь пойдет о закрашивании замкнутых областей любым цветом или их заполнение фиксированным цветным узором — шаблоном заливки. Шаблон заливки задается массивом 8 8 бит, где каждый единичный разряд окрашивается указанным цветом, а каждый нулевой разряд — цветом фона. Представьте себе, что весь графический экран покрыт такими узорными квадратиками, примыкающими друг к другу по горизонтали и вертикали. Наложим на этот узор контур замкнутой области, и та часть узора, которая ограничена контуром, используется для окраски внутренней или внешней части нашей фигуры. Если шаблон заполнен только еди- ничными разрядами, то закраска ведется сплошным цветом. Наличие единичных разрядов только в отдельных строках шаблона (например, хотя бы в одной) приво- дит к горизонтальной штриховке области. Варьирование комбинаций нулей и еди- ниц в шаблоне позволяет создавать довольно много различных узоров — до 32  63.

Читать »

Параметры подпрограмм — одномерные массивы Free Pascal

Добавлено Дата: 19 July, 2014 категория: Free Pascal

В данном разделе мы прокомментируем различные приемы передачи и обра- ботки параметров, являющихся одномерными массивами. В пределах одной про- граммы arg_array1 реализованы несколько функций, определяющих максималь- ный элемент в одномерном целочисленном массиве (листинг 9.4).

Читать »

Упаковка, замена и распаковка составляющих даты и времени Free Pascal

Добавлено Дата: 19 July, 2014 категория: Free Pascal

Группу подпрограмм, обеспечивающих упаковку отдельных компонентов и групп компонентов в данные типа TDateTime, составляют функции, чьи имена на- чинаются со слова Encode (табл. 14.4). По исходной информации они вычисляют все недостающие компоненты даты и времени, а затем преобразуют их в значение типа TDateTime. Все аргументы функций упаковки должны иметь тип Word.

Читать »

Редактирование текста программы Free Pascal

Добавлено Дата: 19 July, 2014 категория: Free Pascal

Текстовый редактор, включенный в состав IDE, предназначен, главным обра- зом, для набора и корректирования текстов исходных программ. В этом плане он работает так же, как и большинство текстовых редакторов, поэтому в пояснении нуждаются лишь некоторые моменты.

Читать »

Сообщения об ошибках периода выполнения Free Pascal

Добавлено Дата: 18 July, 2014 категория: Free Pascal

Код

Текст сообщения

Пояснение

Читать »

Формирование надписей в области рисования Free Pascal

Добавлено Дата: 18 July, 2014 категория: Free Pascal

В пакете GLUT предусмотрены довольно скромные возможности для нанесе- ния подписей в области рисования. Во-первых, мы можем установить цвет симво- лов и начальную позицию подписи (координаты левого нижнего угла первого сим- вола):

glColor3f(vr, vg, vb); glRasterPos2f(x, y);

Читать »

Выполнение программы Free Pascal

Добавлено Дата: 17 July, 2014 категория: Free Pascal
 

Откомпилированная программа может быть запущена из IDE. Это можно сде- лать одним из следующих способов:

± выполнить команду меню Run ® Run;

± нажать комбинацию клавиш <Ctrl>+<F9>.

Если программе должны быть переданы параметры командной строки, то для этого надо выполнить команду меню Run ® Parameters. Диалоговое окно по за- данию параметров командной строки представлено на рис. 3.9.

Читать »

Управление атрибутами отображаемого текста Free Pascal

Добавлено Дата: 17 July, 2014 категория: Free Pascal

При записи очередного символа в окно вывода (а точнее, в соответствующую позицию видеопамяти) к коду ASCII присоединяется байт атрибута, который хра- нится в системной переменной TextAttr. Мы уже упоминали, что по умолчанию в ней находится код $07, что соответствует следующей комбинации битов атрибута:

Читать »

Параметры источника света Free Pascal

Добавлено Дата: 17 July, 2014 категория: Free Pascal

Для повышения реалистичности сцены можно воспользоваться источниками света. Стандартная версия OpenGL предоставляет пользователю до 8 источников света, для обозначения которых используются константы перечисления GL_LIGHT0, GL_LIGHT1, …, GL_LIGHT7. Подключение одного или нескольких источников света осуществляется в два этапа. Сначала нужно разрешить режим использования осве- щения:

Читать »

Построение окружностей, эллипсов и дуг Free Pascal

Добавлено Дата: 16 July, 2014 категория: Free Pascal

Список процедур, предназначенных для работы с окружностями и эллипсами, приведен в табл. 15.6.

Таблица 15.6

Формат обращения к процедуре

Читать »