허접 델피언이 또 이렇게 질문을 올리게 되었습니다.
전 언제나 답변 글을 작성하게 될지....
제가 지금 레포트를 작성하면서 첨 델파이를 사용하는데 점점 델파이의
매력에 매료 되는것 같습니다. 근데 넘 어려워서리...ㅡ.ㅡ;
지금 막히는 부분이 배열에 담은 값을 메세지박스에서 뿌려주려고 하는데
어디가 잘못 되었는지 잘 모르겠습니다. 에러도 안나고...
데이터를 쿼리 못 하는것인지... 아님 메세지를
못 뿌리는것인지...선배님들의 조언 부탁드리겠습니다.

=====================스크립트=======================
//T_REPORT DB데이터 쿼리
    Query1.Active := True;
    Query1.Close;
    Query1.SQL.Clear;
    Query1.SQL.Add('SELECT * FROM T_REPORT');

    try
        Query1.Open;
    except
        Showmessage('데이터베이스 장애!');
        Query1.Close;
        Exit;
    end;

    //쿼리한 데이터 저장
    with DataSource1 do
    begin
        cnt := cnt + 1 ;
        i_sabun[cnt]    := DataSet.Fields[0].AsString;
        i_buseo[cnt]    := DataSet.Fields[1].AsString;
        i_email[cnt]    := DataSet.Fields[2].AsString;
        i_hobong[cnt]   := DataSet.Fields[3].AsFloat;
        i_bonbong[cnt]  := DataSet.Fields[4].AsFloat;
        i_maechul[cnt]  := DataSet.Fields[5].AsFloat;

    Application.MessageBox(
        PChar('입력정보'+ #13#10 +
        '사원번호 : '   + i_sabun[cnt]  + #13#10 +
        '부서코드 : '   + i_buseo[cnt]  + #13#10 +
        'E-Mail :   '   + i_email[cnt]  + #13#10 +
        '호봉 :     '   + FloatToStr(i_hobong[cnt]) + #13#10 +
        '본봉 :     '   + FloatToStr(i_bonbong[cnt])+ #13#10 +
        '월매출액 : '   + FloatToStr(i_maechul[cnt])+ #13#10 ),
        PChar('확인'),
        MB_OKCANCEL + MB_DEFBUTTON1);
    end;
    Query1.Close;