북마크

type
 private
    
       pBookMark : Pointer; /////pointer 변수 선언

procedure TForm1.Button2Click(Sender: TObject);
begin
    pBookMark:=Table1.GetBookmark; //pointer
end; ////북마크하기

procedure TForm1.Button3Click(Sender: TObject);
begin
  Table1.GoToBookMark(pBookMark);
end; //북마크 한데로 찾아가기