델파이용 JSON 라이브러리입니다.
2007년 6월 25일 현재 1.01버젼이 릴리즈 되어있는 상태입니다.
아래는 해당 라이브러리를 이용한 사용 샘플예제입니다.
var
js:TlkJSONobject;
ws: TlkJSONstring;
s: String;
i: Integer;
begin
js := TlkJSONobject.Create;
js.Add('namestring','namevalue');
s := TlkJSON.GenerateText(js);
writeln(s);
js.Free;
js := TlkJSON.ParseText(s) as TlkJSONobject;
ws := js.Field['namestring'] as TlkJSONstring;
s := ws.Value;
writeln(s);
s := js.getString('namestring');
writeln(s);
readln;
end;
js:TlkJSONobject;
ws: TlkJSONstring;
s: String;
i: Integer;
begin
js := TlkJSONobject.Create;
js.Add('namestring','namevalue');
s := TlkJSON.GenerateText(js);
writeln(s);
js.Free;
js := TlkJSON.ParseText(s) as TlkJSONobject;
ws := js.Field['namestring'] as TlkJSONstring;
s := ws.Value;
writeln(s);
s := js.getString('namestring');
writeln(s);
readln;
end;