unit1.cpp

<<C++Builder 6实用编程100例>>随书光盘

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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int current_row=1;       //当前输入项所在行
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void TForm1::checkedit()
{
        if(Edit1->Text!=""&&Edit2->Text!="")
        {
                GroupBox1->Visible=true;
                Edit3->Text="";
                Edit4->Text="";
                Edit5->Text="";
        }
        else
                GroupBox1->Visible=false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
        StringGrid1->Cells[1][0]="学号";
        StringGrid1->Cells[2][0]="姓名";
        StringGrid1->Cells[3][0]="语文";
        StringGrid1->Cells[4][0]="数学";
        StringGrid1->Cells[5][0]="英语";
        StringGrid1->Cells[6][0]="总分";
        StringGrid1->Cells[0][1]="1";
        StringGrid1->Cells[0][2]="2";
        StringGrid1->Cells[0][3]="3";
        StringGrid1->Cells[0][4]="4";
        StringGrid1->Cells[0][3]="3";
        StringGrid1->Cells[0][4]="4";
        StringGrid1->Cells[0][5]="5";
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Button1Click(TObject *Sender)
{
        float chn_score,math_score,eng_score,total_score;
        if(Edit3->Text!=""&&Edit4->Text!=""&&Edit5->Text!="")
        {
                StringGrid1->Cells[1][current_row]=Edit1->Text;
                StringGrid1->Cells[2][current_row]=Edit2->Text;
                chn_score=StrToFloat(Edit3->Text);
                StringGrid1->Cells[3][current_row]=Edit3->Text;
                math_score=StrToFloat(Edit4->Text);
                StringGrid1->Cells[4][current_row]=Edit4->Text;
                eng_score=StrToFloat(Edit5->Text);
                StringGrid1->Cells[5][current_row]=Edit5->Text;
                total_score=chn_score+math_score+eng_score;
                StringGrid1->Cells[6][current_row]=FloatToStr(total_score);
                current_row++;
                Edit1->Clear();
                Edit2->Clear();
                Edit3->Clear();
                Edit4->Clear();
                Edit5->Clear();
        }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
        Edit1->Clear();
        Edit2->Clear();
        Edit3->Clear();
        Edit4->Clear();
        Edit5->Clear();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button3Click(TObject *Sender)
{
        int i,j;
        for(i=1;i<=6;i++)
                for(j=1;j<=5;j++)
                        StringGrid1->Cells[i][j]="";
        current_row=1;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1Change(TObject *Sender)
{
        checkedit();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit2Change(TObject *Sender)
{
        checkedit();
}
//---------------------------------------------------------------------------