pascal指针变量赋值,该如何处理

pascal指针变量赋值
各位大大，我想问一下pascal指针变量赋值的问题：
1.我有条数据是这样的：12 34 57 639 Alfred Lincoln: 8，我定义了2个type用来放数据：
type Field = packed array[1..33] of char;
type employee = record  
  state: Integer;
  plant: Integer;
  dept: Integer;
  empid: Integer;
  count: Integer;
  name: Field;
  end; 
有个指针：type ptr = ^ employee; 
var p: array[1..n] of ptr; 
文件写出： for j:=1 to 33 do
  begin
  {while not(p[1]^.name[j] in ['a'..'z','A'..'Z']) do
  p[1]^.name[j]:=#32 ;}
  write(fileout,p[1]^.name[j]);
  end; 
我排过序
结果是：12 34 56 789 4 George Carter­­ºð­ºð­ºð­ºðº， 名字后面有乱码。、
我想把这些乱码去掉，想用空格代替，就用了上面注释的内容，编译没问题，但结果出不来。
把 p[1]^.name[j]:=#32 ;改成 p[1]^.name[j]:='' ;编译会报错，说 got Constant string expected Char.
我不知道怎么弄了，各位大大能帮一下吗？

[解决办法]

Delphi(Pascal) code

先初始化var  i:integer;  p: array[1..10] of ptr;begin  for i:=low(p) to high(p) do  begin    new(P[i]);    Fillchar(p[i]^.name,sizeof(p[i]^.name),#0);   //name數組初組化    //其它變量初始化  end;end;