VC调用DELPHI DLL乱码
Delphi(Pascal) code:
library HealthDocDll;
uses
SysUtils,
Classes,
Forms,
Dialogs,
Windows,
HealthDoc in 'HealthDoc.pas' {frmHealthDoc},
pub in 'pub.pas';
{$R *.res}
procedure ShowForm(DoctorName,UserName:string);
begin
sDoctorName:=DoctorName;
sUserName:=UserName;
showmessage(sdoctorname);
showmessage(susername);
end;
exports
ShowForm;
begin
C/C++ code:
HINSTANCE hDll;
hDll=LoadLibrary( _T("HealthDocDLL.DLL") );
typedef int(*func)(const char*,const char*);
func SmartWord= (func)GetProcAddress( hDll , "ShowForm" );
SmartWord( "aaaaaa" , "b" );
show出来的为什么是乱码？
thiscall是啥？
这不还是那个问题吗，你把两边都改成 stdcall,听我的
刚才打错了，
stdcall出错
delphi侧:
procedure ShowForm(DoctorName,UserName:string);stdcall;
vc侧:
typedef int(_stdcall *func)(const char*,const char*);
依然出错，依然乱码
可以了，谢谢，个人犯的错误，劳烦大家了
能把你的dll发到我邮箱吗，lxqiang123321@163.com
相关问答：
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
一直想使用dll，但delphi的dll子窗体经常有各种问题，比如主窗口与dll子窗口的焦点问题，子窗口中控件的tab键、热键、enter键等的问题，子窗口退出的问题、平面按钮问题等等，网站上进行了搜索，没有比较完美的解决� ......
xml := CreateOleObject('Microsoft.XMLHTTP');
xml.Open('GET','http://www.google.com', False);
xml.Send;
xml.responseText;
使用xml.responseText可以获取网页源码,但是再次 ......
1、我能否在delphi里调用另外一个后台程序，但是我不需要等待这个后台程序执行完成，还可以继续执行别的程序。请问具体怎么样才能实现。
2、我能否在delphi上执行一个快捷键，使delphi窗口程序能够刷新一下。[/size ......
主窗体:
Delphi(Pascal) code:
procedure TfrmMain.btnResumeClick(Sender: TObject);
begin
myThread := TClientThread.Create(LeftPart(cbbServer.Text, ':'), StrToInt(RightPart(cbbServer.Text, ':')) ......
