Как скопировать строку PChar ? Опции

[Ldnb]

Думал, что, судя по описанию, функция StrCopy делает полноценное копирование, то есть автоматически выделяет память под копию данных. Как оказалось, нет, копируется только указатель, то есть, если после копирования из буферной переменной её значение меняется, то меняется и "скопированная" строчка.
Так как же всё-таки работать с этим странным PChar?

[volvo]

Ты читать умеешь?

Declaration:
function StrNew(Str: PChar): PChar;

Все, дальше можешь ничего не делать, уже будет неправильно. Ты НЕ МОЖЕШЬ вместо PChar передать String в функцию. Точка. Разговор с точки зрения компилятора - закончен. В результате функция возвращает все, что угодно, но только не правильный результат. Для конвертации Pascal-евской строки в PChar недостаточно просто написать PChar('string'), это тебе не Дельфи, в Турбо-Паскале для подобных вещей существует

StrPCopy (function) (Strings unit)
Copies a Pascal-style string to a null-terminated string.
Declaration:
function StrPCopy(Dest: PChar; Source: String): PChar;

Remarks:
StrPCopy does not perform any length checking.
The destination buffer must have room for at least Length(Source)+1 characters.

(особенно внимательно читай ремарку!!!)

Я бы написал свою функцию, которая будет выделять память под null-terminated строку и копировать туда символы из строки Паскалевской. Тогда твой код перепишется очень просто:

uses strings;

function Convert(s: string): PChar;
var p: Pointer;
begin
  GetMem(p, Length(s) + 1);
  StrPCopy(PChar(p), s);
  Convert := p;
end;

var
  testArr: array[0 .. 1] of PChar;
begin
  testArr[0] := Convert('!');
  testArr[1] := Convert('abcdefgh');

  StrLCat(testArr[0], StrNew(testArr[1]), StrLen(testArr[1]) + 1);
  writeln(testArr[0]); { Будет выведено '!abcdefgh', я так понимаю, именно это и должно было получиться?}
  ReadLn;
end.

Почему не StrCat, а StrLCat? Очень просто: StrCat не осуществляет контроль границ, то есть, если под первый параметр выделено меньше места, чем надо для хранения результата - то последствия будут неприятными. StrLCat же увеличивает размер буфера так, чтобы результат в него поместился (собственно, для этого там и предусмотрен третий параметр)...

Читайте документацию, внимательно читайте, это помогает разобраться...