線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1295
推到 Plurk!
推到 Facebook!

在資料庫設置Bookmarks 程式,可否解釋一下功能?

答題得分者是:hagar
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-12-04 22:05:47 IP:61.225.xxx.xxx 未訂閱
在資料庫設置Bookmarks 程式,可否解釋一下功能? <第一次看到這種程式,不知道有何功用?> Setting Bookmarks in a database: var Bookmark : TBookmark; procedure TForm1.FormCreate(Sender: TObject); begin Bookmark := nil; end; procedure TForm1.SpeedButton1Click(Sender: TObject); begin if BookMark <> nil then Table1.GotoBookMark(BookMark); Table1.FreeBookMark(BookMark); Bookmark := nil; end; procedure TForm1.SpeedButton2Click(Sender: TObject); begin if Bookmark = nil then BookMark := Table1.GetBookMark; end; Use a DBGrid with this and it looks great.
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-12-04 22:28:27 IP:202.39.xxx.xxx 未訂閱
TTable.GetBookmark; // 記錄 TTable 現在的 Cursor 在哪個位置 TTable.GotoBookmark(Bookmark); // 將 TTable 的 Cursor 移到 Bookmark 這個位置 TTable.FreeBookmark(Bookmark); // 將 TTable 的 Bookmark 這個位置 Free 掉    -- Everything I say is a lie.
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-12-04 22:57:17 IP:61.225.xxx.xxx 未訂閱
謝謝 hagar 破百弟兄 的指教!Q~~
系統時間:2024-05-19 23:02:26
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!