| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Имя экземпляра класса

juice ©   (2005-05-20 18:52:00) 

Как в runtime узнать имя экземпляра класса и возможно ли это ? Интересует именно имя обьекта а не класса.

---

VMcL   (2005-05-20 20:35:00) [1]

>> Просто Джо ©   (20.05.05 19:27) [14]

Ага. Недосмотрел.

---

Просто Джо   (2005-05-20 19:27:00) [2]

> [12] VMcL ©   (20.05.05 19:23)


См. [5] и [7]

---

juice   (2005-05-20 19:27:00) [3]

Спасибо, я понял что никак нельзя узнать, что впрочем и  соответствует логике вещей.

---

Marser   (2005-05-20 19:25:00) [4]

> VMcL ©   (20.05.05 19:23) [12] [Новое
>сообщение][Ответить]
>>>juice ©   (20.05.05 19:15) [5]
>
>Это не имя экземпляра класса, а имя класса экземпляра.
>
> Ответ: ClassName

Ну и что? И вернёт оно 'TMyClass'

---

VMcL   (2005-05-20 19:23:00) [5]

>> juice ©   (20.05.05 19:15) [5]

Это не имя экземпляра класса, а имя класса экземпляра.

Ответ: ClassName

---

Marser   (2005-05-20 19:21:00) [6]

> -=XP=- ©   (20.05.05 19:19) [8]

Собсна, ты сделал почти как в TComponent(только предельно упрощенно). Вряд ли автору это поможет.

---

Просто Джо   (2005-05-20 19:20:00) [7]

>  [8] -=XP=- ©   (20.05.05 19:19)


Хех. Полюбуйся на [5]. Настроение улучшится :)

---

-=XP=-   (2005-05-20 19:19:00) [8]

type
 TMyObject = class(TObject)
 private
   FName: string;  
 public
   constructor Create(const AName: string); reintroduce;
   property Name: string read FName;
 end;

constructor TMyObject.Create(const AName: string);
begin
 inherited Create;
 FName := AName;
end;

var
 MyObject: TMyObject;

begin
 MyObject := TMyObject.Create('MyObject');

P.S. Настроение - дрянь.

---

Marser   (2005-05-20 19:19:00) [9]

> MyClass - вот это я назвал именем экземпляра класса.

Понятно. Но только это имя переменной. И специально оно не хранится.

---

juice   (2005-05-20 19:16:00) [10]

Опечатка : первая строчка есс-но TMyClass = class(TObject)

---

Просто Джо   (2005-05-20 19:16:00) [11]

> var MyClass : TMyClass;
>
> MyClass - вот это я назвал именем экземпляра класса.


Неправильно назвал. Это название переменной.

---

juice   (2005-05-20 19:15:00) [12]

TClass = class(TObject)
...
end;

var MyClass : TMyClass;

MyClass - вот это я назвал именем экземпляра класса.

---

Просто Джо   (2005-05-20 19:10:00) [13]

>  [3] juice ©   (20.05.05 19:07)
> Спасибо,
> А если наследник TObject ?


А какое такое у TObject имя может быть?

---

juice   (2005-05-20 19:07:00) [14]

Спасибо,
А если наследник TObject ?

---

Просто Джо   (2005-05-20 18:55:00) [15]

[1] Просто Джо ©   (20.05.05 18:53)
Это если, конечно, наследник TComponent.

---

Просто Джо   (2005-05-20 18:53:00) [16]

.Name

---

Наверх