Tenho problemas com a descriptografia de strings enviadas do PHP para o Delphi usando a cifra rijndael. Estou usando mcrypt no lado PHP e DCP_rijndael no lado Delph

No momento, tenho o código abaix

PHP:

function encRJ($key, $iv, $data)
{
    $r = mcrypt_encrypt(MCRYPT_RIJNDAEL_256, $key, $data, MCRYPT_MODE_CBC, $iv);
    $r = base64_encode($r);
    return $r;
}

E em Delphi:

function decRJ(Data: string; Key: string; IV: string): string;
var ciph: TDCP_rijndael;
begin
  Data := Base64DecodeStr(Data);

  ciph:= TDCP_rijndael.Create(Self);
  ciph.Init(Key[1], 256, @IV[1]);
  ciph.DecryptCBC(Data[1], Data[1], Length(Data));
  ciph.Free;

  Result := Data;
end;

Tentei usar várias unidades na Internet implementando a cifra e descobri que a maioria das pessoas está dizendo sobre os componentes do DCP. Mesmo assim, não consegui decifrá-lo corretamente. Eu tentei usar matrizes de bytes para os parâmetros, AnsiStrings, WideStrings, etc, mas infelizmente sem sort

Desculpe-me se estiver faltando algo realmente óbvio aqui, pois minha mente não está em boa forma, depois de horas pesquisando o assunt