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

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

 

개발 버전 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 20047
공지 유용한 관련 사이트 관리자2 2014.03.20 58957
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 102574
1919 실행 시 Down Run Away Error..가 발생합니다 [1] sm 2017.09.21 117
1918 반투명 판넬을 만들고 싶습니다. [1] 원우아빠 2017.09.20 776
1917 XE5 IOS 10.3 지원 문의 [1] 성후아빠 2017.09.19 192
» TJsonSerializer.Serializer 버그? 오류? 같은 경험이 있으신분 계실가요? [2] 가나당 2017.09.14 220
1915 Login 시 오류 메시지 조치 방법 문의드립니다. [1] 다니엘 2017.09.14 270
1914 지뢰찾기를 만드는중에 질문이 있어서 글올립니다. [1] file 땅콩맨 2017.09.15 214
1913 Dataset not in edit or insert mode 라는 에러.. [2] 이성재 2017.09.16 1240
1912 TWebBrowser 관련문의 [1] 아가머하노 2017.09.17 323
1911 BLE 페어링 [1] Brian 2017.09.14 462
1910 [베를린] 데이터스냅 서버의 핸들(메모리 릭)이 계속 증가하는 것 해결하지 못하고... 만세... [8] file 델사냥 2016.05.26 550
1909 Android Virtual Device 에서 한글 깨지거나 보이지 않는 문제 어떻게 해결하면 되나요? [1] delphi 2017.09.08 134
1908 안드로이드 스튜디오 전화걸기 기능 [1] 서태원 2017.09.06 2305
1907 Deploy화면에서 Remote 연결 안됨 [1] 델파초보 2017.09.08 242
1906 [자답]Delphi XE 10.2.1 버전 설치후 FireDAC Consol 모드에서 MySql 에러발생 [1] file 별땅땅쫑 2017.09.08 264
1905 OpenDialog 네트워크드라이브가 표시되지 않습니다. [10] allright 2016.11.11 3130
1904 [공유] PDF파일로 저장할 수 있는 컴포넌트가 필요합니다. 험프리 2017.09.08 3024
1903 [문의] Cannot Run on an Android Device or Emulator 오류 입니다 [2] file delphi 2017.09.06 236
1902 Datasnap에서 Servercontainer에 timer 컴포넌트 사용 [1] file 파란하늘 2017.09.06 132
1901 [문의] 릴리즈 모드에서 컴파일 시 에러가 발생합니다 [2] file 손보라 2017.08.31 494
1900 Delphi10.2 평가판 안드로이드 7 안되네요,. [3] 캔나영 2017.08.30 211