Error en DLL

[MON___]

Gracias, "chackAll" por la respuesta. Desgraciadamente me sigue dando el mismo error (EAccessViolation); ¿cuál es la segunda posibilidad?
Gracias de nuevo por tu respuesta.

[[cHackAll]]

Vaya, en ves de string; declara ShortString o PChar en la librería y en el proyecto que lo llama (en el proyecto original)...

Empezado por Delphi

To avoid using BORLNDMM.DLL, pass string information using PChar or ShortString parameters.

Si ésto no dá aconsejo subas parte del cógido (mínimo funcional) para corregirlo.

[MON___]

Gracias de nuevo, CheckAll. No creo que sea un problema de tipos (string, pchar).
He depurado paso a paso el código y he inspecionado las variables. El error (EAccessViolation) se produce en "FreeLibrary"

procedure TForm1.SpeedButton1Click(Sender: TObject);
type
TLlamarDLL = function(var s : string; x : integer; si : boolean): boolean;
var
buffer : string;
DLL : HWND;
LlamarDLL : TLlamarDLL;
begin
buffer := '';
DLL := LoadLibrary('monlib.dll');
try
@LlamarDLL := GetProcAddress(DLL, 'buscarValor');
if @LlamarDLL <> nil then
if llamarDLL(buffer, 30, false) then
edit1.text := buffer;
finally
FreeLibrary(DLL);
end;

end;

[[egostar]]

Prueba cambiando el tipo de la variable DLL.

DLL : HWND; -----> DLL : THandle;

Salud OS.

[MON___]

Gracias de nuevo. Lo he hecho de las dos formas (THandle / HWND); ahora he estado probando con la directiva "stdcall" y sin ella, pero sigue dándome error.

[roman]

¿Hiciste lo que te comentó cHackAll respecto del tipo de datos string? No es opcional. Si usas strings sin recurrir a BORLNDMM.DLL, la dll va a fallar sí o sí. Además, aunque no aseguro que sea la causa, un string no es sino un apuntador cuya memoria se maneja dinámicamente, y como tal, no sería de extrañar que los errores sólo se manifiesten al intentar liberar recursos, como lo hace FreeLibrary.

// Saludos

[MON___]

¡Gracias a los dos! ¡Tenéis razón! He cambiado STRING por PCHAR y no se produce el error al liberar la librería (FreeLibrary).