Unit1.cpp
上传用户:lhxd_sz
上传日期:2014-10-02
资源大小:38814k
文件大小:3k
源码类别:

VC书籍

开发平台:

C++ Builder

  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. #include "Unit1.h"
  5. //---------------------------------------------------------------------------
  6. #pragma package(smart_init)
  7. #pragma resource "*.dfm"
  8. TForm1 *Form1;
  9. //---------------------------------------------------------------------------
  10. __fastcall TForm1::TForm1(TComponent* Owner)
  11.         : TForm(Owner)
  12. {
  13. }
  14. //---------------------------------------------------------------------------
  15. void __fastcall TForm1::Button1Click(TObject *Sender)
  16. {
  17.   AnsiString Str[12];
  18.   int StrCount;
  19.   int ii;
  20.   AnsiString ss1;
  21.   TTreeNode *Node[6],*NNode;
  22.   int lastw=3,NodeID=0;
  23.   Str[0]="101";
  24.   Str[1]="101001";
  25.   Str[2]="101001001";
  26.   Str[3]="101001002";
  27.   Str[4]="102";
  28.   Str[5]="102001";
  29.   Str[6]="102002";
  30.   Str[7]="103";
  31.   Str[8]="103001";
  32.   Str[9]="103001001";
  33.   Str[10]="103001001001";
  34.   StrCount=11;
  35.   Node[0]=TreeView1->Items->GetFirstNode();
  36.   TreeView1->Items->Clear();
  37.   for(ii=0;ii<StrCount;ii++)
  38.   {
  39.     ss1=Str[ii];
  40.     if(ss1.Length()==lastw)
  41.     {
  42.       Node[NodeID]=TreeView1->Items->Add(Node[NodeID],ss1);
  43.       NNode=Node[NodeID];
  44.     }
  45.     else if(ss1.Length()>lastw)
  46.     {
  47.       Node[NodeID+1]=TreeView1->Items->AddChild(Node[NodeID],ss1);
  48.       NNode=Node[NodeID+1];
  49.       lastw=ss1.Length();
  50.       NodeID++;
  51.     }
  52.     else
  53.     {
  54.       lastw=ss1.Length();
  55.       NodeID=lastw/3-1;
  56.       Node[NodeID]=TreeView1->Items->Add(Node[NodeID],ss1);
  57.       NNode=Node[NodeID];
  58.     }
  59.   }
  60. }
  61. //---------------------------------------------------------------------------
  62. void __fastcall TForm1::Button2Click(TObject *Sender)
  63. {
  64.   AnsiString Str[12];
  65.   int StrCount;
  66.   int ii;
  67.   AnsiString ss1;
  68.   TTreeNode *Node[6],*NNode;
  69.   int lastw=3,NodeID=0;
  70.   Str[0]="101";
  71.   Str[1]="101001";
  72.   Str[2]="101001001";
  73.   Str[3]="101001002";
  74.   Str[4]="102";
  75.   Str[5]="102001";
  76.   Str[6]="102002";
  77.   Str[7]="103";
  78.   Str[8]="103001";
  79.   Str[9]="103001001";
  80.   Str[10]="103001001001";
  81.   StrCount=11;
  82.   Node[0]=TreeView1->Items->GetFirstNode();
  83.   TreeView1->Items->Clear();
  84.   for(ii=0;ii<StrCount;ii++)
  85.   {
  86.     ss1=Str[ii];
  87.     if(ss1.Length()==lastw)
  88.     {
  89.       Node[NodeID]=TreeView1->Items->Add(Node[NodeID],ss1);
  90.       NNode=Node[NodeID];
  91.       NNode->ImageIndex=0;NNode->SelectedIndex=1;
  92.     }
  93.     else if(ss1.Length()>lastw)
  94.     {
  95.       Node[NodeID+1]=TreeView1->Items->AddChild(Node[NodeID],ss1);
  96.       NNode=Node[NodeID+1];
  97.       NNode->ImageIndex=0;NNode->SelectedIndex=1;
  98.       lastw=ss1.Length();
  99.       NodeID++;
  100.     }
  101.     else
  102.     {
  103.       lastw=ss1.Length();
  104.       NodeID=lastw/3-1;
  105.       Node[NodeID]=TreeView1->Items->Add(Node[NodeID],ss1);
  106.       NNode=Node[NodeID];
  107.       NNode->ImageIndex=0;NNode->SelectedIndex=1;
  108.     }
  109.   }
  110. }
  111. //---------------------------------------------------------------------------
  112. void __fastcall TForm1::Button3Click(TObject *Sender)
  113. {
  114.   TTreeNode *Node;
  115.   AnsiString ass;
  116.   int idx;
  117.   Node=TreeView1->Selected;
  118.   if(Node!=NULL)
  119.   {
  120.     idx=TreeView1->Selected->AbsoluteIndex;
  121.     if(TreeView1->Items->Item[idx]->HasChildren==False)
  122.     {
  123.       ass=TreeView1->Items->Item[idx]->Text;
  124.       ShowMessage(ass);
  125.     }
  126.     else
  127.       ShowMessage("has Child");
  128.   }
  129. }
  130. //---------------------------------------------------------------------------