Возможно ли объявить тип в модуле, чтобы затем его возможно было использовать в основной программе?
Напр. объявить следующие типы:
type
TSelect = record //выбор пользователя
Menu, Cmd: Integer; //пункт меню и команда
end;
TTimer = record
On: Boolean; //прерывать выполнение по таймеру
ms: Integer; //время таймера в миллисекундах
Menu, Cmd: Integer; //значения возвращаемые при прерывании
end;
TAbortOnData = record
On: Boolean; //прерывать выполнение при поступлении данных
Menu, Cmd: Integer;
end;
TColor = record
r,g,b: Integer;
end;
в модуле types, затем в основной программе подключить его в uses, и в var основного модуля объявлять переменные такого типа:
var
t: TTimer;
r: TAbortOnData;
c: TColor;
Select: TSelect;
у меня почему подобный подход не проходит.
--
и еще вопрос:
почему в модуле раздел uses нельзя объявить до раздела interface? или я ошибаюсь?