Премахване на пътя от името на файла

Разработвам програма, която трябва да анализира името на файла в TTextField. Как да премахна файловото разширение, което вече знам (или мисля, че мога да направя така):

var
  FName: String;
  FPath: String;

begin
  FPath := OpenDialog1.FileName;
  FName := ChangeFileExt(FPath, '');
end;

Но как мога да премахна пътя на файла от FName?


file-io delphi lazarus
person Nathan Campos    schedule 08.01.2010    source източник
comment
+1 за това, че сами сте разбрали първото полувреме   -  person fupsduck    schedule 09.01.2010

Отговори (3)


arrow_upward
17
arrow_downward

@Constantin: Вижте, например, описанието на това как се прилага DES: (en .wikipedia.org/wiki/
person fupsduck    schedule 08.01.2010

arrow_upward
6
arrow_downward

Разгледайте SysUtils.ExtractFileName. Мисля, че това е, което търсите.

person Mason Wheeler    schedule 08.01.2010

arrow_upward
0
arrow_downward

В по-новите версии на Delphi има също TPath.GetFileName от System.IOUtils

person johnny    schedule 08.09.2017