Today I find a bit time to test a new combination: newlisp.dll UTF8 with purebasic 5.62
Since latest purebasic versions are unicode compiler, it was interesting to use newlisp.dll UTF8 there.
Importing the dll is simple:
Code: Select all
OpenLibrary(0,"newlisp_utf8.dll")
Code: Select all
sourcestr.s = GetGadgetText(#Gadget_Form1_String3)
*newlispstr = AllocateMemory(StringByteLength(sourcestr) + SizeOf(Character))
PokeS(*newlispstr, sourcestr, Len(sourcestr),#PB_UTF8)
retstr.s = PeekS(CallFunction(0,"newlispEvalStr",*newlispstr),-1,#PB_UTF8)
FreeMemory(*newlispstr)
SetGadgetText(#Gadget_Form1_Editor5, retstr)
Code: Select all
CloseLibrary(0)