delphi - 如何获取 SQL 查询的结果？

Question

使用 Delphi 2010，我使用 TSQLQuery 和 TSQLConnection 连接到远程 MySQL 服务器。我使用的 SQL 查询如下:

SQLQuery1.SQL.Text := 'SELECT * FROM registered WHERE email="'+email+'" and login_pass="'+password+'"';

SQLQuery1.Open; // Open sql connection

我应该如何列出或显示此查询选择的数据？

当我打字时

SQLQuery1['who']; // The resault is : James Kan

我认为它正在显示列表中的最后一项。但我想显示每个项目，就像使用 PHP 中的 foreach 循环一样。例如，我如何为每个项目创建一个 TLabel？

Answer 1

您只需迭代结果集即可

SQLQuery1.Open;
SQLQuery1.First; // move to the first record
while(not SQLQuery1.EOF)do begin
   // do something with the current record
   ...
   // move to the next record
   SQLQuery1.Next;
end;