zoukankan      html  css  js  c++  java
  • Delphi 的字符及字符串[2] Char、AnsiChar、WideChar、PChar、PAnsiChar、PWideChar

    //单字符 Char、AnsiChar (在目前版本(2007)中, 它们是一回事, 只有 1 字节大小)
    var
      c: Char; {Char 类型的取值范围是: #0..#255, 用十六进制表示是: #$0..#$FF}
    begin
      {用十进制方式赋值:}
      c := #65;
      ShowMessage(c); {A}
    
      {用十六进制方式赋值:}
      c := #$41;
      ShowMessage(c); {A}
    
      {用 Chr 函数代替 # 符号}
      c := Chr(65);
      ShowMessage(c); {A}
      c := Chr($41);
      ShowMessage(c); {A}
    
      {Char 长度当然会是 1}
      ShowMessage(IntToStr(Length(c))); {1}
    
      {Char、AnsiChar 允许这样方便地赋值(也就是和 1 字节长度的字符串是兼容的):}
      c := 'B';
      ShowMessage(c); {B}
    end;
    
    //UniCode 字符 WideChar; 和 AnsiChar 不同, WideChar 是占 2 字节大小. var c: WideChar; {WideChar 的取值范围是: #0..#65535, 用十六进制表示是: #$0..#$FFFF} begin {WideChar 兼容了 AnsiChar 的 #0..#255; 但占用了 2 字节大小} c := #65; ShowMessage(c); {A} ShowMessage(IntToStr(Length(c))); {1; 这是字符长度} ShowMessage(IntToStr(SizeOf(c))); {2; 但占用 2 个字节} {用十六进制赋值} c := #$4E07; ShowMessage(c); {万} ShowMessage(IntToStr(Length(c))); {1; 这是字符长度} ShowMessage(IntToStr(SizeOf(c))); {2; 但占用 2 个字节} {用十进制赋值} c := #19975; ShowMessage(c); {万} {如果不超出 #255 的范围是可以直接赋值的} c := 'B'; ShowMessage(c); {万} {这样不行} //c := '万'; {这是 Delphi 的支持问题, 估计 Delphi 2008 应该可以解决} {可以这样变通一下:} c := WideString('万')[1]; ShowMessage(c); {万} {用 WideChar 的方式显示我的名字} ShowMessage(#19975#19968); {万一} ShowMessage(#19975 + #19968); {万一} ShowMessage(#$4e07#$4e00); {万一} end;
    //字符指针 PChar、PAnsiChar; 在当前版本(2007)中它们没有区别. var p: PChar; str: string; begin {可以给 PChar 直接赋予字符串常量} p := '万一'; ShowMessage(p); {万一} ShowMessage(IntToStr(Length(p))); {4} {给变量值需要转换} str := '万一的 Delphi 博客'; p := PChar(str); {转换} ShowMessage(p); {万一的 Delphi 博客} ShowMessage(IntToStr(Length(p))); {18} end;
    //宽字符指针 PWideChar var p: PWideChar; str: WideString; {注意这里不是 String} begin {可以给 PWideChar 直接赋予字符串常量} p := '万一'; ShowMessage(p); {万一} ShowMessage(IntToStr(Length(p))); {2} {给变量值需要转换} str := '万一的 Delphi 博客'; p := PWideChar(str); {转换} ShowMessage(p); {万一的 Delphi 博客} ShowMessage(IntToStr(Length(p))); {13} end;
    唉~: 代码着色在这里又出现问题, 不过现在没心情修改了, 以后再说吧.
  • 相关阅读:
    Python基础---线程
    virtualenv和virtualenvwrapper的安装和使用
    微信公众号实现简易的物联网控制(二)
    PyQt5之SQLite数据库操作(1)
    PyQt5无边框后窗口的移动方法
    PyQt5显示GIF图片
    Python显示进度条的方法
    WinSCP默认使用root用户登录的方法
    微信公众号实现简易的物联网控制(一)
    Arduino语音天气预报(三)
  • 原文地址:https://www.cnblogs.com/del/p/1088958.html
Copyright © 2011-2022 走看看