⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unitmainform.cpp

📁 使用C++Builder开发的常住人口管理系统
💻 CPP
📖 第 1 页 / 共 5 页
字号:
          if( fread(room,sizeof(Room),1,fp) !=1 )
             break;
          if(room->Type==0 && room->Propert==1)
          {

            sum++;
            //尝试用列表框

            TListItem * NewItem;
            NewItem=ListViewSF->Items->Add();
            NewItem->Caption=room->Number;
            if (room->Type==0)
               NewItem->SubItems->Add("高档房");
            else if(room->Type==1)
               NewItem->SubItems->Add("中档房");
            else
               NewItem->SubItems->Add("低档房");

            if (room->Propert==0)
                NewItem->SubItems->Add("出租");
            else
                NewItem->SubItems->Add("销售");

            if (room->Ordered==1)
                 NewItem->SubItems->Add("已订用");
            else
                 NewItem->SubItems->Add("未订用");
            NewItem->SubItems->Add(room->Price);
            NewItem->SubItems->Add(room->Address);
            //delete NewItem;

          }
       }
       if (!sum)
       {
           ShowMessage("不存在该类型的房间,请重新选择类型!");
       }
       delete room;
       fclose(fp);
       return ;

    }
    else if(comBxSFXXFindWay->ItemIndex==2)
    {
       FILE *fp;
       if((fp=fopen("ROOM.db","rb+"))==NULL)
       {
          ShowMessage("打开文件失败!!");
          fclose(fp);
          return ;
       }
        fseek(fp,0L,0);
        Room *room=new Room;
        int sum=0;
        ListViewSF->Items->Clear();
        while(1)
        {

          if( fread(room,sizeof(Room),1,fp) !=1 )
             break;
          if(room->Type==1 && room->Propert==1)
          {

            sum++;
            //尝试用列表框

            TListItem * NewItem;
            NewItem=ListViewSF->Items->Add();
            NewItem->Caption=room->Number;
            if (room->Type==0)
               NewItem->SubItems->Add("高档房");
            else if(room->Type==1)
               NewItem->SubItems->Add("中档房");
            else
               NewItem->SubItems->Add("低档房");

            if (room->Propert==0)
                NewItem->SubItems->Add("出租");
            else
                NewItem->SubItems->Add("销售");
            if (room->Ordered==1)
                 NewItem->SubItems->Add("已订用");
            else
                 NewItem->SubItems->Add("未订用");
            NewItem->SubItems->Add(room->Price);
            NewItem->SubItems->Add(room->Address);
            //delete NewItem;

          }
       }
       if (!sum)
       {
           ShowMessage("不存在该类型的房间,请重新选择类型!");
       }
       delete room;
       fclose(fp);
       return ;
    }
    else
    {
       FILE *fp;
       if((fp=fopen("ROOM.db","rb+"))==NULL)
       {
          ShowMessage("打开文件失败!!");
          fclose(fp);
          return ;
       }
        fseek(fp,0L,0);
        Room *room=new Room;
        int sum=0;
        ListViewSF->Items->Clear();
        while(1)
        {

          if( fread(room,sizeof(Room),1,fp) !=1 )
             break;
          if(room->Type==2 && room->Propert==1)
          {

            sum++;
            //尝试用列表框

            TListItem * NewItem;
            NewItem=ListViewSF->Items->Add();
            NewItem->Caption=room->Number;
            if (room->Type==0)
               NewItem->SubItems->Add("高档房");
            else if(room->Type==1)
               NewItem->SubItems->Add("中档房");
            else
               NewItem->SubItems->Add("低档房");

            if (room->Propert==0)
                NewItem->SubItems->Add("出租");
            else
                NewItem->SubItems->Add("销售");

            if (room->Ordered==1)
                 NewItem->SubItems->Add("已订用");
            else
                 NewItem->SubItems->Add("未订用");
                 
            NewItem->SubItems->Add(room->Price);
            NewItem->SubItems->Add(room->Address);
            //delete NewItem;

          }
       }
       if (!sum)
       {
           ShowMessage("不存在该类型的房间,请重新选择类型!");
       }
       delete room;
       fclose(fp);
       return ;
    }


}
//---------------------------------------------------------------------------

void __fastcall TfrmMain::comBxZFXXFindWayChange(TObject *Sender)
{
    if (comBxZFXXFindWay->ItemIndex!=0)
    {
       edtZFXXGuanJianZi->Enabled=false;
    }
    else
    {
       edtZFXXGuanJianZi->Enabled=true;
    }
}
//---------------------------------------------------------------------------

