Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Serienbrief erstellen -> Empfänger aus DB auslesen und Druck (https://www.delphipraxis.net/26561-serienbrief-erstellen-empfaenger-aus-db-auslesen-und-druck.html)

Die Muhkuh 25. Jul 2004 14:49


Serienbrief erstellen -> Empfänger aus DB auslesen und Dr
 
Hi,


ich weiß, pro Frage einen Thread, aber irgendwie hängt alles miteinander zusammen.

Also, ich hab vor einen Serienbrief zu erstellen. Die Empfänger stehen in einer Datenbank. Nun muss ich einen Empänger auslesen drucken, nächsten Empfänger auslesen, drucken und so weiter,...

Wie lässt sich das am besten reallisieren?

SirThornberry 25. Jul 2004 14:59

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
erstmal eine procedure schreiben der du den empfänger übergibst und die procedure druckt dann. Und das einfach mit einer Datenbankabfrage kombinieren welche diese funktion zig mal aufruft

Die Muhkuh 25. Jul 2004 15:00

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
Hi,

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

Hansa 25. Jul 2004 17:53

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
1. Erstelle eine Textdatei mit den gewünschten Empfängern (aus DB) 2. Lege ein Hauptdokument mit Platzhaltern für die Daten an. 3. Führe die Daten zusammen mit dem Dokument.

Sharky 25. Jul 2004 17:58

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
Zitat:

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.

Die Muhkuh 25. Jul 2004 17:58

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
Hi Hansa,


keine schlechte Idee. Werde ich mal ausprobieren

Die Muhkuh 25. Jul 2004 18:01

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
Zitat:

Zitat von Sharky
Zitat:

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

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

Oh gott, von allem keine Ahnung. Werd dann mal auf die Suche gehen

CenBells 25. Jul 2004 18:03

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
würde dir Fastreport empfehlen.
www.fast-report.com empfehlen. Super schnell und absolut genial.

Gruß
Ken

Die Muhkuh 25. Jul 2004 18:10

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
Sieht gut. Nur welches muss ich downloaden? FastReport 3?

Hmm, des is ja nur ne Trial... :(

Hansa 25. Jul 2004 18:16

Re: Serienbrief erstellen -> Empfänger aus DB auslesen un
 
Wenn es um Serienbriefe geht, wie Spider sagt, dann hat das nichts mit Fastreport zu tun. Die Adress-Daten müssen aus der DB heraus nur dem Textprogramm zur Verfügung stehen. In diesem kann man nun die Vorlage erstellen, mit allem Schnickschnack was Word & Co so bieten.

Die Platzhalter müssen nun definiert werden und fertig. Wie die konkrete Datenquelle erstellt wird : siehe Sharkys Beitrag. Als Datenquelle dient dann diese Datei. Und das Hauptdokument wird mit Word erstellt.


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:01 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz