実行時に pchar 文字列を変更する必要があります。このコードで私を助けてください:
var
s:pChar;
begin
s:='123123';
s[0]:=#32; // SO HERE I HAVE EXCEPTION !!!
end.
今、私は Delphi 7 に例外があります! 私のプロジェクトはネイティブのパスカル文字列を使用していません (windows.pas クラスなどはありません)
あなたはできる:
procedure StrCopy(destination, source: PChar);
begin
// Iterate source until you find #0
// and copy all characters to destination.
// Remember to allocate proper amount of memory
// (length of source string and a null terminator)
// for destination before StrCopy() call
end;
var
str: array[0..9] of Char;
begin
StrCopy(str, '123123');
s[0]:=#32;
end.