[roamer]

Только сейчас обнаружил вот такое в Delphi 2009.

Объявляю:

Код:

//-------------------------------------
function ПолучитьЗначение() : widestring;
Const
  МояКонстанта = 'Привет';
Var
  МояПеременная : integer;
begin
  МояПеременная:=999;
  Result:=МояКонстанта + ' : ' +UIntToStr(МояПеременная);
end;
//-------------------------------------

И все "это" работает:

ShowMessage(ПолучитьЗначение());


Похоже, что скоро мы будем наблюдать исходники на :

Русском, Корейском, Арабском, Английском и прочее, прочее, прочее.

[Pilot_Red]

интересно!
Но интереснее другое, как обнаружил???? Я сомневаюсь, что это чистая случайность

[TOJluK]

Жесть. Оно и в 2007 работает )))

[Pilot_Red]

Сообщение от TOJluK

Жесть. Оно и в 2007 работает )))

мля может и 7-м работает

[PhoeniX]

Не, семёрка ругается...
Блин, скоро "индусский код" станет индусским в прямом смысле...

[roamer]

Сообщение от Pilot_Red

интересно!
Но интереснее другое, как обнаружил???? Я сомневаюсь, что это чистая случайность

--- Именно, что случайно.
Ваял модуль, когда вызвало оно (начальство).
Как раз обдумывал имя новой функции.
Чтобы не забыть (чего хотел) - создал пустышку с русским именем.
Думал, что при компиляции вывалится и продолжу.
Но...
Тогда уж стал экспериментировать.

Кстати.
Имена контролов теперь тоже русский язык "глотают"...

Теперь придется быть особо внимательным (если вдруг случайно переключение клавиатуры не сработает при переходе от Caption к Name, то автоматом не отловится).

[Pilot_Red]

Сообщение от roamer

--- Именно, что случайно.
Ваял модуль, когда вызвало оно (начальство).
Как раз обдумывал имя новой функции.
Чтобы не забыть (чего хотел) - создал пустышку с русским именем.
Думал, что при компиляции вывалится и продолжу.
Но...
Тогда уж стал экспериментировать.

Кстати.
Имена контролов теперь тоже русский язык "глотают"...

Интересно сами разрабы знают об этом

[Pilot_Red]

+тем, кто не любит писать коменты

[roamer]

В догонку...

Кстати.
Кто использует FastScript.
В версии (что в FastReport 4) вот такое тоже прошло:

Код:

function ПочтиКакВ1С_но_НЕпривычно() : string;
begin
  Result:='А надо ли ЭТО программисту ?';
end;
...
...
...
ShowMessage(ПочтиКакВ1С_но_НЕпривычно());

Это уже очевидно полезно (кто встраивает интерпретатор в свою прогу).