-
-
[下载]Emergence BASIC 1.64
-
发表于: 2008-8-12 09:58 1973
-
Emergence BASIC 1.64
Changes / Additions:
---------------------------
Added the following commands for registry usage:
-RegGetString key, ValueName, opt defValue
'Returns a registry string value
'str=RegGetString("HKEY_CURRENT_USER\Software\XYZCorp\File","User Name","Unregisterd")
'setting ValueName to NULL will retrieve the default value
'the defvalue parameter is returned if the key doesn't exist
-RegGetDword key, ValueName, opt defValue
'Returns a registry dword value
'nValue=RegGetDword("HKEY_CURRENT_USER\Software\XYZCorp\File","OpenLast",TRUE)
'setting ValueName to NULL will retrieve the default value
'the defvalue parameter is returned if the key doesn't exist
-RegSetString key, ValueName, Value
'Sets a string value in the key
'Result=RegSetString("HKEY_CURRENT_USER\Software\XYZCorp\File","LastOpen","blah.txt")
'Setting ValueName to NULL will set the (default) value
'if the key doesn't exist, creates it first
'returns 0 for no error, 1 for error
-RegSetDword key, Valuename, Value
'Sets a Dword value in the key
'Result=RegSetDword("HKEY_CURRENT_USER\Software\XYZCorp\File","UseColor",1)
'Setting ValueName to NULL will set the (default) value
'if the key doesn't exist, creates it first
'returns 0 for no error, 1 for error
-CreateRegKey key
'Creates a registry key
'Result=CreateRegKey("HKEY_CURRENT_USER\Software\XYZCorp\File")
'Returns 0 for no error, non-zero for error
-DeleteRegKey key
'Deletes a registry key
'Result=DeleteRegKey("HKEY_CURRENT_USER\Software\XYZCorp\File")
'Returns 0 for no error, non-zero for error
To illustrate usage a sample program, registry_example.eba, has been included in your projects directory.
- Fixed a few IDE bugs, building single files in a directory whose name contains a point now works properly.
http://www.ionicwind.com/downloads/ebsetup.zip
赞赏
他的文章
看原图
赞赏
雪币:
留言: