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

Вниз

Массив объектов   Найти похожие ветки 

 
McSimm2   (2003-11-05 16:32) [0]

Можно как нибудь в разделе констант обявить и описать массив объетов ???

Типа
const
mymas: array [1..2] of string = ("1","2");

mymas: array [1..2] of TMenuItem = (???)

Или сначала нужно объявлять все TMenuItem, а потом в цикле их присваивать mymas[i]


 
Юрий Федоров   (2003-11-05 16:36) [1]

в разделе констант нельзя


 
Малиновский Владимир   (2003-11-05 16:37) [2]

А как ты в константном разделе инициализируешь объекты? Кто конструктор вызовет?
var
mymas : array[1...222] of TMenuItem;
i : integer;

begin
for i := Low(mymas) to high(mymas) do
mymas := TMenuItem.Create(Self)


 
Ega23   (2003-11-05 16:37) [3]

const
mymas: array [1..2] of string = ("1","2");

Это можно.

mymas: array [1..2] of TMenuItem = (???)

ИМХО, это надо не в разделе const объявлять, а в var, а потом присвоить либо nil, либо реально созданным объектам.


 
McSimm2   (2003-11-05 16:39) [4]

Малиновский Владимир (05.11.03 16:37) [2]
Ну да, логично ... Так вот и делаю ...


 
TUser   (2003-11-05 17:13) [5]

Опиши их в отдельном юните и сделай Create при его инициализации.



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

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

Наверх





Память: 0.45 MB
Время: 0.016 c
3-56537
Yuri
2003-10-27 10:07
2003.11.17
обнулять автоинкрементное поле?


14-56816
Шустрый
2003-10-21 13:08
2003.11.17
XP Manifest


8-56777
DBDev
2003-07-22 14:00
2003.11.17
какой функцией вычленить заданный фрагмент из TPicture?


1-56659
Raduga
2003-11-05 11:22
2003.11.17
Процессы и СОМ-объекты


14-56885
y-soft
2003-10-25 09:37
2003.11.17
Вот, дедом стал!





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