Mit dem heute auf
http://www.newlisp.org/ freigegebenen Release 7.400 von newLISP (Open Source) ist es einfach möglich eine Lisp-
DLL in Delphi einzubetten und das
GUI von Delphi zu nutzen.
Hier ein paar Zeilen Code zur Einbindung:
Code:
type
TNewLispCall = function(string1: PChar): PChar; stdcall;
Code:
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;