[Freeman]

Если речь про Delphi, то правильный способ -- не регулярки, а функции SysUtils:

Код:

Result := ExtractFileName(ExcludeTrailingBackslash(Source));