⑴ Delphi中打开一个文件 怎样得到着个文件的路径啊
if OpenDialog1.Execute then begin showmessage(OpenDialog1.FileName); end;
⑵ Delphi 中如何获取安装文件路径下指定文件夹的具体路径
方法有二,如下详述:一、循环测试已知相对路径,与绝对路径之差仅在于根路径,即探索究竟在哪个分区上,那么,最傻瓜的方法就是从C循环至Z,逐一测试路径是否存在,大致代码为:function GetEurekaLogDir : string;const C_sDir : string = 'Eurekalog 5\delphi5';var i : Integer; s : string;begin Result := ''; for i := Ord( 'C' ) to Ord( 'Z' ) do begin s := Chr( i ) + ':\' + C_sDir; if DirectoryExists( s ) then begin Result := s; Exit; end; end;end;也可以增加一点儿“技术含量”,不是简单地从C循环至Z,而是先获取系统具有的分区配置,仅在配置列表中循环测试,调用GetLogicalDrives或GetLogicalDriveStrings均可实现。二、查询注册表不少软件安装后,会在注册表中记录其安装位置,对于EurekaLog的安装位置,可以手工打开注册表编辑器(RegEdit),查找到它的位置,记住其关键的路径,然后编程序获取该路径下的键值。这个方法应该更加正规,它还支持软件在安装之际,人为改变了安装路径的情形。例如,你把EurekaLog安装在"c:\program files\myPreferred"等不带EurekaLog字样的路径下时,也能找到它。
⑶ delphi如何获得指定路径文件的文件名
//delphi 获取文件所在路径ExtractFileDrive :返回完整文件名中的驱动器,如"C:"ExtractFilePath:返回完整文件名中的路径,最后带“/”,如"C:/test/"ExtractFileDir:返回完整文件名中的路径,最后不带“/” ,如"C:/test"ExtractFileName:返回完整文件名中的文件名称 (带扩展名),如"mytest.doc"ExtractFileExt 返回完整文件名中的文件扩展名(带.),如".doc"ExtractRelativePath : 返回相对路径,定义如下:function ExtractRelativePath(const BaseName, DestName: string): string;使用测试下如:SysUtils.ExtractRelativePath('C:/test','C:/Test/TestRelativePath'):返回TestRelativePathSysUtils.ExtractRelativePath('C:/Test/TestRelativePath','C:/test'):返回'../TestRelativePath'SysUtils.ExtractRelativePath('C:/Test/TestRelativePath/','C:/test'):返回'../../TestRelativePath'ExtractShortPathName :返回短文件名,即8+3,文件名长八位,扩展名为3号,为保持DOS系统兼容而存在 若想获取的文件名不带路径,可用:ChangeFileExt(TIdAttachment(Msg.MessageParts.Items[intIndex]).Filename,''); 函数将扩展名改掉即可。
⑷ 在DELPHI中如何获得文件路径
beginedit1.text:=extractfiledir(application.ExeName);edit1.text:=extractfilepath(application.ExeName);这个是获取自身目录的函数,两函数不同的是一个路径后带有"\",一个没有如果要获取打开文件的路径,使用opendialog控件(在dialogs控件组下):beginif opendialog1.Execute thenedit1.text:=opendialog1.FileName ;//在文本框显示路径end;
⑸ delphi 文件路径问题
在OnCreat或OnShow事件中加入,(如果你注册表关联正确)var s:string;begin s:=paramstr(1); //程序传递的第一个参数 MEmo.lines.LoadFromFile(s); end;
⑹ 巨简单,Delphi中仅选择目录或文件路径的控件是哪个
选择目录或文件路径 有多种方式,通常可以使用以下方法:1、直接使用 WinApi 函数,专如 SelectDirectory 等。2、使属用选择文件(路径)对话框控件,如 OpenDialog 等。3、使用与 shell 相关的控件,如 ShellTreeView、ShellListView、TDirectoryOutLine 等。
⑺ 请说明delphi 打开相对路径文件文件夹的语句怎么写
str:=ExtractFilePath(Application.ExeName);这是程序的运行路径ShellExecute(Handle,'open',PChar(str+'MULU\'),nil,nil,1);打开文件夹注意引用:ShellAPI单元
⑻ 如何设置DELPHI7 默认打开文件路径
你把一个默认的空白过程保存的该目录下(该目录就是就是这个工程的文件夹!),关闭delphi,再打开就是了。另外:Tools->EnviromentOptions->preferences标签->最下面的Directory,在browse中浏览到你要设置的路径,确认。
⑼ 请教如何改变Delphi的打开文件的默认路径==============
右击桌面中delphi6中的快捷图标,选择属性,在起始位置中输入你的工程路径。
⑽ 请问怎样在delphi中获取一个文件的路径,
extractfiledir不带'\'extractfilepath带'\'若这个文件在根目次,它们是一样的,getdir是获得当前的路径,并不是获得一个文件的路径,请楼上想清跋扈再说。
未经允许不得转载:山九号 » 文件路径delphi|delphi如何获得指定路径文件的文件名