void __fastcall TForm1::Button1Click(TObject *Sender)
{
Open1->Title = "Открыть картинку";
if (Open1->Execute())
{
Image1->Caption->LoadFromFile(OpenSkin->FileName);
}
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Image1->Caption->LoadFromFile(//здесь что прописать не знаю);
}
как использовать путь полученный из диалога
в программе пользователь жмёт Batton1, и открывается диалог1 откуда грузит какой либо файл.
имеется Batton2, который допустим грузит картинку в Image1, который находится в папке, путь который был получен из диалог1.
так вот нужен код для Batton2
Код:
Так как если Open->Execute() == true,
то каталог становится текущим для приложения.
Код:
class TForm1:
{
//.....
private:
AnsiString fFilePath;
};
//.....
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Open1->Title = "Открыть картинку";
if (Open1->Execute())
{
fFilePath = ExtractFilePath (Open1->FileName);
}
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Image1->Caption->LoadFromFile(FilePath + "Имя_Другого.файла");
}
{
//.....
private:
AnsiString fFilePath;
};
//.....
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Open1->Title = "Открыть картинку";
if (Open1->Execute())
{
fFilePath = ExtractFilePath (Open1->FileName);
}
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Image1->Caption->LoadFromFile(FilePath + "Имя_Другого.файла");
}
спасибо большое.