我如何保持FireDAC书签与名称的列表?

Question

我使用最后的delphi版本，我想有一个像TStringList(在那里我可以保持一个整数TObject链接的字符串列表)，而不是一个整数TObject我需要一个书签列表。

我尝试使用泛型

mySL: TList<TBookmark>;

但是我只保存了没有描述的书签。我希望能够做这样的事情:

var myBookmark1 := TBookmark(mySL('test1'));
var myBookmark2 := TBookmark(mySL('test2'));

你能帮我吗?谢谢你

Answer 1

泛型确实是最简单的解决方案，但是您应该使用TDictionary(键值对的集合)而不是TList(仅值的集合)。这样，您就可以为每个书签关联一个密钥。

var 
mySL: TDictionary<String, TBookmark>;
Bookmark: TBookmark;
begin
...
...
// Create the Dictionary
mySL := TDictionary<String, TBookmark>.Create;
// Store Bookmarks
mySL.Add('Starting Position', MyQuery.GetBookmark);
...
// Retrieve Bookmarks
mySL.TryGetValue('Starting Position', Bookmark);
...
end

TryGetValue方法将返回一个布尔值，告诉你书签是否已经找到(并设置为Bookmark变量)，或者它不存在。