matrixop_assign.cpp

这是一个求解线性规划问题的程序

//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop

#include "MatrixOp_Assign.h"
#include "MatrixOp.h"

//---------------------------------------------------------------------------
#pragma resource "*.dfm"
Tfrm_MatrixOP_Assign *frm_MatrixOP_Assign;
//---------------------------------------------------------------------------
__fastcall Tfrm_MatrixOP_Assign::Tfrm_MatrixOP_Assign(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall Tfrm_MatrixOP_Assign::btn_okClick(TObject *Sender)
{
   ModalResult = mrOk;
}
//---------------------------------------------------------------------------
void __fastcall Tfrm_MatrixOP_Assign::btn_cancelClick(TObject *Sender)
{
   ModalResult = mrCancel;
}
//---------------------------------------------------------------------------
void __fastcall Tfrm_MatrixOP_Assign::FormShow(TObject *Sender)
{
   CB1->Items->Clear();  //初始化列表框
   CB1->Items->AddObject("A",(TObject*)&frm_MatrixOp->fMatA);
   CB1->Items->AddObject("B",(TObject*)&frm_MatrixOp->fMatB);
   CB1->Items->AddObject("C",(TObject*)&frm_MatrixOp->fMatC);
   CB2->Items->Clear();  //初始化列表框
   CB2->Items->AddObject("A",(TObject*)&frm_MatrixOp->fMatA);
   CB2->Items->AddObject("B",(TObject*)&frm_MatrixOp->fMatB);
   CB2->Items->AddObject("C",(TObject*)&frm_MatrixOp->fMatC);
   
   CB1->ItemIndex = 0;
   CB2->ItemIndex = 0;
   CB1->SetFocus();
}
//---------------------------------------------------------------------------