Показать сообщение отдельно
  #2  
Старый 21.06.2017, 23:04
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,004
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

ну, i << 8 это i shl 8
При этом i видимо типа long (Integer) - 4 байта.
data - что-то типа array of byte
Не знаю, что такое decrypt_with_vector - с этим сам разбирайся, а остальное выглядит как-то так:
Код:
var
  I : Integer;
begin
  I := data[0];
  I := (I shl 8) + data[1];
  I := (I shl 8) + data[2];
  I := (I shl 8) + data[3];
  If (I = 0) Or (I+4 < dsize) then exit;

  // что такое decrypt_with_vector???
  I := decrypt_with_vector(...);
Ответить с цитированием