如何使用 rad studio 显示 windows 的总数?

How to show total number of windows using rad studio?

我在我的 cpp 文件中尝试下面的代码,它给我错误:

[bcc32 Error] Unit1.cpp(15): E2031 Cannot cast from 'int (stdcall * (_closure )(HWND *,long))(HWND__ *,long)' to 'int (stdcall *)(HWND *,long)'

我做错了什么?

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
    BOOL WINAPI EnumWindows((WNDENUMPROC) EnumWinProc, NULL);
}

BOOL CALLBACK EnumWinProc(HWND hwnd, LPARAM lParam)
{
    char title[80];
    GetWindowText(hwnd,title,sizeof(title));
    Listbox1->Items->Add(title);
    return TRUE;
}

输了BOOL WINAPI。您正在尝试调用一个函数,而不是声明一个函数。

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
   EnumWindows((WNDENUMPROC) EnumWinProc, NULL);
}

此外,丢失不必要的 (WNDENUMPROC) 转换。你的回调函数应该有正确的签名,如果没有,你想知道。

您所展示的不可能是您的真实代码。首先,您用于 EnumWindows() 的语法是错误的,不会按原样编译。其次,错误是抱怨转换 __closure,这意味着您正在尝试使用非静态 class 方法作为回调(您不能这样做),但是在您显示的代码。

这是代码应该的样子:

class TForm1 : public TForm
{
__published:
    TListBox *ListBox1;
    ...
private:
    static BOOL CALLBACK EnumWinProc(HWND hwnd, LPARAM lParam);
    ...
public:
    __fastcall TForm1(TComponent* Owner);
    ...
};

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    EnumWindows(&EnumWinProc, reinterpret_cast<LPARAM>(this));
}

BOOL CALLBACK TForm1::EnumWinProc(HWND hwnd, LPARAM lParam)
{
    TCHAR title[80];
    if (GetWindowText(hwnd, title, 80))
        reinterpret_cast<TForm1*>(lParam)->ListBox1->Items->Add(title);
    return TRUE;
}

或者:

// Note: NOT a member of the TForm1 class...
BOOL CALLBACK EnumWinProc(HWND hwnd, LPARAM lParam)
{
    TCHAR title[80];
    if (GetWindowText(hwnd, title, 80))
        reinterpret_cast<TStrings*>(lParam)->Add(title);
    return TRUE;
}

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    EnumWindows(&EnumWinProc, reinterpret_cast<LPARAM>(ListBox1->Items));
}