Verbesserungsvorschläge für ein Schreibprogramm

Anfängerfragen zum Programmieren mit PureBasic.
Wolfvater Loki
Beiträge: 52
Registriert: 22.05.2022 15:37

Verbesserungsvorschläge für ein Schreibprogramm

Beitrag von Wolfvater Loki »

Hallo.
Ich habe mir ein Schreibprogramm überlegt, bin aber nicht ganz so zufrieden damit. Hat einer Vorschläge, was ich verbessern kann oder gar anders?

Code: Alles auswählen

Repeat
  raus = 0
  situationenwahl$ = InputRequester("Entscheidung","Eingabe:","")
  Situation = Val(situationenwahl$)
  Select Situation
    Case 1
      ghostwriter$ = InputRequester("Schreiber","Eingabe:","")
      CreateFile(1,"Text1.txt")
      Repeat
        readtext$ = ReadString(1)
        writetext = WriteStringN(1,ghostwriter$)
      Until Eof(1)
      CloseFile(1)
    Case 2 To 99
      ghostwriter$ = InputRequester("Schreiber","Eingabe:","")
      OpenFile(1,"Text1.txt")
      Repeat
        readtext$ = ReadString(1)
        writetext = WriteStringN(1,ghostwriter$)
      Until Eof(1)
      CloseFile(1)
    Case 100
      raus = 1
  EndSelect
Until raus = 1
Wolfvater Loki
Er wünscht euch schöne Grüße.
Benutzeravatar
NicTheQuick
Ein Admin
Beiträge: 8675
Registriert: 29.08.2004 20:20
Computerausstattung: Ryzen 7 5800X, 32 GB DDR4-3200
Ubuntu 22.04.3 LTS
GeForce RTX 3080 Ti
Wohnort: Saarbrücken
Kontaktdaten:

Re: Verbesserungsvorschläge für ein Schreibprogramm

Beitrag von NicTheQuick »

Ich verstehe nicht, was das Programm machen soll.

Am wenigsten Sinn macht für mich das ReadString(1), wenn du vorher die Datei mit CreateFile() gerade angelegt hast. Dann steht eh nichts drin, was ausgelesen werden kann. Und ein Eof(1) ist da auch nicht von Nöten.
Bild
Wolfvater Loki
Beiträge: 52
Registriert: 22.05.2022 15:37

Re: Verbesserungsvorschläge für ein Schreibprogramm

Beitrag von Wolfvater Loki »

Das Programm erstellt einfach eine Textdatei. In diese Datei wird durch die Repeat-Schleife etwas reingeschrieben.
Wolfvater Loki
Er wünscht euch schöne Grüße.
Benutzeravatar
Kiffi
Beiträge: 10621
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Re: Verbesserungsvorschläge für ein Schreibprogramm

Beitrag von Kiffi »

Wolfvater Loki hat geschrieben: 11.08.2022 21:45Das Programm erstellt einfach eine Textdatei. In diese Datei wird durch die Repeat-Schleife etwas reingeschrieben.
Schau Dir die von Dir verwendeten Befehle nochmal genauer in der PB-Hilfe an.

Mit WriteStringN() schreibst Du Daten in eine Datei.
Mit ReadString() liest Du Daten aus einer Datei.
Hygge
Antworten