Описание каждого класса в отдельности

Type TSlideBlock = class //Начало описания класса первого звена

private

x1,x2:integer; //координаты Х

y1,y2:integer; //координаты У

public

t,TN:real; //время

fblockwidth:integer; //ширина первого звена

fblockheight:integer; //высота

a,v,k : double; //Кинематические переменные

vpravo:boolean; //направление движения

SMax:integer; //длинна пути (в одну сторону)

Constructor Create; //Конструктор

procedure time;

procedure Show;virtual; //Процедура вывода на экран

procedure Move; //Процедура передвижения

procedure setStartPos(XPos , YPos:integer); //Процедура, выставляющая начальное положение звена

procedure setBlockWidth(const Value: integer); //Процедура, устанавливающая ширину звена

procedure setBlockHeight(const Value:integer); //Процедура, устанавливающая высоту звена

procedure writeX1(newX:integer); //Процедура, устанавливающая координату

function getX1():integer; //Процедура, считывающая координату

procedure writeY1(newY:integer);

function getY1():integer;

procedure writeY2(newY:integer);

function getY2():integer;

Property prX1: integer read getX1 write writeX1; //Описание свойств

Property prY1: integer read getY1 write writeY1;

Property prY2: integer read getY2 write writeY2;

end;

Type TSlideBlock2 = class(TSlideBlock) //Начало описание класса второго звена с предком TSlideBlock

z1,z2:real; //Дополнительные координаты для преобразований

procedure Show; override; // перезаписываем процедуру вывода на экран

Constructor Create;

end;

Type TCrank = class(TSlideBlock2)

public

Angle : real; // Угол поворота

i : integer;

procedure Show;override;

Constructor Create;

end;

Внешний вид главного окна программы приведен на рисунке предоставленном ниже. Программа позволяет задать параметры системы, которые вы видите на второй вкладке главного окна. Справа расположены главные кнопки, которыми можно запускать и останавливать робота. Надо обратить внимание, что при повторном старте робот начнет свое движение заново только если вы изменили параметры системы. Кинематические значение вы можете увидеть в окне Таблицы, доступное во вкладке Tools главного меню, так же вам доступны графики движения, с возможностью печати. Программа дает возможность сохранять и загружать данные таблицы.

Так же, вам предоставлена возможность очистки и повторной прорисовки главного экрана.

Разбиение программы на модули и их описание

Данная программа разбита на модули следующим образом.

Unit1 – в этом модуле описаны основные классы и их методы, а так же главные управляющие процедуры.

Grfunc – этот модуль служит для вывода графиков на экран и печать их по средствам принтера.

Unit3 – таблицы, а так же методы их сохранения и загрузки.

Unit4 – окно о программе

Unit5 – окно о разработчике

Unit6 – окно содержащее коды программы.