Проблема с OpenPictureDialog1

[doniyor]

Как известно, свойство OpenPictureDialog1.Filename возвращает ПОЛНЫЙ путь выбранного файла. Мой вопрос - как "достать" только ИМЯ выбранного файла?

[mihali4]

http://programmersforum.ru/showthread.php?t=42536
Между прочим, на форуме есть приличная система поиска

[Ntlegend]

если нада только имя - то иешь последню точку все шо перед не - то и будет имя..

s:=ExtractFileName(OpenPictureDialog1.Filename);
//находим последнюю точку
for i:=Length(s) downto 1 do
  if s[i]='.'
    then break;
//удаляем все шо псле нее.. и ее тоже..
Delete(s, i, Length(s));