u14_3_2.cpp

C++Builde5程序设计—基础教学篇程序源代码1。

//-----------------  u14_3_2  ------------------------------------
#include <stdio.h>
#include <vcl.h>
#pragma hdrstop
#include "u14_3_2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tf14_3_2 *f14_3_2;
//---------------------------------------------------------------------------
__fastcall Tf14_3_2::Tf14_3_2(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
FILE *inf;
bool open_flag;
void __fastcall Tf14_3_2::FormCreate(TObject *Sender)
{
  open_flag=false;
  btnFirstClick(Sender);
}
//---------------------------------------------------------------------------
void __fastcall Tf14_3_2::btnFirstClick(TObject *Sender)
{
  char* file_name="a:/ch14/student.sco";
  if(open_flag==true) fclose(inf);
  inf=fopen(file_name,"r");
  open_flag=true;
  btnFirst->Enabled=false;
  btnNext->Enabled=true;
  btnNextClick(Sender);
 }
//---------------------------------------------------------------------------
void __fastcall Tf14_3_2::btnNextClick(TObject *Sender)
{
  char *name=new char;
  int chi,eng,math,ave;
  if(!feof(inf))
  {
     fscanf(inf,"%s %d %d %d",name,&chi,&eng,&math);
     edtName->Text=name;
     edtChinese->Text=IntToStr(chi);
     edtEnglish->Text=IntToStr(eng);
     edtMath->Text=IntToStr(math);
     ave=(chi+eng+math)/3;
     edtAve->Text=IntToStr(ave);
     if(ave<=100 && ave>=90)
       edtMark->Text="纔单";
     else if( ave>=80)
       edtMark->Text="ヒ单";
     else if ( ave>=70)
       edtMark->Text="