See a blog about the example of the move in Delphi, Heart doubts. Record your own experiments, although I do not know what this is ...
ProgramProject1;{$APPTYPE CONSOLE}usessysutils;varSCode:string='ABC'; P_code:pchar;beginWriteln (Cardinal (@sCode), # -);//output variable SCODE addressWriteln (Cardinal (PChar (@sCode)), # -);//turn the address of the variable scode into a pchar-type pointer and outputP_code:=pchar (SCode);//converts a variable SCODE to a character array pointer ending with #0Writeln (Cardinal (@ (P_code)), # -);//output ' ABC ' actual data addressWriteln (Cardinal (@ (p_code[0])),# -);//address of ' a ' in output SCODEWriteln (Cardinal (@ (p_code[1])),# -);//address of ' B ' in output SCODEWriteln (PChar (@ (p_code[0]))^,# -);//output scode ' A 'Writeln (p_code[1],# -);//output scode ' B 'Writeln (p_code,# -);//Output SCODEReadln;End.
Doubts about the Pchar (@string)