zub писал(а):Откуда ожидания что для utf8 строк должна быть посимвольная индексация в компиляторе? кто когда это декларировал?
на второй круг пошли?
Добавлено спустя 6 минут 34 секунды:
вот отсюда viewtopic.php?p=93519#p93519
и далее по кругу
Модератор: Модераторы
zub писал(а):Откуда ожидания что для utf8 строк должна быть посимвольная индексация в компиляторе? кто когда это декларировал?
sts писал(а):в том то и дело, ручки есть, колесики на чемодане хотелось бы сохранить.
Лекс Айрин писал(а):sts писал(а):в том то и дело, ручки есть, колесики на чемодане хотелось бы сохранить.
то есть, то, что внутри хлам, лично Вы не отрицаете...
sts писал(а): даже классы в паскале менее фундаментальны чем тип строка
sts писал(а):она единственная на которую стоит ориентироваться
vada писал(а):Кстати, вчера объявлено о выходе релиза 1.6
Лекс Айрин писал(а):возможности, которые уже мало кто использует (а то и не использует вовсе)
There are wrapper functions around LCL, CodeTools and LazUtils for some string functions defined in LazUtils. The wrappers are now deprecated. They can be compeletely disabled by defining "DisableWrapperFunctions". They will be removed in the next release (after 1.6).
resident писал(а):Как включить эту опцию?
resident писал(а):Вот этот Юникод. Всем без него очень плохо жилось?
zub писал(а):Т.е. есть строка, есть разделители, есть нужный текст между разделителями...
ищем позиции раделителей в строке (функция pos)
procedure TMainForm.FindDialog1Find(Sender: TObject);
begin
FindTxt := FindDialog1.FindText;
MainEditor.SelStart := UTF8Pos(FindTxt,
UTF8Copy(MainForm.MainEditor.Lines.Text, PosEditor + 1,
UTF8Length(MainForm.MainEditor.Lines.Text))) + PosEditor - 1;
if MainEditor.SelStart >= PosEditor then
begin
{выделение найденного текста}
MainEditor.SelLength := UTF8Length(FindTxt);
{изменение начальной позиции поиска}
PosEditor := MainEditor.SelStart + MainEditor.SelLength + 1;
end
else
begin
ShowMessage('Текст "' + FindTxt + '" не найден.');
FindDialog1.CloseDialog;
end;
MainEditor.SetFocus;
end;
Лекс Айрин писал(а):вообще-то, есть функция UTF8Pos...
Deprecated, see #LazUtils.LazUTF8 for replacements.
эта тайна в вики описана. Лежит и вас дожидаетсяЯ несколько страниц пытался узнать эту тайну.
Сейчас этот форум просматривают: Google [Bot] и гости: 8