表单的Init方法:   *声明API函数    Declare Long SystemParametersInfo In "user32" Long uAction , Long uParam, Long lpvParam , Long fuWinIni
    Public SPI_SCREENSAVERRUNNING
    SPI_SCREENSAVERRUNNING = 97    *使Ctrl+Alt+Del无效  SystemParametersInfo (SPI_SCREENSAVERRUNNING, .F., 0, 0)     表单的UnLoad方法:    *使Ctrl+Alt+Del有效
    SystemParametersInfo (SPI_SCREENSAVERRUNNING, .T., 0, 0)