hur.cn - 华软网

 热门搜索

关于几个API函数的使用、特急!!!!!

  作者:未知    来源:网络    更新时间:2018/1/1
获取或设置环境变量的函数、重启计算机的函数、设置快捷方式的函数、获取特定目录的函数
------华软网友回答------
search.csdn.net
------华软网友回复------
1、PB本身有取得环境变量的函数
GetEnvironment()
功能得到操作系统、处理器、屏幕显示等与系统相关的信息。
语法GetEnvironment ( environmentinfo )
参数environmentinfo:Environment对象名,用于保存系统环境信息返回值Integer。函数执行成功时返回1,发生错误时返回-1。如果参数environmentinfo的值为NULL,GetEnvironment()函数返回NULL。用法当开发交叉平台项目时,利用GetEnvironment()函数,应用程序能够得到当前运行的操作系统、使用的CPU类型、操作系统的版本、屏幕的大小以及颜色数等信息,这些信息的具体表示请参阅本书环境对象(Environment Object)的介绍。 

一些设置系统的API函数:
GetVersionEx 在一个OSVERSIONINFO结构中载入与平台和操作系统有关的版本信息
SetComputerName 设置新的计算机名
SetSystemTime 设置当前系统时间
SetTimeZoneInformation 设置系统时区信息
SystemTimeToTzSpecificLocalTime 将系统时间转换成地方时间

2、重启计算机API
ExitWindowsEx 退出windows,并用特定的选项重新启动

3、没用过,也没查到

4、不大明白你的意图,pfc的n_cst_filsrc里有很多目录、文件相关的函数可以看一下
------华软网友回复------
用pb创建快捷方式 
 
OLEObject wscapp, objshlink
string ls_desktop
int ret
wscapp = Create OLEObject 

ret = wscapp.Connecttonewobject( "WScript.Shell")
if ret < 0  then
 MessageBox("error",string(ret))
  return
end if
ls_desktop = wscapp.SpecialFolders("Desktop")
messagebox("test", ls_desktop)
objshlink = wscapp.CreateShortcut(ls_desktop + "\快捷方式 记事本.lnk")
objshlink.TargetPath = "c:\windows\notepad.exe"
objshlink.Windowstyle = 1
objshlink.Hotkey = "CTRL+SHIFT+F"
objshlink.IconLocation = "notepad.exe, 0"
objshlink.Description = "记事本 测试"
objshlink.WorkingDirectory = "c:\windows"
objshlink.Save
wscapp.DisConnectObject()
destroy wscapp      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。