Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.03.13;
Скачать: [xml.tar.bz2];

Вниз

Определение имени переменной   Найти похожие ветки 

 
webpauk   (2005-02-26 13:05) [0]

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 это значение.


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

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


> fPTpopupEx.create;


Нужно так:

 fPTPopup := TPopup.Create;


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

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

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


 
Anatoly Podgoretsky ©   (2005-02-26 13:36) [3]

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


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


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

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


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

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


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


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

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


 
TUser ©   (2005-02-26 16:47) [7]

точно


 
DiamondShark ©   (2005-02-26 16:48) [8]

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.03.13;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.034 c
1-1109239688
Sa1nt
2005-02-24 13:08
2005.03.13
Обработка текстового файла


1-1109279193
akvilon
2005-02-25 00:06
2005.03.13
один TStrings


3-1108373854
andrey__
2005-02-14 12:37
2005.03.13
метод Locate находит не первую запись а последующую.


3-1108204757
UVV
2005-02-12 13:39
2005.03.13
Запрос по дате в Oracle


3-1108016064
Киря
2005-02-10 09:14
2005.03.13
Как передать данный из DLL в exe?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский