Einzelnen Beitrag anzeigen

HPW

Registriert seit: 28. Feb 2003
160 Beiträge
 
Delphi 7 Professional
 
#1

Embeded Lisp in Delphi

  Alt 20. Dez 2003, 22:27
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;
Hans-Peter
  Mit Zitat antworten Zitat