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

Вниз

Проверить создан ли объект   Найти похожие ветки 

 
Гость   (2009-09-15 13:16) [0]

Появилась задача определить создан ли объкт по имени переменной с типом String. Допустим

Var
 MyObject : TObject;
 ObjectName :String;
begin
 ObjectName := "MyObject";
 
 // Можно ли с помощью стринговой переменной ObjectName узнать   //создан ли объект с таким именем?
end;


 
Медвежонок Пятачок ©   (2009-09-15 13:21) [1]

надо создавать так, чтобы не возникало дурацких вопросов потом.


 
Гость   (2009-09-15 13:28) [2]


> Медвежонок Пятачок ©   (15.09.09 13:21) [1]


Я понимаю, но т.е это не возможно сделать?


 
Amoeba ©   (2009-09-15 13:32) [3]

Это просто не надо делать, независимо от того, возможно или нет.


 
Гость   (2009-09-15 13:35) [4]

Ну ясно, спасибо.


 
Сергей М. ©   (2009-09-15 13:36) [5]


> создан ли объект с таким именем?


У объекта не понятие "имя".
И что ты при этом собрался искать - совершенно не понятно.


 
Сергей М. ©   (2009-09-15 13:36) [6]


> не понятие


нет понятия


 
clickmaker ©   (2009-09-15 13:41) [7]

ну в принципе, если стоит задача поименовать объекты, то можно в стринглист их складывать.


 
stas ©   (2009-09-15 13:42) [8]

Var
MyObject : TObject;
ObjectName :String;
begin
ObjectName := "MyObject";

как эта переменная ObjectName связана с объектом?
MyObject<>nil - значит объект уже был создан, но в таком случае при уничтожении переменной следует пресваивать nil.


 
Гость   (2009-09-15 13:44) [9]


>
> У объекта не понятие "имя".


Мне нужно что-то вроде;
if Assigned() - только в качестве параметра давать имя переменной класса TObject, а не сам объект.


 
Медвежонок Пятачок ©   (2009-09-15 13:53) [10]

тебе это не нужно.


 
Юрий Зотов ©   (2009-09-15 14:07) [11]

См. [7].


 
Медвежонок Пятачок ©   (2009-09-15 14:14) [12]

была у человека лошадь (или конь)
но купил он запорожец, и ломает голову, куда именно в него сено запихивать

:)


 
Сергей М. ©   (2009-09-15 14:28) [13]


> Гость   (15.09.09 13:44) [9]


И чем же, по-твоему, конструкция

if Assigned("MyObject") then

принципиально лучше конструкции

if Assigned(MyObject) then

?


 
Anatoly Podgoretsky ©   (2009-09-15 14:29) [14]

Тем что первая всегда дает TRUE


 
Жорж   (2009-09-15 22:36) [15]

Зато вторая всегда вернет False


 
Жорж   (2009-09-15 22:37) [16]

По сабжу
В Delphi (в отличие от PHP) такой возможности нет


 
MsGuns ©   (2009-09-16 10:45) [17]

>Жорж   (15.09.09 22:37) [16]
>В Delphi (в отличие от PHP) такой возможности нет

Наверное потому, что там нет такого уродца, как мусорщик :)


 
Anatoly Podgoretsky ©   (2009-09-16 11:47) [18]

> MsGuns  (16.09.2009 10:45:17)  [17]

Есть в определенных версиях Дельфи


 
TUser ©   (2009-09-16 23:02) [19]

RTTI + эти объекты должны быть чьим-то published-ом, но и вправу хз зачем надо



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

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

Наверх





Память: 0.48 MB
Время: 0.008 c
15-1252790422
Германн
2009-09-13 01:20
2009.11.08
А что такое Windows CE?


15-1252688079
test
2009-09-11 20:54
2009.11.08
День граненого стакана


8-1194133995
POMbI4
2007-11-04 02:53
2009.11.08
Конвертирование AVI в BMP


1-1222428416
Gurd
2008-09-26 15:26
2009.11.08
Синхронизация двух ScrollBox


2-1254033768
faiwer
2009-09-27 10:42
2009.11.08
Autosize для RichEdit





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский