求教一下大家缓冲区的处理

我写了一个接收clientsocket数据的程序，设了1K的char数组用于接收数据，但是对方发送的数据有时大有时小，小的数据比较好处理，一次接收完成。大的数据需要读几次，但是我不知道如何让char数组，接收数据的时侯能够存储在char数组的任何位置。
var
str:string;
i:integer;
Buf : array [0..1023] of char;
Len : Integer;
p:pchar;
begin
Len := TWSocket(Sender).Receive(@Buf, Sizeof(Buf) - 1);