Создание объектов класса

@Tiphus · Регистрация: 16.02.2014

Author24 — интернет-сервис помощи студентам

Здравствуйте!
Допустим, существует некий класс MyClass. В разделе var программы объявлена переменная этого класса, например

Temp: MyClass;

Соответственно, прежде чем через конструктор создать объект класса, его нужно объявить в разделе var. Так вот, можно ли обойти это и создавать объекты, не объявляя их в разделе var? Или возможно как-то автоматизировать этот процесс?
Заранее, спасибо.

@cotseec · 15.06.2014, 19:19

Сообщение от Tiphus

создавать объекты, не объявляя их в разделе var?

Delphi

with MyClass.Create(<аргументы конструктора, если есть>) do
begin
// обращаемся к методам и свойствам объекта
   Free; // уничтожаем объект
end;

если класс унаследован от TComponent, то можно обращаться к нему по его уникальному ID (например, имени, свойству Tag и т.д.):

Delphi

procedure TForm1.OneProc;
begin
  with MyClass.Create(Form1) do
         Name := 'MyClassName'; // назначаем уникальный идентификатор
end;
 
procedure TForm1.TwoProc;
begin
   if (FindComponent('MyClassName') is MyClass) then // проверяем, что это требуемый экземпляр
   begin
      (FindComponent('MyClassName') as MyClass).SomeMethod; // вызов метода
      (FindComponent('MyClassName') as MyClass).Free; // уничтожаем объект
   end;
end;

@Tiphus · 15.06.2014, 19:27 **[ТС]**

Больше спасибо, буду пробовать.

@Tiphus 0 / 0 / 0 Регистрация: 16.02.2014 Сообщений: 8
		1
	Создание объектов класса 15.06.2014, 19:11. Показов 1399. Ответов 2 Метки нет (Все метки) Здравствуйте! Допустим, существует некий класс MyClass. В разделе var программы объявлена переменная этого класса, например Temp: MyClass; Соответственно, прежде чем через конструктор создать объект класса, его нужно объявить в разделе var. Так вот, можно ли обойти это и создавать объекты, не объявляя их в разделе var? Или возможно как-то автоматизировать этот процесс? Заранее, спасибо. 0

@Tiphus 0 / 0 / 0 Регистрация: 16.02.2014 Сообщений: 8
	15.06.2014, 19:27 [ТС]	3
	Больше спасибо, буду пробовать. 0

Опции темы

Создание объектов класса

Решение