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

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

델파이 완전 초보자인데 델파이 고수님들의 해결을 고대하고 있습니다.

 

StringGrid에 검색된 결과를 표현하는데,, 검색된 건수는 446개인데,,

StringGrid에는 190개 밖에 표현이 않됨니다. 즉 Rwo수는 건수대로 446개로 나타납니다.

그런데 190개까지는 데이터가 제대로 표시되는데,, 그 이후는 모두 공백입니다.

혹시 StringGrid에서 표현되는 숫자를 지정하는 곳이 있는가 찾아보니 없는것 같아

고수님들에게 질문을 합니다. 좋은 해결책 부탁드립니다.

 

개발환경은 Windows7이고 델파이 버젼은 Embarcadero® Delphi 10.1 Berlin 입니다.

    

개발은 Delphi 교재 258페이지의 Stringgrid의 내용을 참조하여 작성했습니다.

교재에는 오류가 없으니까 데이터가 표현되는데 다른 속성 지정에 문제가 있을까요?

 

작성된 코드는 다음과 같습니다.

  with qryAccountH do

    begin

      Close;

      SQL.Clear;

      SQL.ADD('SELECT *                             ');

      SQL.ADD('FROM    npl_ACCOUNT_H                ');  

      SQL.ADD('WHERE  ACCT_NBR = :acct_nbr          ');

      SQL.ADD('ORDER BY TX_DT,TX_SEQ_NBR            ');

      ParamByName('acct_nbr').AsString := edAccntNbr.Text ;

      Open;

    end;

 

  qryAccountH.Last;    //최종 데이터까지 가져오기 위한 처리

  edTotCnt.text := IntToStr(qryAccountH.RecordCount);

 

  for I := 1 to qryAccountH.RecordCount do   //초기화 처리

    begin

      StrAccountH.Cells[0,i] := '';

      StrAccountH.Cells[1,i] := '';

      StrAccountH.Cells[2,i] := '';

      StrAccountH.Cells[3,i] := '';

      StrAccountH.Cells[4,i] := '';

      StrAccountH.Cells[5,i] := '';

      StrAccountH.Cells[6,i] := '';

      StrAccountH.Cells[7,i] := '';

      StrAccountH.Cells[8,i] := '';

   end;

 

   StrAccountH.RowCount := qryAccountH.RecordCount + 1; 

   qryAccountH.First;   //위치를 제일 처음으로 가서

 

  for I := 1 to qryAccountH.RecordCount do

   WITH StrAccountH do

     begin

        Cells[0,i] := IntToStr(i);

        Cells[1,i] := Copy(qryAccountH.FieldByName('TX_DT').AsString,1,4);

        Cells[2,i] := Copy(qryAccountH.FieldByName('RCKNG_DT').AsString,1,4);

        Cells[3,i] := qryAccountH.FieldByName('TX_SEQ_NBR').AsString;     //순번

        Cells[4,i] := qryAccountH.FieldByName('tx_tp_g').AsString;          //거래구분

        Cells[5,i] := qryAccountH.FieldByName('amt_tpcd_des').AsString;   //계정과목명

        Cells[6,i] := qryAccountH.FieldByName('amt_tp_cdNm').AsString;    //금액유형

        Cells[7,i] := FormatFloat('0,',StrToInt(qryAccountH.FieldByName('Tx_Amt').AsString));    //처리 금액

        Cells[8,i] := qryAccountH.FieldByName('tpcd_des').AsString;    //적요

 

       qryAccountH.Next;

     end;

 
 

 

 

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 15765
공지 유용한 관련 사이트 관리자2 2014.03.20 54580
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 97983
1673 바코드스캔이 넘느려서 질문드립니다 [1] 화현 2019.11.23 393
1672 REST API 컴포넌트 설치와 클라이언트 개발 문의드립니다 [1] 가나다 2019.11.22 320
1671 데이터스냅 한글 인코딩 질문입니다. [1] file devdev 2019.11.21 134
1670 개발자 기술자료 중 Firebase 안드로이드 앱 푸쉬 알림 - 10.3.2에서 FCM 전송 설정 - 실행시 오류 발생 [5] file 비앤케이 2019.10.19 367
1669 Fast Report 관련 문의 [1] 쿤이 2019.11.22 1076
1668 안드로이드 ForeGround Service 사용법 [1] PinkNight 2019.01.28 1152
1667 게시글 수정 부탁드립니다. [1] vane 2019.11.19 246
1666 델파이 7 사용자입니다. 델파이 XE2에서 더 좋아진 점이 무엇이고, 업그레이드가 꼭 필요한지 알고 싶습니다. [2] file 관리자 2012.07.12 11506
1665 델파이7에서 use unit에 대해서...? [2] 헨씀히포 2019.11.17 215
1664 Android 앱 배포관련 문의사항입니다 ( 64bit ) [3] 궁금한사람 2019.11.12 184
1663 데이터셋 기반 REST API 개발 중 오류에 관해 질문있습니다. [3] file 유정 2019.11.08 189
1662 2개의 package에 같은 컴퍼넌트를 뒀더니 에러가 발생합니다. 너무 답답하네요 [1] file 맛재현 2019.11.12 134
1661 델파이 XE7 폼이동 관련 질문입니다. 우우우와와 2019.11.12 124
1660 위도 경도 지역 읽어 오는 거에서요. [2] 종결자 2019.11.05 236
1659 Delphi XE버전 호환성관련 공식문서 [1] 차니아빠 2019.11.06 277
1658 FDQuery FetchOptions 문의드립니다. 딤몽 2019.11.06 136
1657 IOS 앱 환경설정관련 문의사항입니다 ( 파일 저장 ) [2] 궁금한사람 2019.11.04 367
1656 MDB 테이블 생성 관련 기초 질문입니다. [4] 초보델팡이 2019.10.30 263
1655 TValue에서 Tbytes의 데이터를 어떻게 뽑아낼수 있는지 문의 드립니다. [4] 한태수 2019.10.24 362
1654 또 질문입니다. 혹시 지역관련해서 [4] 종결자 2019.10.28 154