这是bcb的写法,怎么弄到delphi板块来了???
解决方案 »
- 求助 :关于编排考场的方法 请多指点
- 做HOOK程序,求几个按键的键值?
- 使用QuickReport如何调整显示出来每条记录的行距?
- 一个字符串的小问题
- 一个很急的问题,请各位大侠帮忙,小女子在此谢了~~~~~~~~~~~~~
- 怎样判断文件中的行号,
- 那位高手能帮我,谢谢!
- 又一MS面试题目,先做出来的有分!
- 大家知道delphix吗,又没有其他的什么开发direct3d的delphi开发包阿?
- 在刚安装完delphi5后,第一次运行时弹出下面的对话框....为什么选YES后,对一个已完成的工程按F9运行时,常常产生“。FFFFFFF”之类的错误?
- 万分恭敬十分谦虚百分之百热情的向大家请教一个问题~我所有的分数都在这里了~
- 一个最简单的DLL都调用不了,来看看是不是设置不对?
这里的意思大概是指调用TForm1的函数?(我记不清C++的符号了)。
这中函数在delphi中怎么调用?bool __fastcall TForm1::EnumerateFunc(HWND hwnd ,LPNETRESOURCE lpnr,TTreeNode * ParentNode)
{
DWORD dwResult, dwResultEnum;
HANDLE hEnum;
DWORD cbBuffer = 16384; /* 16K is reasonable size */
DWORD cEntries = 0xFFFFFFFF; /* enumerate all possible entries */
LPNETRESOURCE lpnrLocal; /* pointer to enumerated structures */
DWORD i;
dwResult = WNetOpenEnum(RESOURCE_GLOBALNET,
RESOURCETYPE_ANY,
0, /* enumerate all resources */
lpnr, /* NULL first time this function is called */
&hEnum); /* handle to resource */
if (dwResult ==67) //domain下没有可访问的主机
return true;
if (dwResult != NO_ERROR ) { //无
ShowError(dwResult);
return false;
}
TTreeNode * Child;
do {
lpnrLocal = (LPNETRESOURCE) GlobalAlloc(GPTR, cbBuffer); dwResultEnum = WNetEnumResource(hEnum, /* resource handle */
&cEntries, /* defined locally as 0xFFFFFFFF */
lpnrLocal, /* LPNETRESOURCE */
&cbBuffer); /* buffer size */ if (dwResultEnum == NO_ERROR) {
for(i = 0; i < cEntries; i++) {
Child=TreeView1->Items->AddChild(ParentNode,lpnrLocal[i].lpRemoteName);
if(RESOURCEUSAGE_CONTAINER ==
(lpnrLocal[i].dwUsage & RESOURCEUSAGE_CONTAINER))
if(!EnumerateFunc(this->Handle, &lpnrLocal[i],Child))
ShowMessage("EnumerateFunc returned FALSE.");
}
} else if (dwResultEnum != ERROR_NO_MORE_ITEMS) {
ShowError(dwResultEnum);
break;
}
}
while(dwResultEnum != ERROR_NO_MORE_ITEMS);
GlobalFree((HGLOBAL) lpnrLocal);
dwResult = WNetCloseEnum(hEnum);
if(dwResult != NO_ERROR) {
ShowError(dwResult);
return FALSE;
}
return true;
}
c++是类名::函数名
delphi是类名.函数名
另外如c++中类成员函数或成员变量与全局同名
可以用::函数名或变量来调用全局的
::是C++中的作用域限定操作符
用于类和名空间。如
class1::member1 表示类CLASS1的成员MEMBER1
namespace1::member1 表示名空间NAMESPACE1的成员MEMBER1
::member1 表示全局成员MEMBER1(因为C++中的全局是一个无名的名空间,所以::前面没有东东)