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

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

2017.09.14 21:33

가나당 조회 수:207

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

 

개발 버전 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 19788
공지 유용한 관련 사이트 관리자2 2014.03.20 58725
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 102304
2559 DELPHI XE6 - JEDI VCL Installation 오류 [2] jcitec 2015.03.31 1082
2558 Delphi XE7에서 "unable to create process." 오류 [3] secret awleeck 2015.03.31 7
2557 델파이에서 마리아DB(MariaDB)와 연결할 수 있나요? [1] Humphery 2015.03.31 1478
2556 크로스 컴파일 관련 문의 드립니다 에러나요~ [1] file 해안건축 2015.04.01 1062
2555 Rad Studio Xe7 개발된 프로젝트 Delphi Xe7 에서 사용할때 문제점 [1] file 희망나라 2015.04.01 442
2554 앱 화면을 가로로 고정시켜서 만들고 싶습니다. [1] 손보라 2015.04.01 571
2553 패스트리포트 관련 문의입니다 봉봉봉봉 2015.04.02 555
2552 아래 ListBox관련 재문의 입니다. file 최민철 2015.04.02 568
2551 델파이에도 C#에 있는 LINQ기능이 있나요? [1] 베스트드레곤 2015.04.02 556
2550 mysql bigint타입을 퀵리포트에서 출력할때 숫자에 ","를 표시하려면 어떻게 해야 되나요? 임우식 2015.04.02 685
2549 푸쉬 이벤트 관련하여 몇가지 문의 드립니다. [1] 뭉게구름 2015.04.03 1144
2548 CameraComponent에 대한 문의입니다. [1] arinh 2015.04.04 458
2547 [앱 호출/iOS]XCODE로 만든앱에서 Delphi XE7으로 만든 앱을 호출하여 실행하는 방법을 알고 싶습니다. [1] Aprilshot 2015.04.06 1000
2546 delphi xe7으로 변경하면 롤리팝 버그가 해결되나요 [2] silkroad99 2015.04.07 635
2545 폼 hiegh는 변경가능하고 width고정으로변경불가로 하고싶음 blocks 2015.04.07 452
2544 Dephi가 C#과 비교해 어떤 장점이 있나요? [1] 베스트드레곤 2015.04.07 5248
2543 DataSnap Http관련 문의 [1] lespaul06 2015.04.07 384
2542 livebinding별표시 쉽읍니다. [1] file wallas 2015.04.07 531
2541 bpl파일을 만들려고 합니다. [3] 이홍석 2015.04.07 2775
2540 Delphi dbExpress로 개발된 응용프로그램을 배포하려면 어떻게 해야 하나요? [1] 베스트드레곤 2015.04.08 467
쓰기
태그