Показать сообщение отдельно
  #8  
Старый 20.11.2012, 14:02
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от morebeauty
Ну если любите много читать... )

Начало кода фрэйма:
Код:
unit FrameCat;

interface
.....
var
  CatSys:TCatSystem;
Ну вот и ответ. CatSys это глобальная переменная. Одна единственная на всё приложение. В ней может храниться только один, последний созданный объект класса TCatSystem.
Ответить с цитированием