如何在VB6中qt 取得当前系统路径路径或系统路径

11465人阅读
System.Environment.CurrentD
//例:&c:/test/
Application.ExecutableP(包括名称)
//例:&c:/test/myapp.exe
Application.StartupP(不包括名称)
//例:&c:/test/
&&相关文章推荐
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
访问:125244次
积分:1194
积分:1194
排名:千里之外
原创:14篇
评论:10条
(3)(1)(2)(1)(1)(4)(1)(2)(1)(1)(2)温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!&&|&&
!!!永远自信的李瑞亮!!!
LOFTER精选
网易考拉推荐
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
阅读(6126)|
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
历史上的今天
loftPermalink:'',
id:'fks_094074',
blogTitle:'vb获取当前文件夹路径及所有文件夹',
blogAbstract:'
Public Sub ShowFloder(strDir As String, objDir As Object) On Error Resume Next Dim lngCount As Long Dim i As Long Dim strPath As String With objDir .Path = strDir lngCount = .ListCount For i = 0 To lngCount - 1 .Path = strDir strPath = .List(i) \'\'取得当前子目录 \'获得一个目录字符串 Call ShowFloder(strPath, objDir) \'\'递归寻找 Next ',
blogTag:'',
blogUrl:'blog/static/',
isPublished:1,
istop:false,
modifyTime:9,
publishTime:3,
permalink:'blog/static/',
commentCount:0,
mainCommentCount:0,
recommendCount:0,
bsrk:-100,
publisherId:0,
recomBlogHome:false,
currentRecomBlog:false,
attachmentsFileIds:[],
groupInfo:{},
friendstatus:'none',
followstatus:'unFollow',
pubSucc:'',
visitorProvince:'',
visitorCity:'',
visitorNewUser:false,
postAddInfo:{},
mset:'000',
remindgoodnightblog:false,
isBlackVisitor:false,
isShowYodaoAd:false,
hostIntro:'!!!永远自信的李瑞亮!!!',
selfRecomBlogCount:'0',
lofter_single:''
{list a as x}
{if x.moveFrom=='wap'}
{elseif x.moveFrom=='iphone'}
{elseif x.moveFrom=='android'}
{elseif x.moveFrom=='mobile'}
${a.selfIntro|escape}{if great260}${suplement}{/if}
{list a as x}
推荐过这篇日志的人:
{list a as x}
{if !!b&&b.length>0}
他们还推荐了:
{list b as y}
转载记录:
{list d as x}
{list a as x}
{list a as x}
{list a as x}
{list a as x}
{if x_index>4}{break}{/if}
${fn2(x.publishTime,'yyyy-MM-dd HH:mm:ss')}
{list a as x}
{if !!(blogDetail.preBlogPermalink)}
{if !!(blogDetail.nextBlogPermalink)}
{list a as x}
{if defined('newslist')&&newslist.length>0}
{list newslist as x}
{if x_index>7}{break}{/if}
{list a as x}
{var first_option =}
{list x.voteDetailList as voteToOption}
{if voteToOption==1}
{if first_option==false},{/if}&&“${b[voteToOption_index]}”&&
{if (x.role!="-1") },“我是${c[x.role]}”&&{/if}
&&&&&&&&${fn1(x.voteTime)}
{if x.userName==''}{/if}
网易公司版权所有&&
{list x.l as y}
{if defined('wl')}
{list wl as x}{/list}& KnowledgeBase
Chinese(China)
2 ratings:
&5 out of 5 &&nbsp
利用获取当前VI路径函数时获得相对路径,如果生成exe时,该如何解决虚拟路径问题
主要软件版本:
主要软件修正版本:
利用&获取当前VI路径函数&[Current VI's Path] 时获得相对路径,如果生成可执行文件时,该如何处理虚拟路径问题,使得文件能被正常的加载?
&&&&&&&& 利用&获取当前VI路径函数&时,在LabVIEW开发环境下,函数返回VI的实际路径,我们可以在此基础上通过计算路径来加载其它文件。例如函数返回某个VI的路径C:\Test\main.vi,但是当生成exe时,我们得到的有可能是C:\Builds\*.exe\ main.vi(这个根据生成规范中目标目录的实际设置会有不同,*.exe是可执行文件的名称)。因此,我们就需要从这个虚拟路径中跳出来。但有时候我们会发现只是简单的去掉exe,我们还是有可能遇到各种各样的问题。比如动态加载时路径的处理、Build中的always include选项、如果工具包函数无法加载的话怎么办等等。
这里我结合一个例子来说明几点心得:
我们把项目文件拷到C盘根目录(只是为了计算路径方便),项目的组织层次如下:
项目结构和文件调用关系
Launch.vi动态调用main.vi,main.vi动态调用subpanel-dynamic.vi,subpanel-dynamic.vi加载wav文件。
1)如果main.vi是always include,那么默认该VI在虚拟文件夹中 (Application.exe) ,launch.vi动态调用main.vi时的路径计算不需要特别处理,和开发环境下一致就可以了;但是如果main.vi没有always include,则需要处理,否则不能正常加载。在附件的项目文件中,我们将main.vi添加到always include栏中,launch.vi不需要对路径做预处理。
如果main.vi没有always include,则不处理路径的话是无法加载
2)如果main.vi中动态加载subpanel-dynamic.vi是通过&Current VI's Path函数&计算路径的,在main.vi中处理,跳出虚拟文件夹后,后续的更深层的subpanel-dynamic.vi再次调用&Current VI's Path函数&时就直接获得真实的路径,即只需要跳出一次即可!
只需要一次跳出虚拟路径
3)main.vi通过子面板加载subpanel-static load.VI,subpanel-static load.vi中调用了工具包或驱动。如果subpanel-static load.vi是动态加载的,则会出现找不到的工具包或驱动中的函数而导致subpanel-static load.vi无法运行。解决的办法是静态加载subpanel - static load.vi。(注意,只要在程序的任何地方静态加载了该VI,都会有效)
subpanel-static load.vi的框图中放置了一个声音振动工具包函数
12/14/2011
01/05/2013
for all product and support inquiries.

我要回帖

更多关于 java取得当前路径 的文章

 

随机推荐