//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Main.h"
#include "About.h"
//---------------------------------------------------------------------------
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent *Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::CreateMDIChild(String Name)
{
TMDIChild *Child;
//--- create a new MDI child window ----
Child = new TMDIChild(Application);
Child->Caption = Name;
Child->Image1->AutoSize=true;
Child->Image1->Picture->LoadFromFile(Name);
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FileNew1Execute(TObject *Sender)
{
CreateMDIChild("NONAME" + IntToStr(MDIChildCount + 1));
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FileOpen1Execute(TObject *Sender)
{
if (OpenPictureDialog1->Execute())
CreateMDIChild(OpenPictureDialog1->FileName);
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::HelpAbout1Execute(TObject *Sender)
{
AboutBox->ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FileExit1Execute(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::FileSaveItemClick(TObject *Sender)
{
TMDIChild* TheChild;
TPicture* ThePicture;
if (ActiveMDIChild)
{
TheChild=(TMDIChild*)ActiveMDIChild;
ThePicture=TheChild->Image1->Picture;
ThePicture->SaveToFile(TheChild->Caption);
}
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::UpdateActions( )
{
FileCloseItem->Enabled = MDIChildCount > 0;
FileSaveItem->Enabled = MDIChildCount > 0;
}
MDI.zip （27个子文件） 
Chap10 
mdiapp.res 952B Main.h 3KB ChildWin.cpp 632B about.cpp 475B
Mdiapp.exe 57KB about.h 991B ChildWin.obj 35KB ChildWin.h 800B mdiapp.ico 766B ChildWin.~dfm 323B about.dfm 916B ChildWin.~cpp 632B ChildWin.~h 766B Main.~dfm 11KB mdiapp.tds 2.06MB Main.dfm 11KB Main.~h 3KB mdiapp.~bpr 2KB mdiapp.obj 13KB about.obj 35KB Main.obj 113KB Main.~cpp 2KB mdiapp.cpp 705B Main.cpp 2KB mdiapp.bpr 2KB ChildWin.dfm 288B
www.pudn.com.txt 218B资源评论