void __fastcall TfrmMain::butZFXXFindClick(TObject *Sender)
{
    if (comBxZFXXFindWay->ItemIndex==0)
    {
       if (!SysUtil::IsNumberString(edtZFXXGuanJianZi->Text))
       {
           ShowMessage("房间编号数字格式不正确,请重新输入!");
           edtZFXXGuanJianZi->Clear();
           return;
       }
       
       Room *room=Global::FindSingleRoom("ROOM.db",edtZFXXGuanJianZi->Text.ToInt());
       //ValueListEditor1->InsertRow(Edit1->Text,Edit2->Text,1);
       if (!room)
       {
           ShowMessage("房间编号不存在,请重新输入!");
           edtZFXXGuanJianZi->Clear();
           delete room;
           return;
       }

        ListViewZF->Items->Clear();
        TListItem * NewItem;
        NewItem=ListViewZF->Items->Add();
        NewItem->Caption=room->Number;
        if (room->Type==0)
           NewItem->SubItems->Add("高档房");
        else if(room->Type==1)
           NewItem->SubItems->Add("中档房");
        else
           NewItem->SubItems->Add("低档房");

        if (room->Propert==0)
            NewItem->SubItems->Add("出租");
        else
            NewItem->SubItems->Add("销售");
        if (room->Ordered==1)
             NewItem->SubItems->Add("已订用");
        else
             NewItem->SubItems->Add("未订用");
        NewItem->SubItems->Add(room->Price);
        NewItem->SubItems->Add(room->Address);
       delete room;
    }
    else if(comBxZFXXFindWay->ItemIndex==1)
    {
       
       FILE *fp;
       if((fp=fopen("ROOM.db","rb+"))==NULL)
       {
          ShowMessage("打开文件失败!!");
          fclose(fp);
          return ;
       }
        fseek(fp,0L,0);
        Room *room=new Room;
        int sum=0;
        ListViewZF->Items->Clear();
        while(1)
        {

          if( fread(room,sizeof(Room),1,fp) !=1 )
             break;
          if(room->Type==0 && room->Propert==0)
          {
            
            sum++;
            //尝试用列表框

            TListItem * NewItem;
            NewItem=ListViewZF->Items->Add();
            NewItem->Caption=room->Number;
            if (room->Type==0)
               NewItem->SubItems->Add("高档房");
            else if(room->Type==1)
               NewItem->SubItems->Add("中档房");
            else
               NewItem->SubItems->Add("低档房");

            if (room->Propert==0)
                NewItem->SubItems->Add("出租");
            else
                NewItem->SubItems->Add("销售");
            if (room->Ordered==1)
                 NewItem->SubItems->Add("已订用");
            else
                 NewItem->SubItems->Add("未订用");
            NewItem->SubItems->Add(room->Price);
            NewItem->SubItems->Add(room->Address);
            //delete NewItem;

          }
       }
       if (!sum)
       {
           ShowMessage("不存在该类型的房间,请重新选择类型!");
       }
       delete room;
       fclose(fp);
       return ;
       
    }
    else if(comBxZFXXFindWay->ItemIndex==2)
    {
       FILE *fp;
       if((fp=fopen("ROOM.db","rb+"))==NULL)
       {
          ShowMessage("打开文件失败!!");
          fclose(fp);
          return ;
       }
        fseek(fp,0L,0);
        Room *room=new Room;
        int sum=0;
        ListViewZF->Items->Clear();
        while(1)
        {

          if( fread(room,sizeof(Room),1,fp) !=1 )
             break;
          if(room->Type==1 && room->Propert==0)
          {
            
            sum++;
            //尝试用列表框

            TListItem * NewItem;
            NewItem=ListViewZF->Items->Add();
            NewItem->Caption=room->Number;
            if (room->Type==0)
               NewItem->SubItems->Add("高档房");
            else if(room->Type==1)
               NewItem->SubItems->Add("中档房");
            else
               NewItem->SubItems->Add("低档房");

            if (room->Propert==0)
                NewItem->SubItems->Add("出租");
            else
                NewItem->SubItems->Add("销售");
            if (room->Ordered==1)
                 NewItem->SubItems->Add("已订用");
            else
                 NewItem->SubItems->Add("未订用");
            NewItem->SubItems->Add(room->Price);
            NewItem->SubItems->Add(room->Address);
            //delete NewItem;

          }
       }
       if (!sum)
       {
           ShowMessage("不存在该类型的房间,请重新选择类型!");
       }
       delete room;
       fclose(fp);
       return ;
    }
    else
    {
       FILE *fp;
       if((fp=fopen("ROOM.db","rb+"))==NULL)
       {
          ShowMessage("打开文件失败!!");
          fclose(fp);
          return ;
       }
        fseek(fp,0L,0);
        Room *room=new Room;
        int sum=0;
        ListViewZF->Items->Clear();
        while(1)
        {

          if( fread(room,sizeof(Room),1,fp) !=1 )
             break;
          if(room->Type==2 && room->Propert==0)
          {
            
            sum++;
            //尝试用列表框

            TListItem * NewItem;
            NewItem=ListViewZF->Items->Add();
            NewItem->Caption=room->Number;
            if (room->Type==0)
               NewItem->SubItems->Add("高档房");
            else if(room->Type==1)
               NewItem->SubItems->Add("中档房");
            else
               NewItem->SubItems->Add("低档房");

            if (room->Propert==0)
                NewItem->SubItems->Add("出租");
            else
                NewItem->SubItems->Add("销售");
            if (room->Ordered==1)
                 NewItem->SubItems->Add("已订用");
            else
                 NewItem->SubItems->Add("未订用");
            NewItem->SubItems->Add(room->Price);
            NewItem->SubItems->Add(room->Address);
            //delete NewItem;

          }
       }
       if (!sum)
       {
           ShowMessage("不存在该类型的房间,请重新选择类型!");
       }
       delete room;
       fclose(fp);
       return ;
    }

}
//---------------------------房间信息管理代码块 UP------------------------------------------------


void __fastcall TfrmMain::btnDeleteClick(TObject *Sender)
{
    if (SysUtil::JudgeSfzID(edtRYXXGLSID->Text))
    {

        double index;
        //判断身份证是否存在

        if((index=Global::SearchIndex(pCZRYHead,edtRYXXGLSID->Text.c_str()))==-1L)
        {
           ShowMessage("找不到你要的身份证号码,请检查你的输入!");
           return ;
        }
        //创建一个临时结构体
        PerInfo *per=new PerInfo;
        Global::ReadPerInfoFromFile("Person.db",index,per);
        Global::DeleteJieGouMes(RenKouTJ,per->Age,per->WenHua,per->ShouRu,per->XingZhi);
        pCZRYHead=Global::DeleteIndex(pCZRYHead,edtRYXXGLSID->Text.c_str());

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -