dotNETportal.cz

Ahoj všem,

dělám program, ve kterém uživatel vyplní několik fakturačních údajů a poté by se mu měla vyplněná faktura vytisknout. Bohužel vůbec si nedokážu představit, jak tento tisk realizovat. Neboli nevím, jak mám definovat pozice jednotlivých údajů na papíru formátu A4. Nedokázal by mě prosím někdo nasměrovat?

Předem moc děkuji za odpovědi.

Na tisk faktur určitě najdete spoustu různých programů, pokud to chcete přeci jen udělat sama, nejlepší (a zároveň poměrně jednoduché) by bylo napsat program, který ty údaje doplní do nějakého dokumentu ve Wordu. Tisk pak uděláte přímo z Wordu a výhoda je především ta, že nemusíte faktury vždy tisknout, ale třeba odesílat mailem.

Musíte je teda tisknout přímo v programu kompletně, nebo to může být přes Word? Do fóra se to asi nevejde, ale článek bych o tom napsat mohl.

Děkuji za odpověď. S tím wordem je to trochu problém, jelikož na pc word není a musel by se jedině dokoupit. Nešlo by nějakým způsobem generovat pdfko?

napadla ma este jedna vec. v pripade ak mas na obrazovke to co na fakture, alebo si zobrazis form ktory bude presne ako faktura, je mozne spravit jednoduchu vec: hardcopy obrazovky do bitmapy a tu potom vytlacit. netusim aka bude kvalita, a ci to vobec pojde, nemam tu printer na notasku, ale skus, mozno Ta to inspiruje a len domodifikujes

'' importy na zaciatok
Imports System.Drawing.Printing
Imports System.Drawing.Printing.PrintDocument

''toto do nejakej vhodnej procedury
Dim screenSize As Size = New Size(Me.Width, Me.Height)
''velkost Tvojho formu sa prevezme
Dim screenGrab As New Bitmap(Me.Width, Me.Height)
'' vytvori sa nova bitmapa
Dim myGraphic As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(screenGrab)
myGraphic.CopyFromScreen(New Point(Me.Left, Me.Top), New Point(0, 0), screenSize)
''teraz screenGrab nesie v sebe bitmapu hardocopy formulara
screenGrab.Save("C:\faktura.bmp")
''najjednoduchsie ma napadlo savnut to, aj tak imho faktury vytlacene zalohujete, mozes pridat timestamp do nazvu atd...

Dim PrintDoc As New PrintDocument
PrintDoc.DocumentName = ("C:\faktura.bmp")
PrintDoc.Print()

neviem ci to zacne hned tlacit, ako vravim nemam tu printer ale tvari sa mi to ze tlaci to fronty, ak to vytlaci male alebo posunute, musis nastavit properties PritDocumentu (velkosti, rozmery, mierky a pod, to najdes v helpe)

Moc děkuji za radu, ale s kvalitou je to dost problém :(. Ještě bych mohla zkusit, jak to bude vypadat na jehličkové tiskárně, ale tu si při stávajících cenách nebudu moci dovolit.

Přímý tisk formuláře je asi nesmysl, monitor nemá takové rozlišení jako papír, takže to na papíře bude vypadat dost divně. Ani jehličková tiskárna by to nezlepšila.

Ale připravuji článek o tom generování faktur přes Word, je to totiž velmi zajímavý nápad, dnes večer to snad dokončím a publikuji.

A co takhle si stáhnout PowerPack zde: http://msdn2.microsoft.com/en-us/vbasic/...

který obsahuje objekt printForm, díky kterému byste měla snadno vytisknout obsah celého formuláře na tiskárnu.

Omluvám se, že neuvedu kód, ale sám jsem jen na tuhle věc narazil a nezkoušel ji. Nicméně fungovat by měla.