다음과 같이 만들었습니다.
========================================================
컴포넌트 속성 속성값
Table1 DatabaseName DBDEMOS
TableName master.dbf
Active True
DataSource1 DataSet Table1
DBGrid1 DataSource DataSource1
BitBtn 4개
==========================================================
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Table1.FindFirst;
end;
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Table1.FindPrior;
end;
procedure TForm1.BitBtn3Click(Sender: TObject);
begin
Table1.FindNext;
end;
procedure TForm1.BitBtn4Click(Sender: TObject);
begin
Table1.FindLast;
end;
=======================================================
문제는 버튼을 위와 같이 하였으나 그대로 실행이 안되고 커서가 가만히 있습니다. 어떤 점이 문제인지요......
그렇다면 Button Event의
FindFist/FindPrior.... 여기서 Find는 빼고 사용 하셔야 할것 같군요
Table1.First.... 이런식으로요... 그럼... ^^;