Serienbrief erstellen -> Empfänger aus DB auslesen und Druck

[Sharky]

Zitat von Spider:

.... Wie komme ich immer nur an einen Eintrag ran und wie drucke ich das alles aus?

Hai Spider,

möchtest Du jetzt wissen wie Du der Reihe nach alle Ergebnisse deiner Datenbankabfrage durchgehst?

Delphi-Quellcode:

begin
  with query1 do
  begin
    query1.Close;
    query1.SQL.Text := 'SELECT * FROM adressen';
    query1.Open;
    query1.First // Ist nicht notwendig. Wollte dir nur den Befehl zeigen (gehe zum ersten Datensatz)
    While not (query1.Eof) do  // Durchlaufen solange es noch Datensätze gibt.
    begin
      // Drucke den aktuellen Datensatz
      query1.Next;  // Gehe zum nächsten Datensatz
    end;
  end;
end;

zum drucken -> Rave , QuickReport, FastReport oder wie auch immer du gerne drucken möchtest.