Textarea zeilenweise auslesen / mit WriteLine rausschreiben

Übersicht BlitzBasic BlitzPlus

Neue Antwort erstellen

4pac

Betreff: Textarea zeilenweise auslesen / mit WriteLine rausschreiben

 BeitragDi, Mai 24, 2005 1:01
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo Leute,

sagt mal, bin ich zu bescheuert dazu, oder wie kann ich eine Textarea zeilenweise auslesen? Ich will den Inhalt der Textarea mit WriteLine in eine Datei schreiben.

Grüße,
4pac

Hip Teen

 BeitragDi, Mai 24, 2005 1:06
Antworten mit Zitat
Benutzer-Profile anzeigen
Also, in der Onlinehilfe steht:
Zitat:
Zeilenumbrüche werden als CHR$(13)+CHR$(10)

anhand von den 2 Zeichen kannst du die Zeichenketten zerlegen und einzeln per WriteLine in eine Datei schreiben.
Spruch der Woche: "Ahh, ein neues Gesicht?!" - "Nein, das hab ich schon länger"

4pac

 BeitragDi, Mai 24, 2005 19:36
Antworten mit Zitat
Benutzer-Profile anzeigen
Okay, also so richtig schön zu Fuß mal wieder. Bei mir ist ein Zeilenumbruch allerdings immer nur mit chr$(13), also mit einem einzelnen Zeichen notiert, chr$(13) + chr$(10) führt immer zu Stress, egal bei was für Operationen. Ich hab´s jetzt so gelöst:

BlitzBasic: [AUSKLAPPEN] 


mengebuchstaben$ =  TextAreaText(textarea_01)
schreibdatei = WriteFile(kompletterpfad$)

While Len(mengebuchstaben$) > 0

If Instr(mengebuchstaben$, Chr$(13)) Then

	WriteLine (schreibdatei, Left$(mengebuchstaben$ , Instr(mengebuchstaben$, Chr$(13))))
	mengebuchstaben$ = Right$(mengebuchstaben$ , Len(mengebuchstaben$) - Instr(mengebuchstaben$, Chr$(13)))

End If

Wend


CloseFile schreibdatei

Neue Antwort erstellen


Übersicht BlitzBasic BlitzPlus

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group