Pergunta : Delphi edição de TList 2010 e de TBookmark

Olá! todos,

I am que tenta conservar um TBookmarks de um TTable em TList. Mas o problema é quando eu estou tentando se transportar 2 aquelas posições de TBookmark no TTable. Não posiciona corretamente. Isto usado para trabalhar para trás nas versões mais velhas de Delphi mas eu precisa este para Delphi 2010. O projeto do teste é muito simples. Dar forma e duas tabelas mostradas dois no class= " lineNumbers " >

1 do >

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

… EM CRIAR BookmarkList: = TList.Create;

Marcador da alimentação de // a TList. Você pode adicionar o registro aleatório… apenas recorda a ordem.
procedimento TFormTest.ButtonAddBookmarkToListClick (remetente: TObject);
var TempBookmark: TBookmark;
começar
  TempBookmark: = mySQLTable1.GetBookmark;
  BookmarkList.Add (TempBookmark);
extremidade;

// vai aos marcador. ShowMessage está lá apenas para que eu verific se está apontando de volta ao registro direito.
procedimento TFormTest.ButtonGoToBookmarksClick (remetente: TObject);
var Cnt: Inteiro;
começar
  para Cnt: = 0 a BookmarkList.Count -1 começam
    mySQLTable1.GotoBookmark (TBookMark (BookmarkList.Items [Cnt]));
    ShowMessage (mySQLTable1.FieldByName (“cliente ").AsString);
  extremidade;
extremidade;
class= >
 " desobstruído " de 

  
  class= do 

Resposta : Delphi edição de TList 2010 e de TBookmark

Olá! todos!

Paul Hughes já resolveu essa edição em EDN. Obrigado para a ajuda. Está aqui a ligação.
https://forums.embarcadero.com/message.jspa?messageID=254288

Considerações amáveis