連絡事項でございやす
[特権を有効にする] のコードの

   // シャットダウン特権を与える
  SetPrivilege(SE_SHUTDOWN_NAME, True);

　
の第 1 引数は文字列なので，

SetPrivilege('SeShutdownPrivilege', True);

　
な感じでどうでしょう ?
それとも定数値指定に変更してしまうとか ?
http://ht-deko.minim.ne.jp/tech043.html#tech089

今，更新作業しているサンプルで使いたいので (^^)

引用 DEKO on 2013/07/07 20:06 Sun
ん？SE_SHUTDOWN_NAME とかって文字列定数じゃなかったでしたっけ？
# 何かトンチンカンな事言っていたらスミマセン (^^;A

わわっ，ゴメンナサイ，ユニットにする時に，const 部までを一緒に implementation 部にコピーしてしまっていました．
えらいポカ，チョンボでした．