unit1.cpp

數字排序

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include "stdlib.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::btnClearClick(TObject *Sender)
{
        MaskEdit1->Text ="0";
        MaskEdit2->Text ="0";
        MaskEdit3->Text ="0";
        MaskEdit4->Text ="0";
        MaskEdit5->Text ="0";
        MaskEdit6->Text ="0";
        MaskEdit7->Text ="0";
        MaskEdit8->Text ="0";
        MaskEdit9->Text ="0";
        MaskEdit10->Text ="0";
}
//---------------------------------------------------------------------------

void __fastcall TForm1::btnCloseClick(TObject *Sender)
{
        Close();        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnStoBClick(TObject *Sender)
{
        GetNumber();
        DoSmallToBig();
}
//---------------------------------------------------------------------------
void TForm1::DoSmallToBig()
{
        int array[]={number1,number2,number3,number4,number5,
                number6,number7,number8,number9,number10};
        //a array with 10 values
        int hold;
        //save value
        for(int pass = 0; pass < 9; pass++)

                for(int j = 0; j < 9; j++)

                        if(array[j]>array[j+1])
                        {        //compare and switch values
                                hold = array[j];
                                array[j] = array[j+1];
                                array[j+1]=hold;
                        }

        //show result to Edit
        Edit1->Text = array[0];
        Edit2->Text = array[1];
        Edit3->Text = array[2];
        Edit4->Text = array[3];
        Edit5->Text = array[4];
        Edit6->Text = array[5];
        Edit7->Text = array[6];
        Edit8->Text = array[7];
        Edit9->Text = array[8];
        Edit10->Text = array[9];
}
//---------------------------------------------------------------------------
void TForm1::DoBigToSmall()
{
        int array[]={number1,number2,number3,number4,number5,
                number6,number7,number8,number9,number10};
        // a array with 10 values;
        int hold;  // save value;

        for(int pass = 0; pass < 9; pass++)

                for(int j = 0; j < 9; j++)

                        if(array[j]<array[j+1])
                        {        //compare and switch values
                                hold = array[j];
                                array[j] = array[j+1];
                                array[j+1]=hold;
                        }

        //show result to edit
        Edit1->Text = array[0];
        Edit2->Text = array[1];
        Edit3->Text = array[2];
        Edit4->Text = array[3];
        Edit5->Text = array[4];
        Edit6->Text = array[5];
        Edit7->Text = array[6];
        Edit8->Text = array[7];
        Edit9->Text = array[8];
        Edit10->Text = array[9];
}
//---------------------------------------------------------------------------
void TForm1::GetNumber()
{
        number1 = StrToFloat(MaskEdit1->Text);
        number2 = StrToFloat(MaskEdit2->Text);
        number3 = StrToFloat(MaskEdit3->Text);
        number4 = StrToFloat(MaskEdit4->Text);
        number5 = StrToFloat(MaskEdit5->Text);
        number6 = StrToFloat(MaskEdit6->Text);
        number7 = StrToFloat(MaskEdit7->Text);
        number8 = StrToFloat(MaskEdit8->Text);
        number9 = StrToFloat(MaskEdit9->Text);
        number10 = StrToFloat(MaskEdit10->Text);
        return;
}
//---------------------------------------------------------------------------
void TForm1::Clear()
{
        MaskEdit1->Text ="0";
        MaskEdit2->Text ="0";
        MaskEdit3->Text ="0";
        MaskEdit4->Text ="0";
        MaskEdit5->Text ="0";
        MaskEdit6->Text ="0";
        MaskEdit7->Text ="0";
        MaskEdit8->Text ="0";
        MaskEdit9->Text ="0";
        MaskEdit10->Text ="0";
        number1 = 0;
        number2 = 0;
        number3 = 0;
        number4 = 0;
        number5 = 0;
        number6 = 0;
        number7 = 0;
        number8 = 0;
        number9 = 0;
        number10 = 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnBtoSClick(TObject *Sender)
{
        GetNumber();
        DoBigToSmall();
}
//---------------------------------------------------------------------------