AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Listview -> Papier

Ein Thema von Jan · begonnen am 20. Sep 2003 · letzter Beitrag vom 3. Okt 2003
Antwort Antwort
Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#1

Listview -> Papier

  Alt 20. Sep 2003, 17:27
Hallo Dpler,
mein Problem stellt sich wie folgend dar:

In meiner Anwendung befindet sich ein Tlistview in der Tabellenansicht, quasi wie eine Excel-Tabelle.
Die, sich in den Zellen befindlichen, Daten sind allerdings öfter mal breiter als die Zelle selber und werden so dann automatisch vom Tlistview "beschnitten". Der Benutzer kann nun auswählen welche Spalten er dargestellt haben will und wie breit diese sein sollen. Dabei kann er natürlich auch bewusst Zellen beschneiden, wenn der Text darin zu lang ist.
Jetzt möchte ich eine solche fertig bemessene Liste eines Tlistviews drucken, wobei sich dann das Problem stellt, dass die Breitenmaße zwischen dem Tlistview und dem Printercanvas variieren. Wo beim Tlistview eine 30 bereits reichte um eine Zelle komplett darzustellen brauche ich jetzt auf dem Printercanvas so ca 500.
Weiß jemand wie ich das genau umsetzen kann? so dass in den Zellen auf dem Papier genau das zu sehen ist, was auch in den Zellen des Tlistview zu sehen ist?
Wenn ich einfach per textout() Text schreibe wird ja nicht berücksichtigt, dass der Text vielleicht breiter ist als die Zelle es vorsieht, deswegen brauche ich drawtext() allerdings hab ich da das verflixte Problem mit den Größenmaßen.
Alles in allem brauche ich einfach eine vernünftige Lösung für das drucken eines Tlistviews, so wie er in der Anwendung zu sehen ist.
Für alle Antworten wäre ich unvorstellbar dankbar, weil so langsam hasse ich drucken.
Gruß
Jan
Jan
Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
  Mit Zitat antworten Zitat
Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: Listview -> Papier

  Alt 21. Sep 2003, 13:10
*Schieb*
Jan
Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
  Mit Zitat antworten Zitat
Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: Listview -> Papier

  Alt 3. Okt 2003, 18:43
MWHAHAHA!!
Also nach ewigem rumgeprogge hab ich dann mal was gecoded was einen beliebigen Listview mit dem namen Listview1 auf form1 ausdruckt. Einfach meine Unit einbinden und die Klasse in der eigenen Unit erstellen.
Der Befehl um das Drucken zu starten lautet:

deinvarname.printlistview(); Sieht zwar alles nicht so ultraschick aus, aber klappt hoffentlich.
Anbei die Unit.
Vielleicht code ich ja noch, dass man jede beliebigen Listview drucken kann, unabhängig von name und Form.

Für Tests und Comments wär ich sehr dankbar.

Soll ich die Unit vielleicht unter Freeware posten?

Gruß
Jan
Angehängte Dateien
Dateityp: pas drucken.pas (6,8 KB, 34x aufgerufen)
Jan
Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:20 Uhr.
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