[cloayza]

Veamos si esto soluciona el problema...

Código Delphi [-]
var
...
  str : string;
 ...
begin
      ...
      SetLength(str, 100);

     error := ConsultarVersionDll( PChar(str), Length(str), mayor, menor );
     ....
end;

Saludos cordiales