- 博客(2)
- 收藏
- 关注
原创 怎样屏蔽掉开始按钮?
procedure TForm1.Button1Click(Sender: TObject); begin {Disable the start button} EnableWindow(FindWindowEx(FindWindow(Shell_TrayWnd, nil),0, Button, nil),false); end; procedure TForm1.Button2Click
2001-11-08 01:26:00
1437
原创 怎样屏蔽或打开windows里的快捷键
屏蔽var Dummy: Integer; begin SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @Dummy, 0); SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0); end; 打开var Dummy: Integer; begin System
2001-11-01 01:11:00
1950
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人