그림판을 만들고 있는데요 .
지금 저장까지는 되는데요 .
그림파일 불러오는 방법을 모르겠네요 .
이제는 네모나 동그라미 페인트도 해보고싶어요
레포트라서 오늘부터 해서 겨우 만들었네요 .
물음표부분어떻게 해야지 Image박스에 넣을수 있나요 ?
그리고 네모 동그라미 만드는 법도좀 ...
예제 소스좀 부탁드립니다 ㅠㅠ
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Image1->Picture->Bitmap->Height = 305;
Image1->Picture->Bitmap->Width = 320;
ListBox1->ItemIndex = 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
if(Shift.Contains(ssLeft))
Image1->Picture->Bitmap->Canvas->LineTo(X,Y);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
Image1->Picture->Bitmap->Canvas->Pen->Color= CColorGrid1->ForegroundColor;
Image1->Picture->Bitmap->Canvas->Pen->Width=ListBox1->ItemIndex+1;
Image1->Picture->Bitmap->Canvas->MoveTo(X,Y);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (SaveDialog1->Execute())
Image1->Picture->Bitmap->SaveToFile(SaveDialog1->FileName);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (OpenPictureDialog1->Execute()){
???????????????=OpenPictureDialog1->FileName;
} }
//---------------------------------------------------------------------------
|