关于结构和指针的问题

Question

type
  TClient= record
    UserData:TUserBlock;
    m_IP:string[20];
    m_Port:integer;
  end;
  PClient=^TClient;
这个数据结构，如何使用呀？
怎么样做才能形成一个虚拟的datagrid或者listView(report样式）？
我对这个不太理解，请详解，谢谢！

Answer 1

PClient=^TClient;//----这是一个指针var
  i:integer;
  pnt:pclient;
  
  for i:=0 to 2 do
    begin
      new(pnt);
      pnt^.m_ip='127.0.0.1';
      pnt^.m_port:='6000';
      treeview1.items.items[i].data=pnt;//----使某个列表中附加指针指向当前的内存入口;
     //dispose(pnt);//----释放内存空间
    end;