で、既に回答があるように領域確保してコピーすればいいだけかと。
SetLength(Res,17);
Move(Line[posision],Res[1],8);
とか色々。不思議なコードを出した理由は?