Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[14938] advstringrid에서 저장시 오류
김상우 [theif1004] 1932 읽음    2014-01-16 14:11
    with orqry1 do
    begin
        Close;
        SQL.Clear;
        SQL.Add('INSERT INTO TB_INSA_COM ('
               +'PERSON_NO ,              '
               +'COM_NAME ,               '
               +'DAY ,                    '
               +'GRADE ,                  '
               +'DEF                      '
               +')                        '
               +'VALUES                   '
               +'(                        '
               +':PERSON_NO ,             '
               +':COM_NAME ,              '
               +':DAY ,                   '
               +':GRADE ,                 '
               +':DEF)                    ');

      for i := 1 to advstrngrd1.ColCount -1 do
      begin
        for j := 1 to advstrngrd1.RowCount -1 do
        begin

          ParamByName('PERSON_NO').AsString := advstrngrd1.Cells[i,j];
          ParamByName('COM_NAME').AsString := advstrngrd1.Cells[i,j];
          ParamByName('DAY').AsString := advstrngrd1.Cells[i,j];
          ParamByName('GRADE').AsString := advstrngrd1.Cells[i,j];
          ParamByName('DEF').AsString := advstrngrd1.Cells[i,j];

          ExecSQL;
        end;
      end;
    end;

저장버튼을 누르면 EInternalError가 뜨네요...
초보라 어디서 문제인지 잘 모르겠네요..

+ -

관련 글 리스트
14938 advstringrid에서 저장시 오류 김상우 1932 2014/01/16
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.