这2个函数如何写成Delphi代码？谢谢
C/C++ code:
void SendScanMessage(HWND hwnd, LPCTSTR szMessage)
{
if (GetRandNumber() == 1)
{
COPYDATASTRUCT copyData;
copyData.dwData = (DWORD) MESSAGE_REGISTRY_CLEAN;
copyData.cbData = ((DWORD)wcslen(szMessage) + 1) * sizeof(TCHAR);
copyData.lpData = _alloca(copyData.cbData);
ZeroMemory(copyData.lpData, copyData.cbData);
CopyMemory(copyData.lpData, szMessage, copyData.cbData);
::SendMessage(hwnd, WM_COPYDATA, (WPARAM)NULL, (LPARAM)©Data);
}
}
void SendErrorMessage(HWND hwnd, int nSendNumber, LPCTSTR szNumber, LPCTSTR szRepair, LPCTSTR szShowBold, LPCTSTR szShowNormal)
{
std::wstring str = szNumber;
str += L"|";
str += szRepair;
str += L"|";
str += szShowBold;
str += L"|";
str += szShowNormal;
COPYDATASTRUCT copyData;
copyData.dwData = (DWORD) nSendNumber + MESSAGE_REGISTRY_CLEAN;
copyData.cbData = ((DWORD)str.size() + 1) * sizeof(TCHAR);
copyData.lpData = _alloca(copyData.cbData);
ZeroMemory(copyData.lpData, copyData.cbData);
CopyMemory(copyData.lpData, str.c_str(), copyData.cbData);
::SendMessage(hwnd, WM_COPYDATA, (WPARAM)NULL, (LPARAM)©Data);
}
其中 MESSAGE_REGISTRY_CLEAN为自定义数据
希望对 LZ有帮助。
印象中楼主从没结�
相关问答：
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......
请问Delphi有树形控件吗？
怎样使用？
Ttreeview
treeview.items.addchild(nil(上级节点),'案发时发'(text));
raize 控件包里面有，csdn有下载的
查帮助TTreeView和TNode两个类
TTreeView ......
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 ......
hongqi162、windindance
此2人长期不在线，特别是windindance
更换有能力的人上
hongqi162还是经常上来转转的
引用
更换有能力的人上
其实也不是什么能力的原因，主要可能是时间问题吧
工作的还要上班，学� ......
