0

実行時に pchar 文字列を変更する必要があります。このコードで私を助けてください:

var
  s:pChar;
begin
  s:='123123';
  s[0]:=#32; // SO HERE I HAVE EXCEPTION !!!
end.

今、私は Delphi 7 に例外があります! 私のプロジェクトはネイティブのパスカル文字列を使用していません (windows.pas クラスなどはありません)

4

2 に答える 2

0

あなたはできる:

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.
于 2015-09-07T17:01:16.680 に答える