v7: Преобразовать строку в HEX Строку в 1С 7.7 #771549

Кто знает как это сделать?

В неведомую е... что?

Для 7 ки удобно использовать

Это Base64.

Hex это 16 ричная система исчисления а Base64 64 ричная

точно, я перепутал. Спасибо.

там функция строк в 10 максимум

хотя нет, не понял задачу. Число в HEX-строку легко. HEX-строку в число легко. А строку в HEX... ХЗ. Это каждый символ представить как байт и преобразовать в HEX чтоли?

Байт? А если уте utf (7,8), unicode, другая мультибайтовая?

там же не текст, там строка. Хотя, хз что там аутор имел в виду...

ну и обратная функция

клюшки жеж. Откедова утф? зачем так сложно?

Ну не читал ?

+ поэтому "так сложно"

Вать машу... Что, ascii забыли совсем все? Результат=1 Для и=1 по стрдлина(вхстрока) цикель Результат+=симв(кодсимв("0")+цел(кодсимв(сред(вхстрока,и,1))/16))+симв(кодсимв("0")+цел(кодсимв(сред(вхстрока,и,1))%16)) КонецЦикла 7 строк с учетом оборачивания и возврата...

ыыы, убил не я конечно не спорю что так можно, но это изврат

Не будет работать, когда кодсимв(сред(вхстрока,и,1))/16) >9 или кодсимв(сред(вхстрока,и,1))%16 >9, поскольку в ASCII разрыв между "9" и "A". Зачем вычислять кодсимв("0")? Просто 48. Зачем вызывать цел для кодсимв? Если нужен однострочник, то вот: Результат+=сред("0123456789ABCDEF",кодсимв(сред(вхстрока,и,1))/16),1) + сред("0123456789ABCDEF",кодсимв(сред(вхстрока,и,1))%16),1) );

Ребята, всем спасибо за участие, буду пробовать. Буквы теряются. Garykom, спасибо за

Чего там сложного? Едва ли моя функция сложнее ...

сам-то пробовал? не работает

Все получилось, использовал Всем спасибо за помощь.