Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.09.18;
Скачать: CL | DM;

Вниз

Может ли свойство возвращать разные типы данных?   Найти похожие ветки 

 
Darkwing ©   (2005-08-25 09:55) [0]

Есть класс

type
TFieldType = (fType1, fType2, fType3)
TMyClass = Class
 FieldType: TFieldType;
 pData: Pointer;
 property Data: ?
end;


Pointer Data, в зависимости от значения поля FieldType, может указывать на данные различного типа. Как правильно описать свойство Data, которое может иметь любой из типов данных?


 
Reindeer Moss Eater ©   (2005-08-25 10:01) [1]

Свойство всегда будет одного единственного типа.


 
--=ХР=--   (2005-08-25 10:14) [2]

variant


 
Alexander Panov ©   (2005-08-25 10:15) [3]

Darkwing ©   (25.08.05 9:55)

type
TFieldType = (fType1, fType2, fType3)
TMyClass = Class
  FieldType: TFieldType;
  pData: Pointer;
  function Data: String; overload;
  function Data: Integer; overload;
end;


 
OldNaum ©   (2005-08-25 10:15) [4]

Variant ?


 
OldNaum ©   (2005-08-25 10:17) [5]

синхронно ) но вариант Александра мне даже больше нравится )


 
Alexander Panov ©   (2005-08-25 10:21) [6]

Только забыл добавить, что функция должна быть с параметром:

type
TFieldType = (fType1, fType2, fType3)
TMyClass = Class
  FieldType: TFieldType;
  pData: Pointer;
  function Data(Parm: String): String; overload;
  function Data(Parm: Integer): Integer; overload;
end;


 
Reindeer Moss Eater ©   (2005-08-25 10:23) [7]

И что, свойство начало возвращать данные разных типов?
Оно вам возвращает вариант и только вариант.
А так я с таким же успехом могу сказать, что мое строковое свойство возвращает данные разных типов.


 
Leonid Troyanovsky ©   (2005-08-25 10:25) [8]


> Reindeer Moss Eater ©   (25.08.05 10:23) [7]
> И что, свойство начало возвращать данные разных типов?
> Оно вам возвращает вариант и только вариант.


Варианты разных типов.

--
Regards, LVT.


 
Reindeer Moss Eater ©   (2005-08-25 10:39) [9]

Вариант - это ровно один тип и не больше.


 
TUser ©   (2005-08-25 11:03) [10]

Сделать их наследниками одного базоваого класса.


 
Darkwing ©   (2005-08-25 11:04) [11]

Спасибо за помощь, господа!
Мне полностью подходит 6.



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

Текущий архив: 2005.09.18;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.049 c
8-1115423579
ronyn
2005-05-07 03:52
2005.09.18
КАК ИЗБАВИТЬСЯ ОТ ТОРМОЖЕНИЯ ПРИ ПРОИГРЫВАНИИ?


14-1124578753
Andy BitOff
2005-08-21 02:59
2005.09.18
Во чего у меня произошло.


3-1123138964
Ирина
2005-08-04 11:02
2005.09.18
SQL-запрос


9-1116673417
Кирилл
2005-05-21 15:03
2005.09.18
Direct Sound


1-1124965022
Dust
2005-08-25 14:17
2005.09.18
ConvertStrToNetUnicode в функции ошибка