Вопрос : Делфи вопрос TList 2010 и TBookmark

Привет всем,

I am пытаясь сохранить TBookmarks от TTable в TList. Но проблема когда я пытаюсь двинуть к тем положениям TBookmark в TTable. Она не располагает правильно. Этому используемое для того чтобы работать назад в более старых вариантах Делфи но я нужно это на Делфи 2010. Проект испытания очень просто. Сформируйте и 2 таблицы показанной в 2 class= " lineNumbers " >

1 >

Kind:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
class= " prettyprint " id= " codeSnippet792540 " >
var BookmarkList: TList;

… НА СОЗДАЙТЕ BookmarkList: = TList.Create;

Bookmarks питания // к TList. Вы можете добавить случайно показатель… как раз вспоминаете заказ.
процедура TFormTest.ButtonAddBookmarkToListClick (прислужник: TObject);
var TempBookmark: TBookmark;
начните
  TempBookmark: = mySQLTable1.GetBookmark;
  BookmarkList.Add (TempBookmark);
конец;

// идет к Bookmarks. ShowMessage там как раз для меня для того чтобы проверить если оно указывает назад к правому показателю.
процедура TFormTest.ButtonGoToBookmarksClick (прислужник: TObject);
var Cnt: Интежер;
начните
  для Cnt: = 0 к BookmarkList.Count -1 начинает
    mySQLTable1.GotoBookmark (TBookMark (BookmarkList.Items [Cnt]));
    ShowMessage (mySQLTable1.FieldByName («клиент ").AsString);
  конец;
конец;
class= " ясное " >
 

  
  class= 

Ответ : Делфи вопрос TList 2010 и TBookmark

Привет всем!

Паыль Hughes уже разрешил тот вопрос на EDN. Вы для помощи. Здесь соединение.
https://forums.embarcadero.com/message.jspa?messageID=254288

Сердечные приветы