Title: How to Embeded Lisp in Delphi
type
TNewLispCall = function(string1: PChar): PChar;
stdcall;
//...
var
DllCall: TNewLispCall;
//...
Handle := 0;
Handle := LoadLibrary(PChar('newlisp.dll'));
if Handle 0 then
begin @DllCall := GetProcAddress(Handle, PChar('dllEvalStr'));
if Assigned(DllCall) then
begin
RetStr := nil;
RetStr := DllCall(PChar(DllParam1));
end;
end;