[Decoding]

О каких объектах идет речь? О классах? Если да, то попробуй так:

Допустим есть класс TTest

Код:

TTest = class
end;

var
  Form1: TForm1;
  Test: TTest;

а дальше так:

Код:

// Создаем класс
procedure TForm1.Button1Click(Sender: TObject);
begin
   Test := TTest.Create;
end;

// Уничтожаем класс
procedure TForm1.Button2Click(Sender: TObject);
begin
   Test.Free;
end;

// Проверяем, создан класс или нет
procedure TForm1.Button3Click(Sender: TObject);
begin
   try
      if Test.NewInstance <> nil then
         ShowMessage( 'Объект создан' );
   except
      ShowMessage( 'Объект не создан' );
   end;
end;

Во время проверки, если класс не создан, произойдет ошибка. Если запускать проект из под Delphi, он перехватит ошибку (если ты конечно не отключишь это в настройках компилятора) и прекратит работу приложения. А если ты запустишь сам .exe, то все отработает нормально.