Текущий архив: 2004.03.05;
Скачать: CL | DM;
Вниз
Свойство с ограниченным диапазоном Найти похожие ветки
← →
}|{yk © (2004-02-24 17:54) [0]Можно ли сделать свойство в компоненте, которое будет целого типа и находиться в диапазоне 1-100, не используя для этого функции для записи, т.е. написать просто read FMyVar write FMyVar?
← →
Skier © (2004-02-24 17:57) [1]type
TYourRange = 1..100;
//.........................
property YourRange : TYourRange read FYourRange write FYourRange;
← →
Юрий Зотов © (2004-02-24 17:57) [2]type
TMyVar = 1..100;
...
private
FMyVar: TMyVar;
...
property MyVar: TMyVar read FMyVar write FMyVar...
...
← →
Sandman25+1 (2004-02-24 17:57) [3]Можно
← →
Defunct © (2004-02-24 17:58) [4]Можно
Type TMySmallInt = 1..100
MyClass = class(_)
Private
FCount : TMySmallInt;
..
Public
Property Count:TMySmallInt Read FCount Write FCount;
..
End;
← →
}|{yk © (2004-02-24 18:04) [5]спасибо. А то я чего то в set of 1..100 полез...
Страницы: 1 вся ветка
Текущий архив: 2004.03.05;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.014 c