zoukankan      html  css  js  c++  java
  • JSON 之 SuperObject(5): Format 与转义字符

    unit Unit1;
    
    interface
    
    uses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls;
    
    type
      TForm1 = class(TForm)
        Button1: TButton;
        Button2: TButton;
        procedure Button1Click(Sender: TObject);
        procedure Button2Click(Sender: TObject);
      end;
    
    var
      Form1: TForm1;
    
    implementation
    
    {$R *.dfm}
    
    uses SuperObject;
    
    //Format
    procedure TForm1.Button1Click(Sender: TObject);
    var
      jo: ISuperObject;
    begin
      jo := SO('{"Name":"张三", "Age":88, "Tel":["111,222"], "Children":{"Name":"张继"}}');
    
      ShowMessage(jo.Format('姓名: %Name%; 年龄: %Age%'));
    
      ShowMessage(jo.Format('%Tel%; %Tel[0]%; %Tel[1]%'));
    
      ShowMessage(jo.Format('%Children%; %Children.Name%'));
    
      ShowMessage(jo.Format('[Name], [Age]', '[', ']')); {可更换默认的 % 标记}
    end;
    
    //特殊字符
    procedure TForm1.Button2Click(Sender: TObject);
    var
      jo: ISuperObject;
    begin
      jo := SO;
    
      { u }
      jo := SO('"u0041u0042u0043"');
      ShowMessage(jo.AsString);
    
      { x }
      jo := SO('"x41x42x43"');
      ShowMessage(jo.AsString);
    
      { u 汉字}
      jo := SO('"u4e07u4e00"');
      ShowMessage(jo.AsString);
    
      { u 后面的数字可大写 }
      jo := SO('"u4E07u4E00"');
      ShowMessage(jo.AsString);
    
      { \、/ }
      jo := SO('"A\B/C"');
      ShowMessage(jo.AsString);
    
      { 	、
     还有 、f、
     }
      jo := SO('"A	B
    C"');
      ShowMessage(jo.AsString);
    
      { "" }
      jo := SO('""ABC""');
      ShowMessage(jo.AsString);
    
      { null 是 JSON 的一种数据类型, 代表空值, 空值也是值的一种 }
      jo := SO('[1,2,3,null]');
      ShowMessage(jo.AsString);
    end;
    
    end.
  • 相关阅读:
    Lintcode423-Valid Parentheses-Easy
    Lintcode97-Maximum Depth of Binary Tree-Easy
    Lintcode175-Revert Binary Tree-Easy
    Lintcode469-Same Tree-Easy
    Leetcode480-Binary Tree Paths-Easy
    Lintcode481-Binary Tree Leaf Sum-Easy
    Lintcode482-Binary Tree Level Sum-Easy
    Lintcode376-Binary Tree Path Sum-Easy
    SQL
    Database
  • 原文地址:https://www.cnblogs.com/cpprun/p/4787960.html
Copyright © 2011-2022 走看看