The Enigma Protector 的API如何转换成易语言调用？如何定义dll？

tco99

就是易语言调用一个TEP加壳软件中的一个API接口“EP_RegLoadKeyEx”，想返回其中的Name和Key，一直不成功，因为是小白不太会写dll命令，类型和调用都不太对，返回的Name空白。
源文档的API参数说明如下：

Parameters:
### Name - pointer to the buffer that receives registration name. If the UNICODE Registration Scheme is used in REGISTRATION FEATURES - Common panel then Name buffer contains unicode string otherwise ansi string (without null terminator)

### NameLen - receives a size in bytes of the Name buffer. Returns the required or passed to Name buffer number of bytes

### Key - pointer to the buffer that receives registration key. If the UNICODE Registration Scheme is used in REGISTRATION FEATURES - Common panel then Key buffer contains unicode string otherwise ansi string (without null terminator)

### KeyLen - receives a size in bytes of the Key buffer. Returns the required or passed to Key buffer number of bytes

这里Name和Key大概是个指针，还有一段C#的范例如下：

public class Enigma_IDE{    [DllImport("enigma_ide.dll", CallingConvention = CallingConvention.StdCall)]    public static extern int EP_RegLoadKeyEx(IntPtr Name, ref int NameLen, IntPtr Key, ref int KeyLen);}public static bool EP_RegistrationLoadKeyA(out string Name, out string Key)
    {
        Name = Key = string.Empty;
        int namelen = 0, keylen = 0;
        if (EP_RegLoadKeyEx(IntPtr.Zero, ref namelen, IntPtr.Zero, ref keylen) != LOADKEY_REGINFONOTFOUND)
        {
            byte[] namebuf = new byte[namelen];
            byte[] keybuf = new byte[keylen];
            if (EP_RegLoadKeyEx(Marshal.UnsafeAddrOfPinnedArrayElement(namebuf, 0), ref namelen, Marshal.UnsafeAddrOfPinnedArrayElement(keybuf, 0), ref keylen) == 0)
            {
                Name = Encoding.ASCII.GetString(namebuf);
                Key = Encoding.ASCII.GetString(keybuf);
                return true;
            }
        }
        return false;
    }

然后我易语言是这样写的：





这里一直取不到Name和Key，请问正确的写法是什么？
这里的.dll是加载正常的，函数也成功返回了0

XcantloadX

在调用之前加一句 Name = 取空白文本(255) 试试

dnxl

它这个是2次调用，第一次传空字符串，两个长度传0，函数通过两个长度参数分别返回各自所需要的缓冲区字节数，然后给name和key分配缓冲区空间，再次调用函数，

tco99

XcantloadX 发表于 2022-9-6 18:19
在调用之前加一句 Name = 取空白文本(255) 试试

真的这样就可以了，感谢！可以详细说说这样做的原理吗？