unit1.h

一个简单的可以在windows平台实现锁屏的小程序源代码。

//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
HHOOK OldHook=NULL;
HINSTANCE hInst=NULL;
bool ctrldown = false;

//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TTimer *Timer1;
        TCheckBox *CheckBox1;
        TLabel *Label1;
        TCheckBox *CheckBox2;
        TCheckBox *CheckBox3;
        TEdit *Edit1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        TButton *Button1;
        TLabel *Label6;
        TButton *Button2;
        TLabel *Label7;
        TLabel *Label8;
        TButton *Button3;
        TLabel *Label9;
        TLabel *Label10;
        void __fastcall Timer1Timer(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall  WndProc(TMessage &msg);
        void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2KeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift,
          int X, int Y);
private:	// User declarations
public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
 long CALLBACK KeyProc(int code, WPARAM wParam, LPARAM lParam)
{
    KBDLLHOOKSTRUCT *key = (KBDLLHOOKSTRUCT*)lParam;
    switch(key->vkCode){
       case 91:
       case 92:
            return 1;
       default:
            return 0;

    }

}

bool __stdcall DisableKB(bool disable) 
{
    if (disable) {
        if (OldHook == NULL)
            OldHook = SetWindowsHookEx(WH_KEYBOARD_LL,
                (HOOKPROC)KeyProc, hInst, NULL);
        return OldHook != NULL;
    }
    else {
        if (OldHook && UnhookWindowsHookEx(OldHook))
            OldHook = NULL;
        return OldHook == NULL;
    }
}


#endif