这是一段C++的代码,那位大神能帮翻译成完整的DELPHI代码。
HWND hWnd = FindWindow(TEXT("ACG!"),0)
CHAR cmd[] = "connect myserver.com:27015" // 命令 "connect myserver.com:27015" 便会在游戏控制台中执行
COPYDATASTRUCT cpd;
pd.dwData = 0;
cpd.cbData = strlen(cmd);
cpd.lpData = cmd;
SendMessage(hWnd,WM_COPYDATA,(DWORD)0x12,(LPARAM)&cpd);
HWND hWnd = FindWindow(TEXT("ACG!"),0)
CHAR cmd[] = "connect myserver.com:27015" // 命令 "connect myserver.com:27015" 便会在游戏控制台中执行
COPYDATASTRUCT cpd;
pd.dwData = 0;
cpd.cbData = strlen(cmd);
cpd.lpData = cmd;
SendMessage(hWnd,WM_COPYDATA,(DWORD)0x12,(LPARAM)&cpd);
解决方案 »
- delphi7导入导出求助
- 很菜的问题::datasource,query和database三个控件该怎么连接数据库?具体方法..谢了...
- 怎么样将数组中的内容赋给checklistbox
- checklistbox问题,高手指教!
- 哪位大侠用过类似于outlookbar的控件?欢迎推荐个比较不错的控件
- 求助:哪儿有DELPHI控件dbgrideh下载,请知道的朋友告诉我,谢谢了
- 白领科技正式成立,帮忙进行网站测试与软件测试
- 我编的Echo程序为什么总是连接主机超时?
- 关于进程问题
- 请问大侠,我用Delphi开发提供给ASP使用的组件?
- delphi new如何申请、分配、以及释放空间 ?
- 如何截取字符串?
var
h:HWND;
cmd:string;
cpd : COPYDATASTRUCT;
begin
h := FindWindow('ACG!',nil);
cmd := 'connect myserver.com:27015'; // 命令 "connect myserver.com:27015" 便会在游戏控制台中执行
cpd.dwData := 0;
cpd.cbData := Length(cmd);
cpd.lpData := PChar(cmd);
SendMessage(h,WM_COPYDATA,$12,Lparam(@cpd));
end;