VPF::w: 1..100; :| - Форум программистов

Ak47black

Дата 12.6.2009, 12:45 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

Народ подскажите пожалуйста, что это за зверь и с чем его едят

Код


var
  w: 1..100;

pseud

Дата 12.6.2009, 13:39 (ссылка)

(голосов:1)

Загрузка ...

Экспёрт Тыдыщ

Профиль
Группа: Завсегдатай
Сообщений: 1175
Регистрация: 18.5.2007
Где: Минск, Беларусь

Репутация: 10
Всего: 40

Код


procedure TForm1.FormCreate(Sender: TObject);
var
  w: 1..200;
begin
  w := 111;
  // w := 500; error
  if w in [100..150] then;
end;

Добавлено через 8 минут и 18 секунд

Цитата

Subrange types
A subrange type represents a subset of the values in another ordinal type (called the base type). Any construction of the form Low..High, where Low and High are constant expressions of the same ordinal type and Low is less than High, identifies a subrange type that includes all values between Low and High. For example, if you declare the enumerated type

Код


type TColors = (Red, Blue, Green, Yellow, Orange, Purple, White, Black);

you can then define a subrange type like

Код


type TMyColors = Green..White;

Here TMyColors includes the values Green, Yellow, Orange, Purple, and White.
You can use numeric constants and characters (string constants of length 1) to define subrange types:

Код


type
  SomeNumbers = -128..127;
  Caps = 'A'..'Z';

When you use numeric or character constants to define a subrange, the base type is the smallest integer or character type that contains the specified range.
The Low..High construction itself functions as a type name, so you can use it directly in variable declarations. For example,

Код


var SomeNum: 1..500;

declares an integer variable whose value can be anywhere in the range from 1 to 500.
The ordinality of each value in a subrange is preserved from the base type. (In the first example above, if Color is a variable that holds the value Green, Ord(Color) returns 2 regardless of whether Color is of type TColors or TMyColors
.) Values do not wrap around the beginning or end of a subrange, even if the base is an integer or character type; incrementing or decrementing past the boundary of a subrange simply converts the value to the base type. Hence, while

Код


type Percentile = 0..99;
var I: Percentile;
...
I := 100;

produces an error,

Код


...
I := 99;
Inc(I);

assigns the value 100 to I (unless compiler range-checking is enabled).
The use of constant expressions in subrange definitions introduces a syntactic difficulty. In any type declaration, when the first meaningful character after = is a left parenthesis, the compiler assumes that an enumerated type is being defined. Hence the code

Код


const
  X = 50;
  Y = 10;
type
  Scale = (X - Y) * 2..(X + Y) * 2;

produces an error. Work around this problem by rewriting the type declaration to avoid the leading parenthesis:

Код


type
  Scale = 2 * (X - Y)..(X + Y) * 2;

--------------------

Испытание чужого терпения можно считать успешным, если оно лопнуло...

Ak47black

Дата 12.6.2009, 22:20 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

Аааа, вот значит как он определяется. smile

Надеюсь на экзамене правильно ответил.
Нужно было ответить как повысить эту переменную на единицу.
Ответил

Код


Inc(w);

(Вообщем не повезло мне с вопросом, какой странный мне попался smile

)
Спасибо
pseud, за помошь +

Это сообщение отредактировал(а) Ak47black - 12.6.2009, 22:21

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »