Ik heb op moment twee printers een HP P1005 en een Samsung CLP-320 printer die ik beiden wil gebruiken voor een programma.
Onderstaand routine print de tekst van een tekstbox( txtUitvoer) uit. Werkt prima op de HP P1005 maar niet op de Samsung. Wanneer ik een intern font kies van de Samsung bv Courier SWC werkt het wel maar niet courier new. Ik heb nog geprobeerd met UPD2 printer driver van Samsung maar dat geeft het zelfde resultaat. Ik heb ook een testje gedaan met een nieuw ttf font gedownload en geinstalleerd. HP werkt , Samsung niet.
Heeft iemand ervaring hiermee?
Onderstaand routine print de tekst van een tekstbox( txtUitvoer) uit. Werkt prima op de HP P1005 maar niet op de Samsung. Wanneer ik een intern font kies van de Samsung bv Courier SWC werkt het wel maar niet courier new. Ik heb nog geprobeerd met UPD2 printer driver van Samsung maar dat geeft het zelfde resultaat. Ik heb ook een testje gedaan met een nieuw ttf font gedownload en geinstalleerd. HP werkt , Samsung niet.
Heeft iemand ervaring hiermee?
Visual Basic .NET:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
| Private Sub PrintDocument1_PrintPage(sender As Object, e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage Dim yPos As Single = 0 Dim curLineCount As Integer = 0 Dim line As String = Nothing g_printFont = New Font([b]"Courier New[/b]", 10, FontStyle.Regular) ' Print each line of the file. While curLineCount < g_linesPerPage If (txtUitvoer.Lines.Length - 1) < g_totalLineCount Then line = Nothing Exit While End If line = txtUitvoer.Lines(g_totalLineCount) yPos = g_TopMarge + curLineCount * g_printFontHeight e.Graphics.DrawString(line, g_printFont, Brushes.Black, g_LeftMarge, yPos, New StringFormat()) curLineCount += 1 g_totalLineCount += 1 End While ' If more lines exist, print another page. If (line IsNot Nothing) Then e.HasMorePages = True g_prtPage += 1 Else e.HasMorePages = False End If End Sub |
[ Voor 0% gewijzigd door pwouters op 23-10-2014 11:59 . Reden: advies voor code stuk ]