Скачать: CL | DM;

Перечисляемые свойства   Найти похожие ветки 

← →
mfender ©   (2006-12-13 12:24) [0]

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

Например:

TCustomProperty = ???

TCustomClass = class
protected
 FProperty: TCustomProperty;
end;

TClass1 = class(TCustomClass)
public
 constructor Create;
end;

constructor Create;
begin
 FProperty := pvPropertyValue;
end;


Вот в таком ключе. Только вот не знаю, что написать вместо ??? и не совсем понимаю, правильным-ли путём я иду?

---

← →
Palladin ©   (2006-12-13 12:26) [1]

Конкретный пример в студию.

---

← →
Ega23 ©   (2006-12-13 12:27) [2]

Возьми integer и не мучайся.

---

← →
mfender ©   (2006-12-13 12:32) [3]

> Ega23 ©   (13.12.06 12:27) [2]
> Возьми integer и не мучайся.

Вот я уж тоже думал об этом... Но он не слишком нагляден. А делать string - потом громоздить if...elseif

---

← →
Ega23 ©   (2006-12-13 13:06) [4]

> Вот я уж тоже думал об этом... Но он не слишком нагляден.
>  


Возьми integer и по ходу дела заводи константы.

const pvPropertyValue =0;
.....

---

← →
ЮЮ ©   (2006-12-13 13:39) [5]

> Возьми integer и по ходу дела заводи константы.
>
> const pvPropertyValue =0;


По ходу можно и перечислимый тип добавлять :)

---

← →
Ega23 ©   (2006-12-13 13:45) [6]

> По ходу можно и перечислимый тип добавлять :)


Только там ты в 255 ограничиваешься...

---

← →
Ega23 ©   (2006-12-13 13:45) [7]

> Только там ты в 255 ограничиваешься...
>


Или вру?

---

← →
Barloggg   (2006-12-13 14:15) [8]

врешь. меньше. по числу бит. то есть n x 8.

---

← →
Ega23 ©   (2006-12-13 14:47) [9]

> врешь. меньше. по числу бит. то есть n x 8.


Это ты путаешь enumeration и set of

---

← →
Steep ©   (2006-12-13 15:20) [10]

Насколько я знаю взяв string его можно пребразовать во все остальное..
Если я вобще о том думаю :)

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.028 c