Q&A

  • TQuery 2개로 마스터/디테일 이렇게 하는게 맞나요?
QryClient가 AfterScroll 이벤트에요

아래처럼 작성했습니다.

그런데, 속도가 엄청 느립니다.

빠르게 할 방법좀..

디테일을 뷰로 만들어서, 뷰를 TTable로 할려고 했는데,

뷰로 변환불가한 거라서요..



procedure TDM.QryClientAfterScroll(DataSet: TDataSet);

begin



with DM.QryCS2 do

begin

close;

SQL.Clear;

SQL.Add('select s2.* from VIEW_S2'+gYear+' s2 '+

'inner join S1'+gYear+' s1 '+

'on (s2.SDATE=s1.SDATE) and (s2.REGINO=s1.REGINO) and (s2.SEQNO=s1.SEQNO) '+

'where s1.CCODE='''+QryClient.fieldbyname('CODE').asstring+'''');

open;

end;

end;

1  COMMENTS
  • Profile
    허춘 2000.11.15 13:47
    won wrote:

    > QryClient가 AfterScroll 이벤트에요

    ---------------------------------------

    Assuming QryClient is your master.

    You'll need datasource, and put your Deatil Query code under

    Master datasource.OnDataChangeEvent.







    > 아래처럼 작성했습니다.

    > 그런데, 속도가 엄청 느립니다.

    > 빠르게 할 방법좀..

    > 디테일을 뷰로 만들어서, 뷰를 TTable로 할려고 했는데,

    > 뷰로 변환불가한 거라서요..

    >

    > procedure TDM.QryClientAfterScroll(DataSet: TDataSet);

    > begin

    >

    > with DM.QryCS2 do

    > begin

    > close;

    > SQL.Clear;

    > SQL.Add('select s2.* from VIEW_S2'+gYear+' s2 '+

    > 'inner join S1'+gYear+' s1 '+

    > 'on (s2.SDATE=s1.SDATE) and (s2.REGINO=s1.REGINO) and (s2.SEQNO=s1.SEQNO) '+

    > 'where s1.CCODE='''+QryClient.fieldbyname('CODE').asstring+'''');

    > open;

    > end;

    > end;