Problema con Array
 

Hola mi problema es el siguiente:
Lo que hago es Abrir un Archivo de Texto el cual solo contiene numeros de 8 caracteres como los siguientes (sin las viñetas Claro):

• 20004545
• 20005231
• 20001516

Al leer el archivo lo asigno a un array de 9 carcteres y lo agrego a un ListBox pero me muestra la cadena con basura como puedo hacer para mostrar de forma correcta??
Acepto sugerencias - Si el array es de 8 carcteres la basura se acumula en la cadena siguiente y se es de 7 es peor. Con 9 entra la cadena y la basura

Al principio podrías Inicial izar tu array. con algo así :

Código Delphi [-]
  For La:=1 to 9 do
    VecArray[La]:='';

O podrías utilizar un TStringList y utilizar su propiedad "LoadFromFile". Consulta la ayuda de delphi para más información.

Gracias por la ayuda pero no pude solucionar mi problema
intente con

Código Delphi [-]
For La:=1 to 9 do
    VecArray[La]:='';

Pero no da resultado siguen saliendo caracteres basura
Uso un Objeto TBoxList que usa TStringList, o me equivoco?
lo que hago es lo siguiente:

Código Delphi [-]
while not eof(f)do
   begin
      BlockRead(f,buf,sizeof(buf),leidos); //Leo un Bloque del Archivo y lo asigno a la Cadena buf
      LBCadena.Items.Add(buf); // Inserto la Cadena en el Objeto
   end;