系统设计数据结构

     用OBject pascal自定义一个结构（或者用TreeView）描述的下面TSCard结构：object SCard_1: TSCard
  Left = 0
  Top = 0
  Align = alClient
  ClientHeight = 415
  ClientWidth = 709
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  Pfrm = PCard.Owner
  IsControl = True
  object RzPageControl1: TRzPageControl
  Left = 0
  Top = 0
  Width = 521
  Height = 273
  ActivePage = TabSheet1
  BackgroundColor = clInactiveCaptionText
  BoldCurrentTab = True
  ParentBackgroundColor = False
  ParentColor = False
  TabIndex = 0
  TabOrder = 0
  FixedDimension = 18
  object TabSheet1: TRzTabSheet
  Caption = #36164#26009#21345#29255
  end
  end
  object DataSource1: TDataSource
  Left = 49
  Top = 43
  end
  object LMDStrList1: TLMDStrList
  Items.Strings = (
  '0')
  Sorted = False
  Duplicates = dupAccept
  Left = 145
  Top = 91
  end
end