نقل بينات من مصفوفه PByteArray

[DevBlack]

السلام عليكم
اخواني قمت بانشاء مصفوفه من نوع
PByteArray
 وقد ملئتها بالبيانات و هي تعمل و لكن سؤالي هوه كيف سحب مجموعه من هذه البيانات و هذا الكود

type

TByteArray = array[0..99999999] of Byte;

PByteArray = ^TByteArray;

datamain: PByteArray;

datatmp: PByteArray;

GetMem(datamain, 12012012);

الان كيف ان انقل بينات من المصفوفه  main 

الى المصفوفه tmp

و يجب ان اكون انا حدد نقطة البدايه و نقطة النهايه

جربت هذا الطريقه ولكن لم تفلح معي

CopyMemory(datamain,datatmp,12043);

تضهر لي من الصفر الى حد الذي انا ادخلته

و شكرا لجميع اتمنى ان يكون واضحا