nap<>

← →
nap<> (2006-03-07 14:24) [0]

Помогите разобраться с
TSomeOwner = (User_, Group_);

TSomeWhat = record
case TWayOwner of
user_: (OwnerUser: TUser);
group_: (OwnerGroup: TSimpleGroup);
end;

TWay = record
What: TWayWhat;
Number: integer;
Read: boolean;
Write: boolean;
Necessary: boolean;
end;

как мне потом для what опредилить user_ это или group_?

← →
Virgo_Style © (2006-03-07 14:42) [1]

> как мне потом для what

> What: TWayWhat;

Не вижу описания для TWayWhat.

Видимо, это замаскированный TSomeWhat %-)
afaik, в таких случаях вводят флажок, по которому и проверяют, что содержится в переменной типа TSomeWhat - user_ или group_.

← →
nap<> (2006-03-07 14:50) [2]

Вот переделал разобрался
TWayOwner = (User_, Group_);

TWay = record
Number: integer;
Read: boolean;
Write: boolean;
Necessary: boolean;
case What : TWayOwner of
user_: (OwnerU: TUser);
group_: (OwnerG: TSimpleGroup);
end;

Вот а как теперь сделать вот эту конструкцию
user_: (OwnerU: TUser);
group_: (OwnerG: TSimpleGroup);
в таком виде
user_: (Owner: TUser);
group_: (Owner: TSimpleGroup);

← →
nap<> (2006-03-07 14:59) [3]

Класс писать с переопределяемым полем?
Мутор без него надо!!!

← →
nap<> (2006-03-07 15:02) [4]

Класс писать с переопределяемым полем?
Мутор без него надо!!!

← →
nap<> (2006-03-07 15:28) [5]

Класс писать с переопределяемым полем?
Мутор без него надо!!!

← →
nap<> (2006-03-07 16:35) [6]

Класс писать с переопределяемым полем?
Мутор без него надо!!!

заело

nap<> Найти похожие ветки