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

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

2017.09.14 21:33

가나당 조회 수:186

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

 

개발 버전 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 17220
공지 유용한 관련 사이트 관리자2 2014.03.20 56092
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99536
1919 Android 에서 TMemo에 여러개의 줄이 입력되지 않습니다 [5] 지병철 2017.10.26 300
1918 [현대화 세미나] 윈도우, 우분투, 안드로이드, iOS, OSX 간 효과적인 마이그레이션 방법이 궁금합니다. 험프리 2020.01.31 300
1917 firedac 질문입니다 [4] file 희망나라 2021.03.29 300
1916 Delphi 10.1 Berlin Update2설치후 FireDac으로 MySQL 접속시 오류 [3] 범이 2016.11.28 301
1915 바코드 리더기로부터 오는 값을 입력받지 않게 하는 방법 문의요 [1] from5 2016.01.15 301
1914 InputBox, InputQueryAsync 등등 입력창 폰트색상 문의드립니다. [1] file 돌팅 2018.02.22 302
1913 델파이 안드로이드 API 26에 관한 질문입니다. [3] 시리온느 2018.08.30 302
1912 안녕하세요 datasnap 연결에 대해 질문드립니다. [1] vast 2018.09.05 302
1911 윈도우함수 관련 문의드립니다. [2] 이룸넷류 2017.03.24 302
1910 [XE8 출시세미나] ImageList가 어떤부분이 강화됐나요? [1] Humphery 2015.04.30 302
1909 Delphi 10.4.1 Sydney - 위치변경후..주소변환 오류문의 [1] silkroad99 2020.12.04 302
1908 안드로이드에서 IndyFTP Put할 때 EIdReadTimeout 에러 [2] Vincent 2017.10.31 303
1907 uses절에 포함된 유닛의 타입을 가져다 쓰려면 어떻게 해야 하나요? [3] 한태수 2019.09.16 303
1906 ios 한글이 깨집니다. (같은 환경에서 안드로이드는 잘 됩니다) file 어려워 2016.07.14 304
1905 FMX에서 이미지위에 이미지 삽입하는 방법. [1] Vincent 2017.10.11 304
1904 IdHTTP를 통한 데이터 추출 방법 문의 초보델파잉 2020.06.08 304
1903 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 8 - Exercise 4 관리자 2016.05.02 305
1902 [VIP세미나] 앱테더링이 VPN 환경에서 사용할 수 있나요? 험프리 2016.11.10 305
1901 백업을 해놔야하는 확장자들 [3] 100jk 2019.09.09 305
1900 XE8 프로젝트 오픈후 일정한 폼이안열리는이유? silkroad99 2015.04.23 305
쓰기
태그