forum.clarionlife.net

Тогда опять всё просто. Есть бинарная последовательность в типе USTRING и понятно, что она должна обрабатываться.


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

Дед Пахом писал(а): 27 Декабрь 2025, 14:16 Уже никого не интересует, что там SV в своём блоге накорябал

А там можно понять без поллитра? Мы выпустим бету одновременно с обновлением релиза...

Игорь Столяров писал(а): 23 Декабрь 2025, 13:55 Уже нет и сервера или пока нет на нём нового релиза ?

Сервера... До это выдавалось "Вы счастливый обладатель самого свежего релиза". А тут - тишина...

Свежая "новость" : Check for Updates не получает информации с сервера о новом релизе...

Народ, НЕ НАДО У СЕБЯ РАЗБЛОКИРОВАТЬ И ПРОВЕРЯТЬ! Я лишь хочу, порадовать нас перед НГ хоть какой-то "новостью"

finsoftrz писал(а): 20 Декабрь 2025, 19:20 Плюсы real мы обсуждали уже - скорость работы на 2 порядка быстрее и унифицированность хранения значений. DECIMAL не всегда корректно работает, может неявно округлить значение, когда это не надо делать, сталкивался как-то с такой проблемой.

А BCD уже не работает?

finsoftrz писал(а): 20 Декабрь 2025, 17:52 А, понял, прямо в вызове деление пишете. Я на автомате выражение с делением всегда в round заключаю.

В любых операциях. Возможна ещё погрешность в логике. 0.1 > 0.999999999999...

Игорь Столяров писал(а): 20 Декабрь 2025, 17:23 Что есть у нас "Digital" ? Если DECIMAL - т

Да, виноват... Но так в процедуре можно присвоить переданное значение и обратно. Лично я так и делаю. Передаю Real, присваиваю переданное значение Decimal, а вся математика и логика работают уже на DECIMAL

Один нескромный вопрос: а почему не используете Digital?

Что-то странное с форумом. Захожу нормально, но на кнопках, вместо иконок, квадратики.

P.S. Оп-ля... Отправил пост и всё вернулось

Она в составе класса c некоторой специфической логикой, вот переделанный, но не оптимизированный вариант

CorrFileName Procedure(InpName)
OutName String(Size(InpName))
I Long
J Long
InpChar String(1)

Code
! Уборка недопустимых символов
J = Len(Clip(InpName))
OutName = ''
Loop I = 1 To J
IF ...

У меня для такого есть стандартная функция filename=correctname(filename), которая проверяет корректность имени и заменяет недопустимые символы на допустимые. Использую перед любым открытием файла с "внешним" именем.

Ага

talgat55 писал(а): 01 Декабрь 2025, 14:34 Читает как одну длинную без cr=13

Так это же на выход...