cd4_1u.cpp

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

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

#include <vcl.h>
#pragma hdrstop      
#include <stdlib.h>
#include "cd4_1u.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
struct list                            //链表定义格式如下
{
   String name;
   struct list *next;
};
typedef struct list node;
typedef node *link;

link H;                                //设定首结点
link P;                                //设定指向结点
int a[10]={0};                         //定义数组a为整数型,长度为10
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
   H=(link)malloc(sizeof(node));        //首结点要求配置存储空间

   if(H==NULL)                          //存储空间配置失败的信息

   {
      Application->MessageBox(
         "请确定原因后再执行","存储空间配置失败",
         32);
   }
   else                                 //存储空间配置成功后,首结点内容设置

   {
      H->name="