关于指针的问题，请教高人，

Question

如果我取了一段数据（100 BYTE）到指针PSEC里去，分配内存大小为100，
这时个我要把这个这段数据的第10个字节的内容赋给第50个字节，对指针如何操作，
也可以重新组织一下赋给一个新的指针，
但赋给指针前的数据是无法组织的，只组是先取到指针里以后再操作，

Answer 1

p:pchar;p:=@str;p:=p+10;a:=p^;p:=p+40;
p^:=a;

Answer 2

既然有字节级的操作，那就用个字节指针指呗。p: PByte

Answer 3

p:pchar;
str:string='1234512345......1234512345'p:=@str;
(p+50)^:=(p+10)^;

Answer 4

p:pchar;p1 := PSEC;
p2 := PSEC;inc(p1,10);
inc(p2,50);CopyMemory (p2,p1, 1);