Tbrowse drucken?[erledigt]

Von Ausgaben mit der Gra-Engine über Generatoren bis zum Export in diversen Formaten

Moderator: Moderatoren

Antworten
Benutzeravatar
messing
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 216
Registriert: Mi, 13. Jan 2010 9:42
Wohnort: Lauterbach / Hessen

Tbrowse drucken?[erledigt]

Beitrag von messing »

Ist es möglich ein Tbrowse Objekt zu drucken?
Wenn ja, könnte ich ne Hilfestellung gebrauchen.

Danke
Gruß
Messing
[erledigt]
Zuletzt geändert von messing am Mi, 11. Apr 2012 11:33, insgesamt 2-mal geändert.
Gruß
Bruno
Messing
Benutzeravatar
Tom
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 9345
Registriert: Do, 22. Sep 2005 23:11
Wohnort: Berlin
Hat sich bedankt: 100 Mal
Danksagung erhalten: 359 Mal
Kontaktdaten:

Re: Tbrowse drucken?

Beitrag von Tom »

Hallo, Messing.

Was genau willst Du drucken? Den Inhalt der Datenquelle oder das Objekt (bzw. dessen Properties usw.)? Für letzteres liefert die Methode :ClassDescribe ein Array, das man vortrefflich auswerten und untersuchen kann. Ersteres ist weitgehend unabhängig vom TBrowse, da die Daten ja von Dir stammen.
Herzlich,
Tom
Benutzeravatar
Armin
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 389
Registriert: Mo, 26. Sep 2005 12:09
Wohnort: 75331 Engelsbrand
Danksagung erhalten: 3 Mal
Kontaktdaten:

Re: Tbrowse drucken?

Beitrag von Armin »

Hallo Messing,

ich benutze TBPrint.prg - kann man irgendwo laden - vielleicht bei Alaska...

Gruß, Armin

Code: Alles auswählen

*:************************************************************
*:
*:  Source File: tbprint.prg
*:
*:       System: TBPrint - print TBrowse
*:       Author: David Barrett, expanding on code by Pat Tormey.
*:   Placed in the public domain.
*:
*:  Comments : Routines for TBPrint - print current TBrowse
*:
*:  Procs & Funcs: TBPrint()
*:               : PrintColumnHead()
*:               : getColumnHead()
*:               : GetColumnLen()
*:               : HeadLen()
*:               : X2Char()
*:
*: Documented 06/30/92 at 12:23:02 DOC Vers 2.10, Source Code Documenter
*:************************************************************
/*
   TBPrint will print the current tBrowse extracting all the information
   it needs from the tbrowse object.  Optionally, if passed the number of
   lines per page, it will insert page breaks in the printed output.  It
   assumes that a database is in use and selected.  It also assumes that
   SET PRINTER TO has been used to set the printer to the device or print
   file which is to receive the printed output if the output is not to
   go to LST.

   These routines are expanded from and includes parts of code posted by
   Pat Tormey in BCSTBPN.PRG and include ideas by Les Squires and others
   in a thread on Nanforum about printing a tBrowse.  This routine
   determines the column width by using TBColumn:width if it has been set,
   otherwise is uses the widest of the either the footing, heading or the
   data return from the first eval of TBColumn:block.  Determining the
   width of the heading and footing takes into account any embedded semi-
   colons.

*/
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15689
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: Tbrowse drucken?

Beitrag von brandelh »

Hi,

falls es dir um eine Hardcopy des Bildschirmes geht, kann ich dieses SUPER Programm empfehlen:

http://www.info.hardcopy.de/

das habe ich mir sogar gekauft, obwohl ich bisher mit der DRUCK-Taste -> Zwischenablage -> PAINT nicht
unglücklich war, HARDCOPY IST eine deutliche Arbeitserleichterung 8)

Falls du wirklich den Inhalt des TBrowse drucken willst, du hast doch die Infos für den Aufbau
selbst im Programm hinterlegt und die Datei ist auch bekannt, also einfach eine Zeile Überschriften,
dann den Rest in eine Schleife drucken.
Gruß
Hubert
Benutzeravatar
Armin
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 389
Registriert: Mo, 26. Sep 2005 12:09
Wohnort: 75331 Engelsbrand
Danksagung erhalten: 3 Mal
Kontaktdaten:

Re: Tbrowse drucken?

Beitrag von Armin »

Hallo messing,

ich hab´s gefunden (tbprint.prg):

http://www.the-oasis.net/files/library/gt_src.zip

Gruß, Armin
Antworten