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

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

Определение имени переменной [D6, WinXP]


webpauk ©   (2005-02-26 13:05:00) 

Unit PopupEx

uses ...

TpopupEx = class
private
fName: String;
public
constructor Create;
destructor Destroy; override;
end;

Unit 1

Uses ...

var
fPopup: Tpopup;

procedure Some;
begin
fPTpopupEx.create;
end;


можно ли как нибудь определить имя переменной создавшей экземпляр класса и соответственно присвоить TpopupEx.fName это значение.


DiamondShark   (2005-02-26 16:48:00) [1]

Сделать в конструкторе строковый параметр и в нём передавать нужное имя.
Это ответ на вопрос. Другое дело, что сам вопрос -- бред.


TUser   (2005-02-26 16:47:00) [2]

точно


Набережных С.   (2005-02-26 16:39:00) [3]


> TUser ©   (26.02.05 15:00) [5]
> или даже не быть никакого (в случае кривых рук программиста)

with TMyClass.Create do
try
 DoWork;
finally
 Free;
end;
Ky?


TUser   (2005-02-26 15:00:00) [4]

Все объекты в Delphi динамические - они просто лежат где-то в памяти и ничего не знают ни про кого. Переменная - суть указатель на эту область памяти. Но объект не обязан знать, кто там на его указывает. В частности, на него м.б. несколько указателей, или даже не быть никакого (в случае кривых рук программиста) - что бы ты хотел получить в этих случаях?


Набережных С.   (2005-02-26 14:41:00) [5]


> webpauk   (26.02.05 13:32) [2]
> Суть не в том!

Эт точно. Суть в том, что ты несешь какую-то ахинею


Anatoly Podgoretsky   (2005-02-26 13:36:00) [6]

Переменные ничего не создают.


webpauk   (2005-02-26 13:32:00) [7]

> Просто Джо
Суть не в том!

Суть в определении имени переменной!!!


Просто Джо   (2005-02-26 13:15:00) [8]

Начать с того, что вызов у тебя неправильный:


> fPTpopupEx.create;


Нужно так:

 fPTPopup := TPopup.Create;


Наверх

Титульная страница Поиск, карта сайта Написать письмо