ABで、レジストリ情報を読んで、ライセンス保護につかってみたい

[いとちゃん]

レジストリ情報を、固有に１個作って
あとで、ABのEXEで、レジストリを読みに行って、アプリケーションのライセンス保護につかってみようと
思いますが、どなたか、レジストリ情報を読みにいくためのコマンドを教えてください。

[たかせ]

レジストリ情報はWin32 Apiで取得します。
例えば
HKEY_LOCAL_MACHINE\AAA\BBB\CCC\DDDの内容を取得するには、

DIM HREG AS HKEY
DIM RKEY[255] AS Byte
DIM RVAL[255] AS Byte
DIM TYP AS DWord
DIM L AS DWord

①HKEY_LOCAL_MACHINE\AAA\BBB\CCC\のレジストリキーをオープン
lstrcpy(RKEY,"AAA\BBB\CCC\")
RegOpenKeyEx(HKEY_LOCAL_MACHINE,RKEY,0,KEY_READ,HREG)

②DDDの内容を読み込む（ただしDDDは文字列型と仮定）
L = 255
lstrcpy(RKEY,"DDD")
RegQueryValueEx(HREG,RKEY,NULL AS DWord,VarPtr(TYP),RVAL,VarPtr(L))

③HKEY_LOCAL_MACHINE\AAA\BBB\CCC\のレジストリキーをクローズ
RegCloseKey(HREG)

まあこんなもんですが。
RegOpenKeyExなどの詳細はABのヘルプに載ってますので念のためそちらで確認するかネットで検索してみてください。
またレジストリアクセス処理についての詳細も念のためネットで検索してみてください。
よろしくお願いいたします。