Проблема 'abnormal program termination' загрузки сохраненного в скомпилированной программе изображения

void __fastcall TForm1::LoadClick(TObject *Sender)
{
    if (OpenPictureDialog1->Execute())
    {
        d = 1;
        Image1->Picture = NULL;
        Jpg1->Performance = jpBestQuality;
        Jpg1->Scale = jsFullSize;
        Jpg1->LoadFromFile(OpenPictureDialog1->FileName);
        Jpg1->Performance = jpBestQuality;
        Jpg1->Scale = jsFullSize;
        Form1->bitmap21->Width = 768;
        Form1->bitmap21->Height = 1024;
        Form1->bitmap21->Assign(Jpg1);
        bitmap2->Width = 87;
        bitmap2->Height = 116;
        bitmap2->Assign(Jpg1);
        Image1->Canvas->Rectangle(0,0,Image1->Width,Image1->Height);
        Image1->Canvas->Pen->Color=(TColor)RGB(75,171,251);
        Image1->Canvas->Pen->Width=5;
        Image1->Canvas->MoveTo(1,1);
        Image1->Canvas->LineTo(1,305);
        Image1->Canvas->LineTo(179,305);
        Image1->Canvas->LineTo(179,1);
        Image1->Canvas->LineTo(1,1);
        Image1->Canvas->Draw(40,5,bitmap1);
        Image1->Canvas->StretchDraw(Rect(48,80,135,196),bitmap2);
        EditBtn->Enabled = True;
    }
}
 
2) Сохранения
 
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
    if (d == 0) 
    {
        MessageDlg("Нечего сохранять!", mtWarning, TMsgDlgButtons() << mbOK, 0);         
    }
    else
    {
        if (Edit4->Text == "" || Edit4->Text == " ")
        {
            if (SavePictureDialog1->Execute())
            {
            Form1->bitmap21->SaveToFile(SavePictureDialog1->FileName/*+".jpg"*/);
            }
        }
        else
        {
            SavePictureDialog1->FileName = Edit4->Text/*+".jpg"*/;
            if (SavePictureDialog1->Execute())
            {
                Form1->bitmap21->SaveToFile(SavePictureDialog1->FileName);
            }
        }
    }
}