Цитата(Greenpeas @ 13:07:2007, 13:32 )

Здравствуйте!
Товарищчи программисты помогите плиз!
Я открываю файл, например kartinka.bmp.
Далее в программе мне необходимо использовать имя файла "kartinka". Как мне его получить из диалогов OpenDialog либо SaveDialog???
if(OpenPictureDialog1->Execute())
{
Edit1->SelText=OpenPictureDialog1->FileName;
}
FileName Возвращает полное имя файла в виде D:\Builder TESTS\kartinka.bmp,
а мне нужно только "kartinka"... и без расширения...
Как это осуществить?
Спасибо!
По порядку (чтобы понятнее, потом можно "упаковать" в одну строку)
AnsiString filelNam;
if(OpenPictureDialog1->Execute()
{filelNam=OpenPictureDialog1->FileName;
filelNam=ExtractFileName(filelNam); // получаешь filelNam=kartinka.bmp
filelNam=filelNam.SubString(1,filelNam.Length()-4)// т.е. убираешь из kartinka.bmp
// 4 последних символа ".bmp" и получаешь свое желанное kartinka
Edit1->SelText=filelNam;
}
Цитата(Greenpeas @ 13:07:2007, 13:32 )

Здравствуйте!
Товарищчи программисты помогите плиз!
Я открываю файл, например kartinka.bmp.
Далее в программе мне необходимо использовать имя файла "kartinka". Как мне его получить из диалогов OpenDialog либо SaveDialog???
if(OpenPictureDialog1->Execute())
{
Edit1->SelText=OpenPictureDialog1->FileName;
}
FileName Возвращает полное имя файла в виде D:\Builder TESTS\kartinka.bmp,
а мне нужно только "kartinka"... и без расширения...
Как это осуществить?
Спасибо!
По порядку (чтобы понятнее, потом можно "упаковать" в одну строку)
AnsiString filelNam;
if(OpenPictureDialog1->Execute()
{filelNam=OpenPictureDialog1->FileName;
filelNam=ExtractFileName(filelNam); // получаешь filelNam=kartinka.bmp
filelNam=filelNam.SubString(1,filelNam.Length()-4)// т.е. убираешь из kartinka.bmp
// 4 последних символа ".bmp" и получаешь свое желанное kartinka
Edit1->SelText=filelNam;
}