㈠ 在DELPHI中如何獲得文件路徑
begin
edit1.text:=extractfiledir(application.ExeName);
edit1.text:=extractfilepath(application.ExeName);
這個是獲取自身目錄的函數，兩函數不同的是一個路徑後帶有"\"，一個沒有
如果要獲取打開文件的路徑，使用opendialog控制項（在dialogs控制項組下）：
begin
if opendialog1.Execute then
edit1.text:=opendialog1.FileName ;
//在文本框顯示路徑
end;
㈡ 如何在delphi6中實現搜索文件並得到路徑
用FindFirst, FindNext, FindClose加上遞歸舉純編程實現。這三個函數的用法delphi的幫助中有例子：
FindFirst, FindNext, FindClose example
procereTForm1.Button1Click(Sender:TObject);
var
sr:TSearchRec;
FileAttrs:Integer;
begin
StringGrid1.RowCount:=1;
肢液ifCheckBox1.Checkedthen
FileAttrs:=faReadOnly
else
FileAttrs正飢咐:=0;
ifCheckBox2.Checkedthen
FileAttrs:=FileAttrs+faHidden;
ifCheckBox3.Checkedthen
FileAttrs:=FileAttrs+faSysFile;
ifCheckBox4.Checkedthen
FileAttrs:=FileAttrs+faVolumeID;
ifCheckBox5.Checkedthen
FileAttrs:=FileAttrs+faDirectory;
ifCheckBox6.Checkedthen
FileAttrs:=FileAttrs+faArchive;
ifCheckBox7.Checkedthen
FileAttrs:=FileAttrs+faAnyFile;
withStringGrid1do
begin
RowCount:=0;
ifFindFirst(Edit1.Text,FileAttrs,sr)=0then
begin
repeat
if(sr.AttrandFileAttrs)=sr.Attrthen
begin
RowCount:=RowCount+1;
Cells[1,RowCount-1]:=sr.Name;
Cells[2,RowCount-1]:=IntToStr(sr.Size);
end;
untilFindNext(sr)<>0;
FindClose(sr);
end;
end;
end;
㈢ delphi中如何獲得某一文件的本地路徑
extractFilePath(Application.exename)
㈣ 如何通過delphi編程實現獲取某軟體的安裝路徑
這個要根據具體軟體來定高培。
1.一般windows平台下軟體，會在注冊表中寫相關數據，你可以讀取軟體戚源唯在注冊表中的相關信息來讀取。
2.有的軟體會在開始菜單里有項目，那麼讀取其文件屬性，也可以獲取其所在路徑。
3.如果都不行，那隻能是搜索硬碟，查找並對比軟體名稱、大小等信息裂激來得到路徑。
㈤ delphi獲取路徑
獲取其它軟體路徑通常的方法就是讀取注冊表（改禪如果那個軟體有寫入注冊表的話），對於QQ來說也是一樣的，你寬碧可以在有QQ的機器上搜索一下Tencent或者QQ.exe試試看，比如在偶的機器上就有HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\SharedDlls下就有一個D:\Tencent\QQ\Bin\QQ.exe（當然其它的有寫入QQ安裝目錄的注冊表還有很多）
之後就簡單了，直接去讀取這個位置，怎麼讀注冊表不用說了吧。
對於那些不寫注冊表也沒有什麼文件的軟體來說，要定位位置唯一的方法就是核巧塵全盤搜索它的exe文件名。
㈥ 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中僅選擇目錄或文件路徑的控制項是哪個
選擇目錄或文件路徑 有多種方式，通常可以使用以下方法：
1、直接使用 WinApi 函數，專如 SelectDirectory 等。
2、使屬用選擇文件（路徑）對話框控制項，如 OpenDialog 等。
3、使用與 shell 相關的控制項，如 ShellTreeView、ShellListView、TDirectoryOutLine 等。
㈧ delphi如何自動提取文件路徑保存到SQL資料庫中
可以使用FindFirst和並孫FindNext函數查找文件談蔽畝，如：
begin
Found := FindFirst("d:\test\*.*", Attr, SearchRec);
while Found = 0 do
begin
/含森/處理找出來的文件
Found := FindNext(SearchRec);
end;
FindClose(SearchRec);
end;
TSearchRec類型定義如下：
type
TSearchRec = record
Time : Integer;
Size : Integer;
Attr : Integer;
Name : TFileName;
ExcludeAttr : Integer;
FindHandle : THandle;
FindData : TWin32FindData;
end;
㈨ Delphi中打開一個文件 怎樣得到著個文件的路徑啊
if OpenDialog1.Execute then begin
showmessage(OpenDialog1.FileName);
end;
㈩ 請問怎樣在delphi中獲取一個文件的路徑,
extractfiledir
不帶'\'extractfilepath
帶'\'
若這個文件在根目次，它們是一樣的，getdir是獲得當前的路徑，並不是獲得一個文件的路徑，請樓上想清跋扈再說。