![[HaBo]](/styles/default/logoklein.png){kind=small}
Hey Leute, habe die Tage ja eine Reihe Themen gepostet.
Bin nun beim eigentlich letzen Punkt.
Das Drucken Funktioniert, sprich es wird der Inhalt meiner Textbox, Zeile für Zeile, gedruckt.
einziges Problem ist jetzt noch, dass die einzelnen Punkte in der EditBox durch Tabs getrennt werden, auf dem Ausdruck diese aber nicht übernommen und stattdessen Kästchen gedruckt werden.
Das ist meine Druckroutine
Hier wird immer die nächste Zeile aus der EditBox gelesen.
Der restliche Code ist im Anhang.
Außerdem weiß ich nicht wie ich die Schrift, Schriftgröße in der Gedruckt wird ändern kann ?
wäre sehr dankbar wenn mir an dieser Stelle noch jemand helfen könnte. Code im Anhang.
Gruß Jan
Bin nun beim eigentlich letzen Punkt.
Das Drucken Funktioniert, sprich es wird der Inhalt meiner Textbox, Zeile für Zeile, gedruckt.
einziges Problem ist jetzt noch, dass die einzelnen Punkte in der EditBox durch Tabs getrennt werden, auf dem Ausdruck diese aber nicht übernommen und stattdessen Kästchen gedruckt werden.
Code:
if(StartDoc (hdcPrn, &di) > 0)
{
for(iPage = 0; iPage < 3; iPage++)
{
if(StartPage (hdcPrn) >0)
{
//TextOut (hdcPrn, 50,0, szTextStr, lstrlen (szTextStr));
for(iLine = 0; iLine < iLinePerPage; iLine++)
{
iLineNum = iLinePerPage * iPage + iLine;
if(iLineNum > 30)
{
break;
}
*(int *) pstrBuffer = iCharsPerLine;
TextOut(hdcPrn, 0, yChar * iLine, pstrBuffer, (int)SendMessage (g_hEditB1, EM_GETLINE, (WPARAM) iLineNum, (LPARAM) pstrBuffer));
}
RestoreDC (hdcPrn, -1);
if(EndPage (hdcPrn) > 0)
{
EndDoc(hdcPrn);
}
else
{
bSuccess = FALSE;
}
}
}
Code:
TextOut(hdcPrn, 0, yChar * iLine, pstrBuffer, (int)SendMessage (g_hEditB1, EM_GETLINE, (WPARAM) iLineNum, (LPARAM) pstrBuffer));Der restliche Code ist im Anhang.
Außerdem weiß ich nicht wie ich die Schrift, Schriftgröße in der Gedruckt wird ändern kann ?
wäre sehr dankbar wenn mir an dieser Stelle noch jemand helfen könnte. Code im Anhang.
Gruß Jan