안녕하세요 !!
의도 = 레코드 포인터를 SQL문으로 원하는 곳으로 움직이기.
데이타셋은 :=Qcustomer;
데이타소스
데이타콘트롤 :=DBgrid1;
이렇게 데이타가 연결되어있구요 여기에 연결된
테이블명이 customer.DB 입니다....
with DMEZtec.Qcustomer do begin
close;
SQL.Clear;
SQL.Add('select * from customer');
SQL.Add('where Hno =:param_Hno');
ParamByName('param_Hno').AsInteger:=WideHnum;
open;
end;
위 처럼 SQL문으로 했는데 이렇게 하면 여러 데이타가 있는데
위 처럼 파라미터에 대입된 값과 같은 값만 불러지지요
그래서 SQL문으로 모든 데이타가 불러지면서 레코드 포인터를
원 하는 곳에 같다 놓고 싶은데 ...잘 안되네요!!
그럼 주말에 푹 쉬어 몸과 마음을 충전하시길!!
with DMEZtec.Qcustomer do begin
close;
SQL.Clear;
SQL.Add('select * from customer');
open;
end;
불러온 해당 쿼리에서 원하는 위치로 포인트를 옮길때는
DMEZtec.Filter := 'Hno = ' + #39 + IntToStr(WideHnum) + #39;
DMEZtec.FindFirst;
이렇게 하면 원하는 위치에 레코드 포인트를 이동합니다.