Tips (1541)

Tip Rating (5):

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