HSP - Hot Soup Processor [14]at GAMEDEVHSP - Hot Soup Processor [14] - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト890:名前は開発中のものです。 07/05/17 21:46:05 lJm49cl1 #module #uselib "ADVAPI32.DLL" #cfunc RegOpenKey "RegOpenKeyExA" int,int,int,int,int #cfunc RegQueryValue "RegQueryValueExA" int,int,int,int,int,int #cfunc RegCreateKey "RegCreateKeyExA" int,int,int,int,int,int,int,int,int #cfunc RegSetValue "RegSetValueExA" int,int,int,int,int,int #cfunc RegDeleteKey "RegDeleteKeyA" int,int #func RegCloseKey "RegCloseKey" int #define KEY_READ 0x00020019 #defcfunc ReadReg int _key, var _subkey, var _data hkey = 0 //↓規定値を読み込む if RegOpenKey( _key, varptr(_subkey), 0, KEY_READ, varptr(hkey) ) == 0 { size = 0 if RegQueryValue( hkey, 0, 0, 0, 0, varptr(size) ) == 0 { sdim buf, size a = RegQueryValue( hkey, 0, 0, 0, varptr(buf), varptr(size) ) RegCloseKey hkey _data = buf return 0 //キーの取得に成功。 } else { RegCloseKey hkey return -2 //取得に失敗。(ほぼ在り得ないと思うが) } } else { RegCloseKey hkey return -1 //キーが無いとき } 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch