//--------------------------------------------------------------------- #include #pragma hdrstop #include "MainForm.h" #include "ClrMrg.h" //--------------------------------------------------------------------- #pragma resource "*.dfm" TColorMergeDlg *ColorMergeDlg; //--------------------------------------------------------------------- __fastcall TColorMergeDlg::TColorMergeDlg(TComponent* AOwner) : TForm(AOwner) { } //--------------------------------------------------------------------- void __fastcall TColorMergeDlg::ColorSpaceClick(TObject *Sender) { nColorSpace = ColorSpace->ItemIndex; Label4->Visible = false; ComboBox4->Visible = false; switch (nColorSpace) { case 0: //Merge images from three RGB planes-> Label1->Caption = "Blue "; Label2->Caption = "Green"; Label3->Caption = "Red "; break ; case 1: //Merge images from four CMYK planes-> Label1->Caption = "Cyan "; Label2->Caption ="Megnta "; Label3->Caption ="Yellow" ; Label4->Caption ="Black " ; Label4->Visible = true; ComboBox4->Visible = true; break ; case 2: //Merge images from three HSV planes-> Label1->Caption = "Hue"; Label2->Caption = "Saturation"; Label3->Caption = "Value"; break; case 3: //Merge images from three HLS planes-> Label1->Caption = "Hue"; Label2->Caption = "Lightness "; Label3->Caption = "Saturation" ; break; case 4: //Merge images from three CMY planes-> Label1->Caption = "Cyan"; Label2->Caption ="Megenta"; Label3->Caption ="Yellow" ; } } //--------------------------------------------------------------------------- TList * __fastcall TColorMergeDlg::GetBitmapList(void) { return(BitmapsList); } //--------------------------------------------------------------------------- int __fastcall TColorMergeDlg::GetColorSpace(void) { return(nColorSpace); } //--------------------------------------------------------------------------- void __fastcall TColorMergeDlg::FormCreate(TObject *Sender) { int i; BitmapsList = new TList; for(i =0; i< MainFrm->MDIChildCount; i++) { ComboBox1->Items->Add(MainFrm->MDIChildren[i]->Caption); ComboBox2->Items->Add(MainFrm->MDIChildren[i]->Caption); ComboBox3->Items->Add(MainFrm->MDIChildren[i]->Caption); ComboBox4->Items->Add(MainFrm->MDIChildren[i]->Caption); BitmapsList->Add(MainFrm->MDIChildren[i]); } ComboBox1->ItemIndex =0; ComboBox2->ItemIndex =0; ComboBox3->ItemIndex =0; ComboBox4->ItemIndex =0; } //--------------------------------------------------------------------------- void __fastcall TColorMergeDlg::FormDestroy(TObject *Sender) { BitmapsList->Free(); } //--------------------------------------------------------------------------- void __fastcall TColorMergeDlg::OKBtnClick(TObject *Sender) { ModalResult = mrOk; } //--------------------------------------------------------------------------- void __fastcall TColorMergeDlg::CancelBtnClick(TObject *Sender) { ModalResult = mrCancel; } //---------------------------------------------------------------------------