Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > C++ Builder > Как в OpenDialog Contol узнать путь к файлу

Автор: Voldemar2004 24.12.2005, 13:22

Вот код на VB 6: открыть файл и узнать полный путь к нему + имя без расширения. В С++ Builder есть функции, наподобие Left(StringValue, Length), Right(StringValue, Length) в VB, которые отсекают лишнюю часть справа/слева соответственно?

Код

Private Sub cmdOpen_Click()

Dim dbPath As String
Dim RecSourceName As String

CommonDialog1.Filter = "Файлы БД FoxPro (*.dbf) |*.dbf"
CommonDialog1.ShowOpen

dbPath = Left(CommonDialog1.FileName, Len(CommonDialog1.FileName) - Len(Dir(CommonDialog1.FileName)))
RecSourceName = Left(Dir(CommonDialog1.FileName), Len(Dir(CommonDialog1.FileName)) - 4)

End Sub

Автор: DemoCode 24.12.2005, 13:33

Код


void __fastcall TForm1::FormCreate(TObject *Sender)
{
  if (OpenDialog1->Execute()) {
        a = OpenDialog1->FileName;  // Полный путь с именем
        b = ExtractFilePath(OpenDialog1->FileName); // Только путь
        c = ExtractFileName(OpenDialog1->FileName); // Только имя
  }
}

Автор: Voldemar2004 24.12.2005, 14:00

DemoCode, спасибо. М-да, аналогичный код на VB выглядит более тяжелым для понимания.