Aparte de lo comentado por
Alberto y
Delphius ,te hago una observacion:
Si has declarado tu Array asi:
Código Delphi
[-]type mensaje_letrero = record
mensaje : array[1..5] of byte;end;
Eso siginifica que tus indices deben empezar en uno (1) y no en cero (0).
por lo que tu ciclo for deberia ser asi:
Código Delphi
[-]for i:=1 to 5 do begin
...
...
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7