Cuestión : Delphi edición de TList 2010 y de TBookmark

Hola cada uno,

I que intenta ahorrar un TBookmarks de un TTable en TList. Pero el problema es cuando estoy intentando trasladarme a esas posiciones de TBookmark en el TTable. No coloca correctamente. Esto usado para trabajar detrás en las más viejas versiones de Delphi pero yo necesita esto para Delphi 2010. El proyecto de la prueba es muy simple. Formar y dos tablas demostradas en dos el class= " lineNumbers " >

1 del >

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 " del id= " codeSnippet792540 " del >
var BookmarkList: TList;

… EN CREAR BookmarkList: = TList.Create;

Señales de la alimentación de // a TList. Usted puede agregar el expediente al azar… apenas recuerda la orden.
procedimiento TFormTest.ButtonAddBookmarkToListClick (remitente: TObject);
var TempBookmark: TBookmark;
comenzar
  TempBookmark: = mySQLTable1.GetBookmark;
  BookmarkList.Add (TempBookmark);
extremo;

// va a las señales. ShowMessage está allí apenas para que compruebe si está señalando de nuevo al expediente correcto.
procedimiento TFormTest.ButtonGoToBookmarksClick (remitente: TObject);
var Cnt: Número entero;
comenzar
  para Cnt: = 0 a BookmarkList.Count -1 comienza
    mySQLTable1.GotoBookmark (TBookMark (BookmarkList.Items [Cnt]));
    ShowMessage (mySQLTable1.FieldByName (“cliente ").AsString);
  extremo;
extremo;
class= >
 " claro " de 

  
  class= del 

Respuesta : Delphi edición de TList 2010 y de TBookmark

¡Hola cada uno!

Paul Hughes solucionó ya esa edición en EDN. Gracias por ayuda. Aquí está el acoplamiento.
https://forums.embarcadero.com/message.jspa?messageID=254288

Atentamente