Delphi 的字符及字符串[2] - Char、AnsiChar、WideChar、PChar、PAnsiChar、PWideChar

  c: Char; 

  
  c := ;
  ShowMessage(c); 

  
  c := ;
  ShowMessage(c); 

  
  c := Chr();
  ShowMessage(c); 
  c := Chr();
  ShowMessage(c); 

  
  ShowMessage(IntToStr(Length(c))); 

  
  c := ;
  ShowMessage(c); 
;

  c: WideChar; 

  
  c := ;
  ShowMessage(c); 
  ShowMessage(IntToStr(Length(c))); 
  ShowMessage(IntToStr(SizeOf(c))); 

  
  c := ;
  ShowMessage(c); 
  ShowMessage(IntToStr(Length(c))); 
  ShowMessage(IntToStr(SizeOf(c))); 

  
  c := ;
  ShowMessage(c); 

  
  c := ;
  ShowMessage(c); 

  
  
  
  c := WideString()[];
  ShowMessage(c); 

  
  ShowMessage();    
  ShowMessage( + ); 
  ShowMessage();    
;

  p: PChar;
  str: ;

  
  p := ;
  ShowMessage(p);                   
  ShowMessage(IntToStr(Length(p))); 

  
  str := ;
  p := PChar(str); 
  ShowMessage(p);                   
  ShowMessage(IntToStr(Length(p))); 
;

  p: PWideChar;
  str: WideString; 

  
  p := ;
  ShowMessage(p);                   
  ShowMessage(IntToStr(Length(p))); 

  
  str := ;
  p := PWideChar(str); 
  ShowMessage(p);                   
  ShowMessage(IntToStr(Length(p))); 
;

唉~: 代码着色在这里又出现问题, 不过现在没心情修改了, 以后再说吧.

---

转载于:https://www.cnblogs.com/skysunmoon/archive/2009/04/07/1430857.html