ошибка в программе непонятная
Код:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "Animate"
#pragma link "GIFCtrl"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Rab_stolClick(TObject *Sender)
{
OpenPictureDialog1->Title = "Открыть картинку";
if (OpenPictureDialog1->Execute())
{
Rab_stol2->Picture->LoadFromFile(OpenPictureDialog1->FileName);// загрузка картинки
Rab_stol2->Left=10;
Rab_stol2->Top=10;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Rab_stol1->Picture->LoadFromFile("sym.gif");// загрузка верхней полосы
Rab_stol1->Left=10;
Rab_stol1->Top=300;
}
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "Animate"
#pragma link "GIFCtrl"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Rab_stolClick(TObject *Sender)
{
OpenPictureDialog1->Title = "Открыть картинку";
if (OpenPictureDialog1->Execute())
{
Rab_stol2->Picture->LoadFromFile(OpenPictureDialog1->FileName);// загрузка картинки
Rab_stol2->Left=10;
Rab_stol2->Top=10;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Rab_stol1->Picture->LoadFromFile("sym.gif");// загрузка верхней полосы
Rab_stol1->Left=10;
Rab_stol1->Top=300;
}
//---------------------------------------------------------------------------
на форме два имаге. и два баттона. так вот если сначала нажать на Rab_stol загрузить картинку, то после нажатия batton1 вылазиет ошибка
а если нажать на баттон1 и потом Rab_stol? то всё грузиться нормально, но стоит нажать на баттон1 то вновь та же ошибка.
помогите пожалуйста
хотя что-то тут не так
Код:
Rab_stol2->Picture->LoadFromFile(OpenPictureDialog1->FileName)
Расширение FileName здесь должно быть gif, а не jpg ибо ты, имхо, GIF библиотеку линкуешь.
Код:
Rab_stol2->Picture->LoadFromFile(OpenPictureDialog1->FileName)
Расширение FileName здесь должно быть gif, а не jpg ибо ты, имхо, GIF библиотеку линкуешь.
Цитата:
Anton Chik, ну для начала подцепи библиотечку для jpg-ов... jpeg.hpp или еще какую-нибудь...
хотя что-то тут не так
хотя что-то тут не так
поставил. всё равно такая же ошибка
Цитата:
Hydra, Расширение FileName здесь должно быть gif, а не jpg ибо ты, имхо, GIF библиотеку линкуешь.
в каком смысле? чёт не понял. не могли бы объяснить
появилась вторая. после загрузке картинки через диалог (допустим из С) если нажать кнопку (которая грузит гиф из папки с exeшником) то она грузит картинку не из папки с exe а из С. т.е. меняется путь к нему.
проблема решена. темку мождно закрыть