In Datei Schreiben und Eine Formatierte ausgabe

[netfreak]

@Sunny: Also ich möchte das deswegen so abspeichern damit ich einfach nachher die Datei ausdrucken kann und das soll ja dann schon was aussehen!

@NicTheQuick: Dein Code funktionirt nicht richtig. Er hat Probleme mit LSet!

Aber danke für eure Antworten!

[netfreak]

So ich habe jetzt ne Lösung gefunden!
Danke an alle die mir Geholfen haben oder Tips geben haben!

[NicTheQuick]

Was für Probleme gab es denn mit [c]LSet()[/c]? Du musst doch sowieso gemerkt haben, dass diese Zeile nicht relevant für die eigentliche Antwort auf deine Frage war. Naja...
Und wie hast du es jetzt gelöst? Zeig doch mal den Code, damit jeder was davon lernen kann. Zumindest die Newbies.

[netfreak]

Ich habe es jetzt mit LSet!

Und zwar so:

Code: Alles auswählen

s$ = LSet(a$, 30)
a$ = LSet(b$, 20
WriteString(s$)
WriteString(a$)
WriteStringN(t$)

So gehts.
Alerdings habe ich nun eine Weiters Problem:

Ich schreibe das jetzt in die Datei, das sieht auch gut aus im Editor(von Win)! Allerdings wenn ich das dan ausdrucke dann sieht das alles nicht mehr so gut aus denn es verschiebt sich alles! Jetzt wolte ich Fragen ob mir jemand sagen kann was ich beim Einlesen Falsch Mache ihr der Code:

Code: Alles auswählen

;Drucken
              If PrintRequester()

                  If StartPrinting("Film Liste")
  
                      If StartDrawing(PrinterOutput())

                      DrawingFont(LoadFont(0, "Arial", 30))      
                           
                      ReadFile(0,"test.txt")
      
                      While Eof(0) = 0 
                      drz$ = ReadString() 
  
                      Locate(100, w) : DrawText(drz$)
                      w + 50
                      Wend 
     
      
                      CloseFile(0)
      
      
                      StopDrawing()
                      EndIf
    
                      StopPrinting()
                  EndIf
                EndIf 

Weiß jemand was ich Falsch mach?
Bin für jede Antwort Dankbar!!!

[NicTheQuick]

Das kommt ganz darauf an, welche Schriftart zu benutzt. Nicht bei jeder Schriftart sind alle Zeichen gleich breit. Wenn du bspw. "Courier New" benutzt, sollte alles richtig eingerückt sein, weil jedes Zeichen gleich breit ist.

[netfreak]

Jetzt gehts vielen Dank!!!