freepascal.ru

ev писал(а):скажу даже больше - в одном из законов это написано... но есть нюанс

Alex2013 писал(а):Кстати заметил, что мало кто использует "методы типа стринг " хотя это очень удобно .

var
  arPassBytes :array of byte; 
  sPassword   :String;
begin
    //Преобразование пароля в байты
    SetLength(arPassBytes,c);
    for i:=1 to c do
    begin
       arPassBytes[i-1]:=Ord(sPassword[i]);
    end; 

Sharfik писал(а):...Интересен чужой опыт, что люди думают.

Sharfik писал(а):...у меня нет большого доверия к Ord().

iskander писал(а):А что не так с Ord()?

delphius писал(а):Уже писал наверное, в прошлом году повторил до результата tls 1.3, вот практическое приложение к отправке, например, почты
Там внутри всё от и до, на базе этого можно реализовать свой Noise)
Понятно, что криво и с надежностью openssl не сравнить, но работает)