In Delphi row Anzeige??

[DeddyH]

Hallo, Labels müsstest Du dynamisch zur Laufzeit erstellen, außerdem weißt Du ja nicht, ob der Platz auf dem Formular ausreicht, also bräuchtest Du auch noch eine Scrollbox. Ich denke, am Einfachsten geht das mit einer ListBox, einem Memo, einem Richedit usw. Hier mal ein Beispiel mit einer ListBox und einer Query.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox1.Items.BeginUpdate;
  ListBox1.Clear;
  try
    with Query1 do
      begin
        Close;
        SQL.Clear;
        SQL.Add('SELECT Nachricht FROM Tabelle');
        Open;
        First;
        while not EOF do
          begin
            ListBox1.Items.Add(FieldByName('Nachricht').AsString);
            Next;
          end;
      end;
  finally
    ListBox1.Items.EndUpdate;
  end;
end;