JSON 의 SuperObject (13): SO 와 SA 함수 에 대하 여
앞에서 문자열 인 자 를 주 었 습 니 다. 인 자 는 모든 유형, 심지어 상수 배열 일 수 있 습 니 다.
SA 와 SO 는 모두 ISuper Object 로 돌아 갑 니 다.
SO 는 stArray 형식의 ISuperObject 를 만 들 수 있 지만 SA 는 stArray 형식의 ISuperObject 만 생 성 합 니 다.
SA 의 매개 변수 도 상수 배열 일 수 밖 에 없습니다.
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, TypInfo;
procedure TForm1.Button1Click(Sender: TObject);
var
jo: ISuperObject;
begin
jo := SO(['A',1, 'B',2.5, 'C','xyz', 'D',True]);
ShowMessage(jo.AsJSon); // {"D":true,"C":"xyz","B":2.5,"A":1}
{ }
ShowMessage(GetEnumName(TypeInfo(TSuperType), Ord(jo.DataType))); // stObject
jo := SO(3.14);
ShowMessage(jo.AsJSon); // 3.14
{ }
ShowMessage(GetEnumName(TypeInfo(TSuperType), Ord(jo.DataType))); // stDouble
jo := SA(['A',1, 'B',2.5, 'C','xyz', 'D',True]);
ShowMessage(jo.AsJSon);
{ }
ShowMessage(GetEnumName(TypeInfo(TSuperType), Ord(jo.DataType))); // stArray
end;
//SA
procedure TForm1.Button2Click(Sender: TObject);
var
jo,ja: ISuperObject;
begin
ja := SA(['x','y','z']);
jo := SO('{A:1, B:2}');
jo['B'] := ja;
ShowMessage(jo.AsJSon); // {"B":["x","y","z"],"A":1}
end;
end.
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
다양한 언어의 JSONJSON은 Javascript 표기법을 사용하여 데이터 구조를 레이아웃하는 데이터 형식입니다. 그러나 Javascript가 코드에서 이러한 구조를 나타낼 수 있는 유일한 언어는 아닙니다. 저는 일반적으로 '객체'{}...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.