자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Delphi TJsonSerializer.Serializer 버그? 오류? 같은 경험이 있으신분 계실가요?

2017.09.14 21:33

가나당 조회 수:310

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 바쁜 와중에도 답변을 주시는 분들께 감사 댓글 필수
-----------------------------------------------------------------------------------------------

 

개발 버전 Delphi 10.2 Version 25.0.26309.314

 

테스트 소스

 

type

  TPerson = class

  private

    FName: string;

  public

    property Name: string read FName write FName;

  end;

 

type

  [JsonSerialize(TJsonMemberSerialization.&In)]

  TPersonList = class(TObjectList<TPerson>)

  public

    [JsonIn]

    property List;

  end;

 

 

procedure TForm2.Button7Click(Sender: TObject);

var

  Users: TPersonList;

  Serializer: TJsonSerializer;

begin

  Serializer := TJsonSerializer.Create;

  try

    Users := TPersonList.Create;

    try

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

      Users.Add(TPerson.Create);

 

      Serializer.Formatting := TJsonFormatting.Indented;

      Memo1.Text := Serializer.Serialize(Users);

    finally

      Users.Free;

    end;

  finally

    Serializer.Free;

  end;

end;

 

결과 

 

{

  "List": [

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    {"FName": ""},

    null,

    null,

    null,

    null,

    null

  ]

}

 

 

결과 와 같이 전체 입력 숫자와 다르게 null 이 잔뜩 붙어 나오는데 혹시 다른분들도 이런거 보신적 있으실까요?

 

해결 하실분 계시면 꽁수좀 ^^;; 알려주세요~~ 헬프~~~ ^^

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 33437
공지 유용한 관련 사이트 관리자2 2014.03.20 72992
1932 델파이 XE7에서 안드로이드로 실행시.apk raised exception class segmentation fault (11). 오류 (미해결중입니다) [6] delphi 2017.09.28 1328
1931 윈도우10에서 콤보박스 한글처리시 문제...? [3] 헨씀히포 2016.06.30 4438
1930 REST Application 작성시 세션 유지.. [2] file 가나당 2017.09.21 353
1929 StringGrid 초기화 방법에 대해서 궁금합니다. [2] Vincent 2017.09.27 961
1928 restrequest, restclient를 이용한 fcm notification 보내기 [1] 슈퍼맨 2017.09.28 689
1927 델파이 6 소스 컴파일 및 빌드 오류 건 문의드립니다. [1] 다니엘 2017.09.14 905
1926 안녕하세요 컨트롤들을 일정하게 정렬시키려고 하는데요. [2] file Vincent 2017.09.25 1197
1925 Delphi 7 에서 .NET DLL 참조 관련 [1] Joon 2017.09.25 540
1924 RAD Studio 평가판 기간이 만료되었습니다. [3] file 땅콩맨 2017.09.24 803
1923 XE10.1 FMX로 멀티다바이스에서 UI구현방법 [2] Vincent 2017.09.22 269
1922 Access Violation Error 관련 [1] Joon 2017.09.25 522
1921 안드로이드 MediaPlayer 에서 wav재생 [3] 가을이다 2017.09.23 1987
1920 가상 키보드 크기가 정상적으로 넘어오지 않습니다. [1] file 쿠리 2017.09.25 545
1919 멀티디바이스 기본 MasterDetail 템플릿에서 데이터들은 어디서 가져오나요? [2] Vincent 2017.09.22 283
1918 답변이 없으셔서 다시 문의 합니다.(Rest 컴포넌트 관련) [3] 제트콜 2017.09.15 442
1917 델파이 사용중 문의 드립니다. 씨엠 2017.09.21 343
1916 실행 시 Down Run Away Error..가 발생합니다 [1] sm 2017.09.21 238
1915 반투명 판넬을 만들고 싶습니다. [1] 원우아빠 2017.09.20 861
1914 XE5 IOS 10.3 지원 문의 [1] 성후아빠 2017.09.19 294
» TJsonSerializer.Serializer 버그? 오류? 같은 경험이 있으신분 계실가요? [2] 가나당 2017.09.14 310
쓰기
태그