🚀 go-pugleaf

>>   tString = Record
>>     Case Boolean Of
>>       True: (AsStr :String);
>>       False: (AsByte :Byte; AsChar :Array[0..253] Of Char);
>>   End;
>
>> In your program, you can either reference "tString.AsStr" as a string type,
>> or reference it as "AsByte" and "AsChar" to get the length (AsByte) and it's
>> contents (AsChar).  This means you can use the PChar routines on
>> tString.AsChar (as long as you remember to update AsByte with the string
>> length). You can empty the string by "tString.AsStr := '';" or
>
>You'll also need to make sure that you write a terminating #0 byte each time
>you modify the string, if you want to use it with PChar routines.

Now we are on this topic, does somebody have a unit for modula2 styled 
array of char ?

This is zero terminated, except when the array is full (then length is
sizeof/high(x)), which allows the last char to be used for text.