bubblesort.cpp

关于书籍《Borland c++Builder工程实践》的源代码

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

#include <vcl.h>
#pragma hdrstop

#include "BubbleSort.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TBubForm *BubForm;
//---------------------------------------------------------------------------
__fastcall TBubForm::TBubForm(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TBubForm::FormCreate(TObject *Sender)
{
    int i,j,k;
    DisplayInterval = 400;
    DataGrid->Cells[0][0] = "元素编号";
    DataGrid->Cells[1][0] = "元素初值";
    DataGrid->Cells[2][0] = "  排序值 ";
    for(i = 1;i < 11;i++)
        DataGrid->Cells[0][i] = IntToStr(i);
    DataGeneration();
    Clean();
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::DataGeneration()
{
    randomize();
    for(int i = 0;i < 10;i ++)
    {
        Array[i] = rand()%20+1;     //最大值为20
        DataGrid->Cells[1][i+1] = IntToStr(Array[i]);
        DataGrid->Cells[2][i+1] = IntToStr(Array[i]);
        DataGrid->Refresh();
    }
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::Initialize()
{
    Canvas->Pen->Color =  clBlue;
    Canvas->Brush->Color = clRed;
    Canvas->Pen->Mode = pmNotXor;
    for(int k=0;k<10;k++)
        Canvas->Rectangle(160,37+k*21,160+8*Array[k],42+k*21);
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::Clean()
{
    Canvas->Pen->Mode = pmCopy;
    Canvas->Brush->Color = clBtnFace;
    Canvas->Pen->Color = clBtnFace;
    Canvas->Rectangle(158,26,350,250);  //覆盖画图区域
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::DataGenerateClick(TObject *Sender)
{
    DataGeneration();
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::ExitClick(TObject *Sender)
{
    Close();
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::DisplayClick(TObject *Sender)
{
    int temp,i,k,j;
    Clean();
    Initialize();
    for(j = 0;j < 9;j++)
	{
		for(i = 0;i < 9-j;i++)
        	if(Array[i] >= Array[i+1])
			{
                //等待
                Sleep(DisplayInterval);
                //覆盖
                for(k = i;k <= i+1;k++)
                    Canvas->Rectangle(160,37+k*21,160+8*Array[k],42+k*21);
                //排序
				temp = Array[i];
			    Array[i] = Array[i+1];
			    Array[i+1] = temp;
                //在排序值对应的列中刷新进行交换的数据
                DataGrid->Cells[2][i+1] = IntToStr(Array[i]);
                DataGrid->Cells[2][i+2] = IntToStr(Array[i+1]);
                DataGrid->Refresh();
                //重画
                for(k = i;k <= i+1;k++)
                    Canvas->Rectangle(160,37+k*21,160+8*Array[k],42+k*21);
			}
	}
}
//---------------------------------------------------------------------------

void __fastcall TBubForm::TrackBar1Change(TObject *Sender)
{
    DisplayInterval = 1100-TrackBar1->Position;
}
//---------------------------------------------------------------------------


void TBubForm::Run()
{
    int temp,i,k,j;
    Initialize();
	for(j = 0;j < 9;j++)
	{
		for(i = 0;i < 9-j;i++)
        	if(Array[i] >= Array[i+1])
			{
                //等待
                Sleep(DisplayInterval);
                //覆盖
                for(k = i;k <= i+1;k++)
                    Canvas->Rectangle(160,37+k*21,160+8*Array[k],42+k*21);
                //排序
				temp = Array[i];
			    Array[i] = Array[i+1];
			    Array[i+1] = temp;
                //在排序值对应的列中刷新进行交换的数据
                DataGrid->Cells[2][i+1] = IntToStr(Array[i]);
                DataGrid->Cells[2][i+2] = IntToStr(Array[i+1]);
                DataGrid->Refresh();
                //重画
                for(k = i;k <= i+1;k++)
                    Canvas->Rectangle(160,37+k*21,160+8*Array[k],42+k*21);
			}
	}
}