Boolean

← →
Axis_of_Evil © (2006-09-27 01:35) [0]

BoolToStr(Boolean(12), False);
Access Violation;

// массив TrueBoolStrs, надо думать, только 2 элемента имеет.
если считать Boolean(12) некорректной, зачем раздали?
в чем шутка?

← →
Axis_of_Evil © (2006-09-27 01:41) [1]

Casting the variable to a Boolean type is unreliable

вот в чем шутка.

← →
Percent (2006-09-27 01:41) [2]

function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string;
const
cSimpleBoolStrs: array [boolean] of String = ("0", "-1");
begin
if UseBoolStrs then
begin
VerifyBoolStrArray;
if B then
Result := TrueBoolStrs[0]
else
Result := FalseBoolStrs[0];
end
else
Result := cSimpleBoolStrs[B];
end;

Шутка в том, что некоторые любят искать проблемы на пустом месте.
Параметр UseBoolStrs - для кого?

Boolean Найти похожие ветки