Цитата:
|
Сообщение от Aristarh Dark
Правильнее будет для всех unicode версий сделать условие. ...
|
Как это условие сформулировать? А вариант работы с циклами не подойдет?
Код:
var
S: string;
I: Integer;
ch1: Char;
begin
// Универсальный, вариант 1
// (работает для любых настроек,
// доступен, начиная с Delphi 2006)
for ch1 in S do
use(ch1);
// Универсальный, вариант 2
// (работает для любых настроек,
// доступен, начиная с Delphi XE3)
for I := Low(S) to High(S) do
use(S[i]);
end;
В чем недостаток {$ZEROBASEDSTRINGS ON}?