cd2_1u.cpp

C++ Builder程序员学习数据结构第2章

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

#include <vcl.h>
#pragma hdrstop

#include "cd2_1u.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tfmain *fmain;
//---------------------------------------------------------------------------
__fastcall Tfmain::Tfmain(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall Tfmain::FormClick(TObject *Sender)
{
   int a[5]={88,66,99,33,55};      //在定义数组的同时,输入内容值  注意是大括号
   int i;                          //定义变量i为整型变量

   fmain->Canvas->TextOut(30,30,"数组索引值及内容值");   //设置Canvas对象绘图
                                                         //TextOut用以显示字符串
   for(i=0;i<5;i++)    //For循环,设i初值为零,当i小于5时执行下列语句,执行后i加1
   {
      fmain->Canvas->TextOut(30,50+20*i,     //函数TextOut语法为TextOut(x,y,str)
                     "a["+IntToStr(i)+"]= "  //其中x,y是显示坐标,str是显示字符串
                     +IntToStr(a[i]));       //IntToStr是由整数转换为字符串
   }
}
//---------------------------------------------------------------------------