OBJECT

[Doholyan]

Stilet
__________
Спасибо конечно....но, он был примерно такого направления

Type
Temples = OBJECT
Procedure 1 ..
Procedure 2..
Procedure 3..
begin
( описание процедур1)
( описание процедур2)
( описание процедур3)
End;

begin
with TEMPLES do
begin
Процедура1;
Процедура2;
процедура3;
end ;
end.

Вот чтото в таком роде...
теоретически должно было работать))

[Пепел Феникса]

TEMPLES
ведь это тип...
нужна переменная этого типа...
(как там создавать экземпляры...я не помню уже)

[Doholyan]

правельно тип объект
и, он может быть составным из любых типовцелочисленных, вещественных, логических и т.д.

[puporev]

var aaa:Temples;
begin
aaa.Create;
.......................

[Doholyan]

в теле программы...переменную указывал...
по запарке сейчас зыбыл вписать...