Поиск сообщества
Показаны результаты для тегов 'Unicode'.
Найдено: 4 результата
-
function OnlyDec(const s: String): string; Var ch: char; i: integer; begin for i := 0 to s.Length do if CharInSet(s[i], ['0'..'9']) then result := result + s[i]; или for i := low(s) to High(s) do if CharInSet(s[i], ['0'..'9']) then result := result + s[i]; или for ch in s do if ch in ['0'..'9'] then result := result + ch; или for ch in s do if CharInSet(ch, ['0'..'9']) then result := result + ch; end; Почитал http://docwiki.embarcadero.com/RADStudio/Tokyo/en/String_Types_(Delphi) но до конца не понял. Как всё-таки более правильно сделать цикл по строке? Я склоняюсь к последнему варианту.
-
Обнаружил очередной глюк Tokyo - сломали Text в Android. А именно порушили раскраску символов Юникода. Воспроизводится просто : procedure TFormMain.FormCreate(Sender: TObject); Var Text1: TText; begin Text1:=TText.Create(Self); Text1.Text:='|' + Char($2713) + '|'; Text1.Font.Size:=48; Text1.Color:=TAlphaColorRec.Red; Text1.Align:=TAlignLayout.Client; Text1.TextSettings.HorzAlign:=TTextAlign.Center; Text1.TextSettings.VertAlign:=TTextAlign.Center; FormMain.AddObject(Text1); end; На первом скриншоте этот код выполнен в Berlin, все выглядит как задуманно. На втором скриншоте этот же код в Tokyo.
-
Доброго всем дня! У меня в самый неподходящий момент возникла следующая проблема: Есть приложение для Win и Mac. Работает с SQLite (Через FDQuery). Естественно, в базе куча данных с кириллицей. Так вот, на Win - все нормально, на одном Mac(10.10) - тоже все хорошо. Попробовал поставить на второй Mac(10.9.5) - b и вот там уже начались проблемы с кодировкой. Причем, читает из таблицы S := Query.FieldByName('Title').AsString; //Без проблем а вот при записи в таблицу Query.ParamByName('Title').AsString := 'Заголовок'; В таблицу записывается '????????' (Причем именно запись идет неправильно). При подключении к базе Указываю, что StringFormat=Unicode. Может кто-то сталкивался с таким уже? Есть подозрения, что на 10.9.5 какая-то старая dylib, которая неправильно работает с кириллицей. тогда, наверное, нужно подключать свою к приложению, но опять же, где ее взять и как подключить?