Удаление параметров a.k.a. вытаскивание имени файла

← →
melifaro (2003-02-01 22:37) [0]

Столкнулся с проблеммой. Скорее не могу найти решение.
Как можно получить полное имя файла (например C:\Program Files\Far\Far.exe) из строки где написано "C:\Program Files\Far\Far.exe -r" (т.е. присутствует параметр).
Нужна не просто процедура которая удалит из этой строки "-r", а такая которая сможет удалить любые параметры из имени файла.

← →
Anatoly Podgoretsky (2003-02-01 23:00) [1]

Application.ExeName

← →
wal (2003-02-01 23:03) [2]

Удаляй все, что находиться после ".exe[SPACE]".
Только сначала проверь, что строка не заканчивается на ".exe", то есть без параметров.

← →
wal (2003-02-01 23:04) [3]

В догонку - [SPACE] тоже удаляй.

← →
melifaro (2003-02-02 04:08) [4]

2Anatoly Podgoretsky
Видимо вопрос остался не понятым? Или писАлось с бухты-барахты...?

2wal
а если это не exe, или вообще файл без разшерения?
Ведь это более чем возможно.

2all
Дело в том, что я не прошу привести идеи как организовать функцию по разделению параметров и имени файла.
Так как Windows умеет это делать, то видимо где-то в нём сужествует вполне документированная функция. Но к сожалению я её не могу найти, и потому прошу тех кто знает - помочь.

← →
Anatoly Podgoretsky (2003-02-02 11:02) [5]

Видимо ответ пока выше твоего уровня знаний

← →
Anatoly Podgoretsky (2003-02-02 11:31) [6]

Или еще вариант ты не точно поставил вопрос.
Если же речиь идет о разборе абстрактной строки, но задача не имеет полного решения, только частичное.
Поэтому уточни свой вопрос еще раз.

← →
JibSkeart (2003-02-02 12:56) [7]

А может это можно сделать так ??

for i:=Length(String_Of_FilePath) downto 4
begin
s := String_Of_FilePath[i]+String_Of_FilePath[i-1]String_Of_FilePath[i-2]+String_Of_FilePath[i-3]
if (s = ".exe")or (s=".EXE") then // или делай UpCase -ом s
begin
k = i;
end ;
end;

где String_Of_FilePath перемменная куды пихаем путь
и обрезаем строку длинною "к"

но енто для частного случая
думаю намек понятен

Удаление параметров a.k.a. вытаскивание имени файла Найти похожие ветки