u6_1_1.cpp

《C++ Builder 5程序设计——基础教学篇》程序源代码2.

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

#include "U6_1_1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tf6_1_1 *f6_1_1;
//---------------------------------------------------------------------------
__fastcall Tf6_1_1::Tf6_1_1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall Tf6_1_1::FormPaint(TObject *Sender)
{
  int row=1,total=0,count=0;
  Canvas->Font->Size=12;
  Canvas->TextOut(10,row*20," 1-20 ぇ丁