S11HTのバックライト

バックライトの輝度を変更するには、レジストリを変更すればいいのだが。。。
MortScriptにて

bl = RegRead("HKCU", "ControlPanel\BackLight", "Brightness")

Switch (bl)
Case (1)
bl = 10
Case (2, 3, 4, 5, 6, 7, 8, 9, 10)
bl = 1
EndSwitch

RegWriteDWord("HKCU", "ControlPanel\BackLight", "Brightness", bl)

とすると、レジストリの値は変更されるが、S11THでは、ソフトウェアリセットをしないと、適用されない。
BackLightChangeEvent
なるイベントを発生させる必要があるようだ。ただ、MortScriptでイベントを発生させる方法はよくわからない。VS2005を使って、コードを書いてみよう。