Delphi设置全局快捷键
typeTForm1 = class(TForm)procedure FormCreate(Sender: TObject);procedure FormDestroy(Sender: TObject);protectedprocedure hotykey(var msg:TMessage); message WM_HOTKEY;end;varForm1: TForm1;id,id2:In...