盒子论坛 v2.1

type
    //定义在线用户的数据结构;
    pon_lineinf=^tonlineinf;
    ton_lineinf=record
      //用户名；
      username:string[255];
      //用户标志符，为用户的socket句柄；
      soc:tsocket;
      end;

pon_lineinf=^tonlineinf;是什么意思？？？？请教！！！
----------------------------------------------
-

作者：

zizii (高高高级馒头)	★☆☆☆☆	-
	神秘会员

2003/10/27 21:13:27

1楼：

指针，详细的说明找书看。
----------------------------------------------
维护世界和平，共创美好盒子。

作者：

kukuasir (kukuasir)	★☆☆☆☆	-
	盒子活跃会员

2003/10/27 21:17:49

1楼：

指针。。。。
----------------------------------------------
???

作者：

hanzi520 (hanzi)	★☆☆☆☆	-
	普通会员

2003/10/28 2:19:51

2楼：

恩~我不会~~！
----------------------------------------------
hanzi

作者：

ztl15 (sky)	★☆☆☆☆	-
	普通会员

2003/10/28 7:21:41

3楼：

能不能说明的详细一点呀？到底是不是指针呀？？
----------------------------------------------
-

作者：

ztl15 (sky)	★☆☆☆☆	-
	普通会员

2003/10/28 18:07:15

4楼：

有人能回答吗？
----------------------------------------------
-

作者：

bios (阿贡)	★☆☆☆☆	-
	盒子中级会员

2003/10/29 6:52:50

5楼：

是的

var
  a:pon_lineinf;
  i:Longint;
  s:string;
  al:TList;
begin
  al:=TList.Create;
for i:=0 to 9 do
   begin
    new (a);
    a^.username:=inttostr(I);
    a^.soc:=tsocket.create(nil);
    a^.soc.port:=i;
    al.add(a);
   end;
for i:=0 to al.count-1 do
  begin
   a:=pon_lineinf;(al.item[i]);
   listbox1.item.add(a^.username);

  end ;
for i:=0 to al.count-1 do
  begin
   a:=pon_lineinf;(al.item[i]);
   dispose(a);
  end ;
end;
----------------------------------------------

信息

登陆以后才能回复