Indy中server怎么得到收到数据包的大小(50分)

参考以前的帖子应该是用AThread.Connection.CurrentReadBufferSize，不过编译在这句出错，没有CurrentReadBufferSize这个函数，大家看看怎么办,谢谢大家帮忙。
procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
var
..
size:integer;
begin
AThread.Connection.ReadFromStack;
Size:=AThread.Connection.CurrentReadBufferSize;
...
end

procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
var
..
size:integer;
begin
size=AThread.Connection.ReadFromStack;
AThread.Connection.readbuffer(buffer^,size);
...
end

uses idTCPConnection;

接受答案了.