이 함수를
AContext->Connection->IOHandler->ReadStream(pStr,sizeof(pStr),true);
이렇게 고치세요
AContext->Connection->IOHandler->ReadStream(pStr);

AReadUntilDisconnect 를  true 로 주면 연결이 끊어질 때까지 무한정 대기합니다.
Disconnect() 해 주면 그 때서야 데이터를 읽어들입니다.
계속해서 연결을 유지한 채 데이터를 읽으려면 false 를 주거나 생략하면 됩니다.

AByteCount 가 지정되어 있으면 데이터에 가비지가 끼어 이상하게 읽어옵니다.
디폴트(unknown) 값 주면 읽을 수 있는 만큼 읽습니다.
TCP가 데이터 전송을 보장해주기 때문에 그냥 사용해도 됩니다.
이 값도 그냥 디폴트 사용하라고 생략해 버리면 됩니다. 그냥 경험상 아는 거여서 이유는 모릅니다.

packet *PACKET = (packet*)(pStr->Memory);
이렇게 메모리에 직접 접근할 때는 포인터 통해서 바로 찾아 들어가기 때문에 Position을 이동시키지 않아도 됩니다.

packet p;
pStr->Position = 0;
pStr->ReadBuffer(&p, sizeof(packet);
이렇게 접근할 때 사용하시면 됩니다.

chrisb 님이 쓰신 글 :
: 줄리엔님 매번 감사합니다 ㅠㅠ
:
: 정말 그대로 하니 해결이 되네요.
:
: 서버쪽으로 넘겨서 값을 받아보려는데 이번엔 서버가 문제가 되네요;;;
:
:  TMemoryStream *pStr = new TMemoryStream();
:  AContext->Connection->IOHandler->ReadStream(pStr,sizeof(pStr),true);
:  pStr->Position = 0;
:  packet *PACKET = (packet*)(pStr->Memory);
:
: 이렇게 하는게 이해를 잘못한건지 값이 전혀 안들어옵니다...
:
: 디버그를 찍어보면 execute가 구동이 안되는 것 같기도 하구요....
:
: server -> active = true하고 포트는 열어뒀습니다...
:
: 조언 부탁드립니다...
:
: Julien 님이 쓰신 글 :
: : 새로 생성된 스트림은 포인터가 맨 앞을 가리키고 있지만,
: : Write()를 수행한 후 스트림의 위치가 뒤로 옮겨집니다.
: : 잘 보시면 땅주인 님의 답변과 포인터 이동하는 시점에서 약간 다릅니다.
: :
: : TMemoryStream *pStr = new TMemoryStream();
: : pStr->Write(&PACKET,sizeof(PACKET));
: :
: : pStr->Position = 0; /////<-- 이 라인..
: :
: : IdTCPClient1->IOHandler->Write(pStr,sizeof(pStr),true);
: :
: : chrisb 님이 쓰신 글 :
: : : 답변 감사합니다.
: : :
: : : 하지만 변함없이 똑같은 에러가 뜨네요....
: : :
: : : 아마도 메모리스트림쪽보다 IdTCPClient1->IOHandler->Write(pStr,sizeof(pStr),true);
: : :
: : : 이 부분이 문제가 되는 것 같습니다... 하.. 찾아도 마땅한 자료가 없어서 더욱 답답해지네요 ㅠ
: : :
: : : 땅주인 님이 쓰신 글 :
: : : : TMemoryStream *pStr = new TMemoryStream();
: : : : pStr->Position = 0;
: : : : pStr->Write(&PACKET,sizeof(PACKET));
: : : :
: : : : 맞을래나?
: : : : 과거에 이런 경험이 있어서 적어 봅니다.
: : : :
: : : : chrisb 님이 쓰신 글 :
: : : : : struct pack
: : : : :     {
: : : : :         int i;
: : : : :         int j;
: : : : :         int k;
: : : : :     };
: : : : :
: : : : :     struct pack PACKET;
: : : : :
: : : : :     PACKET.i=3;
: : : : :     PACKET.j=4;
: : : : :     PACKET.k=5;
: : : : :
: : : : :     TMemoryStream *pStr = new TMemoryStream();
: : : : :     pStr->Write(&PACKET,sizeof(PACKET));
: : : : :    
: : : : :     IdTCPClient1->IOHandler->Write(pStr,sizeof(pStr),true);
: : : : :
: : : : : indy 10 사용중이구요.
: : : : :
: : : : : 디버깅을 찍어보면  IdTCPClient1->IOHandler->Write(pStr,sizeof(pStr),true);
: : : : : 이 부분에서 멈춰서 ErrorBox를 띄웁니다. No data to read.
: : : : :
: : : : : 뭐가 문제가 되서 이러는지.............. 살려주세요 ㅠ