var
  Buff     : string;
  nSize  : integer;
  P1, P2 : Pchar;
  AList   : TList;
begin
  Buff := '1234567890';
  nSize := length(Buff);
  
  GetMem(Mem1, nSize + sizeof(LongInt)); // 메모리 할당한다.
  P1 := P2;  <------------------1번
  
  Move(nSize,P1^,Sizeof(LongInt));  // 문자열의 길이를 설정한다
  
  inc(P1, Sizeof(Longint));          // Sizeof(Longint)만큼 포인터를 옮긴다.
  
  Move(Buff[1],P1^,nSize);   // Buff의 내용을 P1에 Move.

  AList.add(P2);<-----------------2번

위에 소스에서 제가아는데로 주석을 달았는데
제가 이해하고 있는것이 맞나 알려주세요..
그리고
1번에서 P1과 P2는 무엇이 같다는거요?
주소값이 같다는건가요 아님 같은 값을 가진다는 건가요?
2번에서 P2를 리스트에 add할때 P2에는 어떤값이 들어가는거요?
그리고 마지막으로
P1에는 어떤값이 들어가는거요?
buff의 내을을 포인터로 가르치는건가요 아님 buff의 내용을 복사해오는건가요?

답변기다리겠습니다.