Lazarus 1.6, обсудим изменения...

[Лекс Айрин]

ogorodov, в снапшотной версии уже давно работает.

[SSerge]

В этой версии перестала работать функция UTF8ToSys() ... при сборке под винду ... или это только у меня так

Вы в курсе, что лазарус с компиляторами 3х собирается с опцией, когда кодовая страница RTL по умолчанию - UTF8?
Ну и... UTf8 в UTF8... Что должно получаться при преобразовании?

[Лекс Айрин]

SSerge, я кстати, долго не мог понять почему у меня не работает прога под линуксом... а дело было, судя по всему, как раз в использовании UTF8 версий некоторых функций.

[Xenar]

Я сам три бага нашел, надеялся исправят. Но прошел месяц и без изменений. Зарепортил на багтрекер, два уже исправили. Иногда складывается ощущение, что никто кроме меня этими функциями не пользуется .....

У меня тоже самое... MessageDlg();, как будто кроме меня о ней никто не знает. Было дело если закрыть ее нажав на X, результат был True. Но уже исправили к счастью.

Хм, а я думал это фича
Нарвался на это когда пользователи просто закрывали окно MessageDlg вполне логично считая это равносильно Нет.
Результат был фееричен и стоил мне "пару" седых волос.

[resident]

Бросил это дело. Ждем релиза.
Да! На 1.4.4 64 собирается и работает нормально.

У меня на 1.4.4. одно не работает, а на 1.6RC2 другое, что работало раньше.
Вот из последних сюрпризов:

Код: Выделить всё

if (OfferBinding[i] in ['ю', 'я']) then Str := Str + OfferBinding[i];

in с кириллицей не компилируется, заменяю на латинские буквы

Код: Выделить всё

if (OfferBinding[i] in ['a', 'b']) then Str := Str + OfferBinding[i];

- компилируется.
Не знаю уж чего там ждать от релиза.

[zub]

>>Не знаю уж чего там ждать от релиза.
fpc 3.0 уже давно релизнулся, ждать ничего ненадо))

[resident]

Жаль, что он перешел в такую стадию, что и ждать нечего.

[zub]

>>Вот из последних сюрпризов:
"сюрприз" это вполне логичного поведение компилятора в новых реалиях.
Ждать тут нечего - в смысле надо переделать код так чтобы он работал в старых и новых версиях.
И недопускать подобные скользкие моменты вдальнейшем

[SSerge]

Жаль, что он перешел в такую стадию, что и ждать нечего.

А вот не надо код то такой писать:

if (OfferBinding[i] in ['ю', 'я']) then Str := Str + OfferBinding[i];

...ибо давно уж известно - работаем с UTF8 - никакой больше индексной адресации элементов строк, никакого типа char, никаких in. - все из особенностей, что вы больше не знаете, сколько байт составляет каждый символ вашей строки.

[sts]

т.е. в фп не сделали полноценную поддержку UTF8 строк?

[zub]

Поддержка вполне полноценная.

[resident]

в смысле надо переделать код так чтобы он работал в старых и новых версиях.

Если бы я знал, как его переделать.

никакой больше индексной адресации элементов строк

А что ж делать, если я, к примеру, хочу заменить третью букву, если она "ы"?

никакого типа char, никаких in

Я ж не против. Только почему весь этот треш не выпилили? Я трачу время на то, чтобы узнать какие же из заявленных в документации инструментов больше не работают. Причем я не сразу могу понять - не работает ли инструмент или это я ошибся. Компилятор теперь может вобще ничего толком и не подсказать - просто ошибка и всё. Мазохизм с моей стороны, хамство со стороны разработчиков.

Возьмем, к примеру, StringReplace, который тоже не работает, только что её вспомнил и проверил. В ими называемой "документации" даже не указан тип, с которым должна работать функция. Что я должен нафантазировать насчет этого? Правильно, что все будет хорошо, а в итоге тратить свое время на эти пустые эксперименты и сопли на форуме. Руки надо отрывать за такие релизы.

Код: Выделить всё

program project1;

uses SysUtils;

{$R *.res}

begin
  WriteLn(StringReplace('aAbBcC', 'a', 'c', [rfReplaceAll, rfIgnoreCase]));
  ReadLn;
  WriteLn(StringReplace('эЭяЯюЮ', 'я', 'ы', [rfReplaceAll, rfIgnoreCase]));
  ReadLn;
end.

Это я еще знаком с их дьявольским зоопарком различных функций, где нет единообразия. Одна будет работать с Ansi, а другой с таким же названием в другом классе придется подсовывать AnsiToUTF. Чтобы это выяснить ушло достаточно времени. А придет человек с улицы чисто из любопытства: дай посмотрю, что же это за Лазарус такой? И что? Кровь, кишки.

Благодарю за внимание.

[pupsik]

resident у меня там string "отрисовалось".
Есть ещё отличие: Source position: sysstrh.inc line 218
http://www.freepascal.org/docs-html/rtl/sysutils/stringreplace.html

А придет человек с улицы чисто из любопытства

- А улица не сишка, джавка и т.п. случаем

[resident]

pupsik
1.6RC2
Допустим, там я увижу string. Чтобы это значило "в новых реалиях"?
Вот пример StringReplace чуть выше вобще без переменных - не работает с кириллицей.
Да н_я она нужна, если она не работает. Что и где я должен здесь преобразовать, чтобы она заработала?
Вместо 'ы' писать AnsiToUTF8('ы')?

- А улица не сишка, джавка и т.п. случаем

Разве такой даунгрейд возможен?
Может наоборот на жаву страссе придется свернуть, а если там с документацией нормуль, то и задерживаться не стоит.

[zub]

StringReplace работает, возможно не отработает с rfIgnoreCase, но в общем случае подстроки заменяются.
Если вы возметесь поддерживать документацию в актуальном состоянии - всё будет ок)), а пока лучше для уточнения поглядывать не только доки но и исходники.

>>А что ж делать, если я, к примеру, хочу заменить третью букву, если она "ы"?
Давайте какуюнить более жизненную задачу, требующую именно посимвольной адресации. У меня ниразу небыло нужды посимвольно рассматривать строки, всегда хватало отношения к символу как к подстроке и соотвенных приемов работы.