在ListView RAD Studio Delphi 10.2中添加项目

Question

我希望显示一个包含TListView的列表，该列表使用我的数据库中的数据生成。 但我的代码只显示列表中的一个项目。

它看起来像一个简短的列表，其中包含Adress，Name1，Name1等文字，就像这张图片一样：

图片视图的代码：

procedure TForm2.RefreshButton1Click(Sender: TObject); 
var
 queryListClient : TFDQuery;
 ItemAdd : TListViewItem;
begin
  queryListClient := TFDQuery.Create(Nil);
  queryListClient.Connection := FDConnection1;

  queryListClient.SQL.Clear;
  queryListClient.SQL.Add('Select * from Projekt ORDER by ProjNr');
  queryListClient.Open();
  queryListClient.First;

  List_Clients1.Items.Clear;
  List_Clients1.BeginUpdate;
  while Not queryListClient.Eof do
  begin
    ItemAdd := List_Clients1.Items.Add;
    ItemAdd.Text := queryListClient.FieldByName('Name1').AsString;
    ItemAdd.Detail := queryListClient.FieldByName('Name2').AsString;
    queryListClient.Next;
  end;
  List_Clients1.EndUpdate;
  queryListClient.Close;
  queryListClient.Free;
end;

现在的样子：

Answer 1

您可能没有将listview SYNC属性链接到数据集（LiveBindings Designer）。