Вниз
Скачать: 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 вся ветка

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



Память: 0.47 MB
Время: 0.025 c
1-1124965022
Dust
2005-08-25 14:17
2005.09.18
ConvertStrToNetUnicode в функции ошибка


2-1123601748
Koala
2005-08-09 19:35
2005.09.18
Помогите правильно составить запрос.... FB 1.5


3-1123060466
set666
2005-08-03 13:14
2005.09.18
Глюк с Rave Reports 5.0


6-1117100431
КиТаЯц
2005-05-26 13:40
2005.09.18
Команда "дисконект"


3-1123133263
k2
2005-08-04 09:27
2005.09.18
Курсорные переменные (oracle)




   Наверх