una ayuda con array

[DarkSton]

Código Delphi [-]
var
test: array[0..6] of Byte;   //5114] 03 40 74 65 73
begin
test[0]:= $14;
test[1]:= $51;
test[2]:= $03;
test[3]:= $40; @
test[4]:= $74; t
test[5]:= $65; e
test[6]:= $73; s
   send(@test[0],11);

como puedo enviar una cadena de texto a partir del test[3] por que si quisiera poner un texto mas grande tendria que agregar test[3] hasta test[100] y solo poner un texto en

Código Delphi [-]
var
test: array[0..6] of Byte;   //5114] 03 40 74 65 73
begin
test[0]:= $14;
test[1]:= $51;
test[2]:= $03;
test[3]:= $40; @tratando de borrar $40

   send(@test[0],11);