Delphi如何把DLL数据传给主程序？

类似这样：

声明DLL中包含的类含尘滚型 typeDLL myDLL

调用 DLL中相应的方法获取返回谈余值 data:String = myDLL .SomeFunc(....)

使兄罩用返回值： edit1.Text = data:String

函数参数的规定应该不是绝对定死的，至少应该有针对不同类型参数的规定。

一般的做法是，使用晌蔽指针在调用和被调用之间传递数据。做法可以参考WIN32API和一些大型软岩弊件的做法。据我所知，大致有两种情况：

1.类似WIN32API的做法。不论是IN还是OUT参数，所有的存储空间都有调用方提供。如：

GetTemp(TCHAR* TempPath)

调用时，TCHAR tp[80]memset(tp, 0, 80*sizeof(TCHAR))GetTemp(tp)

2.类似AutoCAD API的做法。凡是需要OUT的参数，所有的存储空间都由被调函数提供。这种情况，一般还同时会提供一个空间释放函数，类似free()。例：

GetTemp(TCHAR** TempPath)

调用时：粗谨族TCHAR* tp=NULLGetTemp(&tp)...free(tp)

1、向窗口可以通过SendMessage()/PostMessage() API来发送消息。

2、向主程序线程可以通过PostThreamdMessage() API来发送消息。

API中的WPARAM/ LPARAM 参数基本上可以通过强转成任意类型的指针，具体应用就看你的需求了。 但是在发送/响应消息需要注意几点：

1、需要等待消息返回结果的话，需要用SendMessage() API，不毕巧肆能宽侍采用PostMessage() API。

2、如果动态库不需要等待返回结果，只是发送简单类型数据(比如int /char)等，可以直接PostMessage() API发送。 对于复杂类型，比如结构之类的，可以将结构地址指针强转成LPARAM参数类型进行发送，但是需要注意： 如果是结构变量在栈上，你不能采用PostMessage() 来发送， 因为PostMessage() 是异步发送的， 当主程序接收到消息时，可能结构的内存已经在栈上释放或覆盖，导致接收的数据为垃圾数据。可以通过SendMessage()/ReplyMessage()组合完成。

3、当手轿动态库发送的结构/指针在堆上， 且由动态库中new/malloc的分配的内存， 需要在主程序释放时， 要注意动态库编译类型如果是采用/MT编译的，则需要动态库来释放，或由动态库导出释放内存接口供主程序显式调用释放，不然会产生跨模块释放内存的问题，很容易产生一些莫名其妙的崩溃。

---