Объявление CONST

← →
McSimm2 (2003-09-02 09:43) [0]

Как правильно объявить константу, один из элементов которой является компонент, обявленный внутри TForm1 ? Если это вообще осуществимо.... или придётся в теле процедуры заполнять ???

TForm1 = class(TForm)
ComboBox1: TComboBox;
ComboBox2: TComboBox;
private
procedure x();
public
end;

procedure TForm1.x();

type TRec = record
s: string;
Cmb: TCombobox;
end;

const mas: array [1.2] of Trec = ((s:"sss";Cmb: ??? ), ...)
begin
...
end;

← →
Smithson © (2003-09-02 09:47) [1]

Никак. Подставляй при входе в процедуру.

← →
McSimm2 (2003-09-02 09:53) [2]

Через FindComponent то же никак нельзя нахимичить ?

← →
KSergey © (2003-09-02 09:56) [3]

Нельзя
const прописывается во время компиляции (я ничего не путаю?), а на тот момент никких FindComponent нет.
Можно поставить nil, а в процессе выполнения программы - заполнить.

← →
McSimm2 (2003-09-02 09:57) [4]

Ладно, не удалось колесо изобрести, придётся обратиться к уже изобретённому...

← →
HolACost! © (2003-09-02 11:01) [5]

А если попробовать туда подставить адрес объекта!!! Т.е. @TComboBox, а потом какнить туда записать!!! Естественно обж должен быть глобальным!

← →
Reindeer Moss Eater © (2003-09-02 12:09) [6]

Инициализированную константу можно инициализировать только константой.

← →
KSergey © (2003-09-02 12:22) [7]

Позволю себе дополнить:

Инициализированную константу можно инициализировать только константой, значение которй известно на момент компиляции. Адрес объекта к этой категории не относится.

Адрес объекта к этой категории не относится.

Адрес объекта вообще ни к чему не относится. Найдите способ выразить сущность константой - получаете возможность инициализировать этой сущностью константу.

В порядке флейма.

[8] Reindeer Moss Eater © (02.09.03 12:31)
Адрес объекта вообще ни к чему не относится.

Что значит не относится?? Адрес есть число, применительно к рассматриваемой платформе 4-х байтное. Все числа, которые можно запихать в 4 бйта мне известны. И проинициализировать неким адресом вообще - это я могу. Однако адресом конкретного (еще не существующего) объекта - нет. ;)
Ну да это я так, лишь о терминах. ;)

Что значит не относится??
Не относится к теме разговора пока не указано явно в чем выражен этот адрес. (константа-переменная)

Объявление CONST Найти похожие ветки