Цитата:
Сообщение от morebeauty
Ну если любите много читать... )
Начало кода фрэйма:
Код:
unit FrameCat;
interface
.....
var
CatSys:TCatSystem;
|
Ну вот и ответ. CatSys это глобальная переменная. Одна единственная на всё приложение. В ней может храниться только один, последний созданный объект класса TCatSystem.