Borland Pascal. Руководство пользователя



         

Элементарная программа


Традиционным введением в новый язык программирования или операционную среду является программа, выводящая сообщение "Hello, Word!", написанная на данном языке или для данной опера- ционной среды. Это программа содержит количество программного ко- да, достаточное для вывода на экран строки "Hello, Word!".

Конечно, в Windows нужно сделать значительно больше. Вам нужно вывести окно, записать в него текст и сделать так, чтобы окно взаимодействовало с "окружающим миром", по крайней мере вы должны иметь возможность закрыть окно и выйти. Если вы будете де- лать все это с самых основ, то даже для выполнения этих элемен- тарных задач потребуется очень большой объем кода. Например, программа GENERIC.PAS, содержащаяся на дистрибутивных дисках, вы- полняя такие элементарные действия, занимает более 100 строк.

Это связано с тем, что предъявляет к прикладной программе ряд требований, которые та должна удовлетворять перед тем, как она сможет работать в Windows. Даже простейшая программа требует большого объема исходного кода. К счастью, программы, написанные с использованием ObjectWindows, автоматически удовлетворяют этим требованиям (включая создание и вывод на экран основного окна и сохранение для приложения описателя окна). Таким образом, прог- рамма "Hello, Word!" сокращается всего до 16 строк.

program HelloApp;

uses WObjects;

type THelloWord = object(TApplication) procedure InitMainWindow; virtual; end;

procedure THelloWord.InitMainWindow; begin MainWindow := New(PWindow, Init(nil, 'Hello, Borland Pascal')); end;

var HelloWord: THelloWord;

begin HelloWord.Init('HelloWord'); HelloWord.Run; HelloWord.Done; end.




Содержание  Назад  Вперед