TDBGrid auch ohne Report aus drucken?

[BrunoT]

Hi Heike,

noch mal laaangsaaam:

1. Du hast ´ne Form1 mit DbGrid, und die Daten sind zu sehen? Ja, gut
2. Für mein Beispiel: Options RowSelect=True, MuliSelect = True
3. Unter

Delphi-Quellcode:

IMPLEMENTATION
uses UDruck;

4. Button mit

Delphi-Quellcode:

  if Printdialog1.Execute then
  begin
      printText('Ausdruck DBGRID');
  end;

5.In der Unit Udruck muß vor der Verwendung von DBGrid(nicht DBGrit) with Form1 do

Delphi-Quellcode:

with Form1 do  //noch einzusetzen
with DBGrid1.DataSource.DataSet do  //steht schon da
for i:=0 to DBGrid1.DataSource.DataSet.RecordCount-1 do  //steht schon da

stehen

6.automatisch wird dann Unit1
uses Printers, Dialogs, Sysutils, Graphics, Windows, Unit1; eingefügt
ich habe das mal als Beispielprojekt zusammengestellt.

Ich hoffe, das hilft