Mega Code Archive

 

Categories / Delphi / Examples

 

Embeded lisp in delphi

{ 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: } 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;