Мне это не нравится.

← →
Kair (2003-02-01 20:50) [0]

При компиляции выдаются следующие ошибки:
"Constant expression violates subrange bounds",
"Comparison always evaluates to True".
Что это за ошибки?

← →
Anatoly Podgoretsky (2003-02-01 21:04) [1]

Со словариком не пробовал переводить?

← →
Kair (2003-02-01 21:07) [2]

>Anatoly Podgoretsky © (01.02.03 21:04)
>Со словариком не пробовал переводить?

Нет.

← →
Anatoly Podgoretsky (2003-02-01 21:24) [3]

Ну так попробуй, или ты что за каждым сообщением компилятора будешь ходить на поклон.

← →
Юрий Зотов (2003-02-01 22:05) [4]

За честность.

"Constant expression violates subrange bounds".
Результат целочисленного выражения выходит за границы, допустимые для его типа. Например:

var B: byte; // от 0 до 255
B := 180 + 100; // результат - 24

Это сообщение может указывать на реальную ошибку в программе. Причем, если при компиляции флажок контроля был снят, то во время выполнения исключение не возникнет, но программа может работать неверно.

"Comparison always evaluates to True".
Результат операции сравнения всегда будет True. То есть, она бесмысленна. Например:

var B: byte; // от 0 до 255.
if (B >= 0) and (B < 300) then ... // заведомо True.

Это сообщение чаще всего указывает на промах программиста. Последствия могут быть любыми, а может и не быть никаких. Но обратить внимание и подумать нужно обязательно. Самое лучшее - добиться, чтобы его не было.

← →
Kair (2003-02-02 09:30) [5]

>Anatoly Podgoretsky © (01.02.03 21:24)
>Ну так попробуй, или ты что за каждым сообщением компилятора >будешь ходить на поклон.

Я за не за каждым сообщением компилятора "хожу на поклон".

← →
Anatoly Podgoretsky (2003-02-02 10:31) [6]

Не знаю, отсюда не видно, а вот если хотел бы разобраться с проблемой, а не переводи фразы, то привел бы текст из прогрммы где у тебя возникает проблема, все больше бы было пользы тебе.

← →
Kair (2003-02-02 13:25) [7]

function TForm1.GetWaveVolume: DWord;
var Woc: TWaveOutCaps;
Volume: DWord;
begin
result:=0;
if WaveOutGetDevCaps(WAVE_MAPPER,@Woc,sizeof(Woc))=MMSYSERR_NOERROR then
begin
if Woc.dwSupport and WAVECAPS_VOLUME=WAVECAPS_VOLUME then
begin
WaveOutGetVolume(WAVE_MAPPER,@Volume); //на эту строку указывает.
Result:=Volume;
end;
end;
end;

Мне это не нравится. Найти похожие ветки