[[basti]]

Prueba con punteros:

Código Delphi [-]
Function pasar(message_buf:PChar;message_len:PInteger;relleno:PChar): integer;stdcall;external 'libreria.dll';

Y en la llamada

Código Delphi [-]
nValor:=Pasar( @message_buf[0], @message_len, @relleno );