Вот тут строку исправили "При расшифровке, (ключи и исходный текст верные, на PHP расшифровываются) разный результат получается." - смысл вообще изменён. Я писал что на PHP нормально расшифровывается. А на Delphi вообще разные варианты получаются при разных запусках программы на Delphi. То есть 1 раз запустил Delphi она выдала 1 результат расшифровки(кучу непонятных символов), при повторном перезапуске другой результат - о тоже кучу непонятных символов, а ключ, вектор и зашифрованый текст при этом не менялись и заданы битово и статично.
Кроме того "пробую расшифровать", вместо того что задать вопрос сразу начиная "как расшифровать" из заголовка и снипета в пользователю в ПС уже понятно, что есть какой то код и не работающее решение и что в нём конкретно какая то проблема и ищется решение этой проблемы. Если видеть только как расшифровать, то не ясно пользователь пробовал ли вообще что то или он нуб и просит ссылку на какую нибудь статью поскольку у него самого гугл отключили(ну как вариант может подумать). Так что с правками, за исключением выпадающих участков кода по клику не согласен
С выдвигающимися участками кода - нормально.
В остальном:
В тексте тоже фиг знает как направили. Вы думаете по фразе "пробую расшифровать" пользователь читающий вопрос не догадается что в вопросе речь про то как расшифровать именно тем методом которым я в текст и заголовке написал? Кроме того вопрос норм выходил при запросе именно по нужным ключам, включающему в себя версию Delphi алгоритм шифрования, режим и размер ключа? Проверьте будет ли он так же выходить с учётом внесенных правок.
Я когда задаю вопросы пишу текст так, чтобы: 1) он искался по нужным запросам; 2) содержал информацию чтобы при прочтении пользователь понимал его это случай или нет; 3) содержал в себе решение проблемы если она будет решена + окружение по проблеме(какие есть подводные камни, если они есть, чтобы в случаи другого пользователя тоже их по возможности охватить чтобы было представление). А Вы что правками сделали?
Ок. Я понял что по правилам нужно задавать вопрос как вопрос. При этом я изначально делал заголовок и текст эффективным как для seo так и для прочтения.
Hemul GM, извиняюсь если вопрос тупой. Правильно ли я понимаю что я в var создаю ekey: ansiChar; далее ekey:= 'строка с ключем уже в виде SHA256-хеша' + char(24); так? и так ещё для inData и ivector? Или какие то из этих переменных. Или мне их из битовых массивов создать типа for i:= 0 ... ekey2:= ekey2 + char(ekey[i]) + char(24); а лучше если пример приведёте.
С правкой заданного вопроса не согласен в части title - верните пожалуйста какой был или измените корректно. Заголовок составлял с учётом SEO чтобы в нём были нужные ключи. В частности из заголовка убрали явно CBC сделав тем самым из вопроса в большей степени хлам который встречается в интернет, когда сразу не понятно из названия и снипета тот ли это случай. Кроме того из заголовка убрали SHA256 и Delphi и её версию. Возможно есть смысл рассмотреть возможность убрать у этого пользователя права на правки заговков и проверить что он в других вопросах направил. Если поискать сейчас по нужным ключам в яндекс или google выйдет аналог вопроса на стековерфлов, не думаю что это плюс такой для qna хабра.
Я вот ещё что подумал. Я же могу по идее подключить статически или динамически openssl но вот статьи на эту тему с которой бы смог понять как это сделать не нашёл. Может подскажите?
Или вот ещё вариант я тут подумал, раз В пишите, что вRAD Studio 10.3.3 CE шифрование из коробки. Так наверное можно написать на ней dll и экспортировать из неё нужную функцию, а затем подключить её в Delphi7. Или для этого есть какие то препятствия?(я просто не так давно на Delphi программирую). Может быть если есть возможность экспортируете мне эту функцию чтобы я только из за этого новую версию Delphi не ставил?
Крайне желательно, я понимаю что на последней версии там проще с этим.
Сам компонент для криптографии имеет написанный инсталлятор под D7, то есть дело не должно быть в версии Delphi.
Я так понимаю что проблемы бывают(как описывают на форумах) из за типов строк, типа string и ansiString. Но я уже как только не пробовал, в коде что я привёл уже используется array of Bytes, причём и для ключа и для вектора и для данных, по идее не должно быть проблем, вот только всё равно в режиме CBC зашифрованное на PHP на Delphi расшифровать не могу.
