Subject: Array of chars into string

70. *****
 Q: How do I convert an array of characters to a string? More
specifically, I haven't been able to convert an array of characters
into a string, so that I can write it to a file. The only way I have
been able to do it, is writing 1 char at a time.

 A: Carefully study these two simple test examples.  Note the
difference in the array's dimensions in the tests.

  type atype = array [0..20] of char;
  type stype = string[20];
  var s : stype;
      a : atype absolute s;
  begin
    FillChar (a, SizeOf(a), '*');
    s[0] := chr(20);
    writeln (s);
  end.

  type atype = array [1..20] of char;
  var s : string;
      a : atype;
  begin
    FillChar (a, Sizeof(a), '*');
    Move (a, s[1], 20);
    s[0] := chr(20);
    writeln (s);
  end.

Of course, you could also assign the array's characters one by one
to the string using a simple for loop (left as an exercise), but the
above methods are more efficient.
--------------------------------------------------------------------