Узнать путь файла

← →
aslanbek (2008-10-09 13:46) [0]

Как узнать путь файла, который был открыт последним.
Например Я нажимаю на файл и открывается моя программа, а моя программа должна определить путь того файла.

Никак не смог додуматься

← →
Сергей М. © (2008-10-09 13:53) [1]

Полный путь к файлу передается тебе 1-ым параметром ком.строки запуска твоего приложения.

Доступ к ком.строке осущ-ся с пом. ф-ции ParamStr()

← →
Ega23 © (2008-10-09 14:03) [2]

program Project2; {$APPTYPE CONSOLE} uses SysUtils; var i : Integer; begin for i:=0 to ParamCount do WriteLn("Param("+IntToStr(i)+") = " + ParamStr(i)); ReadLn; end.

← →
aslanbek (2008-10-09 14:14) [3]

Нет нет, вы не так поняли меня, мне не надо путь приложения, мне надо путь файла.

Например у меня два файла 2.aud и table_form_100.00.exe.

Я нажимаю на 2.aud и открывается table_form_100.00.exe. и мне нужен путь 2.aud .

← →
MBo © (2008-10-09 14:17) [4]

Испытай данные тебе советы в своей программе table_form_100.00.exe

← →
Ega23 © (2008-10-09 14:21) [5]

> Нет нет, вы не так поняли меня, мне не надо путь приложения,
> мне надо путь файла.

Всё мы так поняли.
Открытие файла 2.aud с помощью файла table_form_100.00.exe с точки зрения ОС будет выглядеть

C:\Что-что-там\table_form_100.00.exe Полный_путь_к_открываемому_файлу\2.aud

Соответственно, ParamStr(0) даст тебе полное имя exe.
ParamStr(1) - даст полное имя 2.aud

А вот что будет, если в полном пути к 2.aud есть пробелы и как это побороть - это уже отдельная песня.

← →
aslanbek (2008-10-09 14:29) [6]

Работает, СПАСИБО ВАМ ОГРОМНОЕ,
Да действительно я брал результаты ParamStr(0), а оказывается надо ParamStr(1). СПАСИБО

> aslanbek (09.10.2008 14:29:06) [6]

Это ты эту программу пытаешься защитить?

Узнать путь файла Найти похожие ветки