다음과 같이 IBQuery를 이용하여 검색을 하였습니다.
with DBModule.QTran do begin
Close;
SQL.Clear;
SQL.Add('Select count(T_Sang) as CNT, T_Sang from Tran_Input');
SQL.Add('Where T_Type="' + ComboType.Text + '" ');
SQL.Add('Group by T_Sang');
Open;
ShowMessage(FindField('CNT').AsString);
ShowMessage(IntToStr(FieldByName('CNT').AsInteger));
end;
또는
with DBModule.QTran do begin
Close;
SQL.Clear;
SQL.Add('Select T_Sang from Tran_Input');
SQL.Add('Where T_Type="' + ComboType.Text + '" ');
Open;
ShowMessage(IntToStr(RecordCount));
end;
결과값은 모두 1만 나옵니다.
데이타는 조건에 만족하는 데이타는 10여개 들어 있는데 말이죠.
이제 인터베이스를 시작하는데 벌써부터...ㅡ.ㅡ
이유가 뭔지 제가 잘못하고 있는 부분이 뭔지 조언을 부탁드립니다.
> 다음과 같이 IBQuery를 이용하여 검색을 하였습니다.
> with DBModule.QTran do begin
> Close;
> SQL.Clear;
> SQL.Add('Select count(T_Sang) as CNT, T_Sang from Tran_Input');
> SQL.Add('Where T_Type="' + ComboType.Text + '" ');
> SQL.Add('Group by T_Sang');
> Open;
> ShowMessage(FindField('CNT').AsString);
> ShowMessage(IntToStr(FieldByName('CNT').AsInteger));
> end;
>
> 또는
>
> with DBModule.QTran do begin
> Close;
> SQL.Clear;
> SQL.Add('Select T_Sang from Tran_Input');
> SQL.Add('Where T_Type="' + ComboType.Text + '" ');
> Open;
> ShowMessage(IntToStr(RecordCount));
> end;
>
> 결과값은 모두 1만 나옵니다.
> 데이타는 조건에 만족하는 데이타는 10여개 들어 있는데 말이죠.
> 이제 인터베이스를 시작하는데 벌써부터...ㅡ.ㅡ
>
> 이유가 뭔지 제가 잘못하고 있는 부분이 뭔지 조언을 부탁드립니다.
제가 알기로는 Open한 이후에 FetchAll; 을 실행시키면 조건에 만족하는 모든
레코드를 갖고 올거예여..아마도..^^;;