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;
> 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;