Можно как-ть саб сделать без лишних мутарств с дополнительными циклами.
В Делфи был ExtructFilename, в Билдере его нет, а очень нужно...

как нет :-)

OpenDlg->FileName возвращает полный путь

ExtractFileName( OpenDialog1->FileName ) получает имя файла

читаем хелп:

ExtractFileName


Extracts the name and extension parts of a file name.

Unit

SysUtils

Category

file name utilities

extern PACKAGE AnsiString __fastcall ExtractFileName(const AnsiString FileName);

Description

The resulting string is the rightmost characters of FileName, starting with the first character after the colon or backslash that separates the path information from the name and extension. The resulting string is equal to FileName if FileName contains no drive and directory parts.

Note:This function works for multi-byte character systems (MBCS).

Хм... Странно, почему-то CTRL+F1 на нем не срабатывал..

не срабатывал потому что не

а
ExtractFileName


Это сообщение отредактировал(а) azesmcar - 20.1.2006, 13:29

а ты попробуй просто F1