Types: Bei Input$ Befehl wird nichts gespeichert

Übersicht

BlitzBasic

Allgemein

	NightPhoenix Betreff: Types: Bei Input$ Befehl wird nichts gespeichert	So, Okt 21, 2007 15:51 Antworten mit Zitat
Ich stehe wiedermal vor einem Problem mit einer Speicherfunktion mit types und einer Eingabe über den Befehl Input$ Kenn mich mit dem speichern usw. noch nicht so aus, also bitte bissl Rücksicht nehmen ^^ danke Hier mal ein Code Ausschnitt: Code: [AUSKLAPPEN] [EINKLAPPEN] PlanetFile=WriteFile("File.abc") Type Tplanet Field Name$ End Type Obct.Tplanet = New Tplanet obct\Name$=Input$("Name? ") Spei=Input("Speichern? (Überprüfen sie ihre Angaben!) Für Ja=1 für Nein=2") If spei=1 Then WriteLine PlanetFile,Name$ closefile PlanetFile Ich öffne also am Ende die .abc Datei welche ich damit geschrieben habe, da steht aber nichts drin, weil die Variable Name$ nicht definiert ist. Weshalb ist sie nicht definiert? MfG. NightPhoenix

NightPhoenix

Betreff: Types: Bei Input$ Befehl wird nichts gespeichert

So, Okt 21, 2007 15:51
Antworten mit Zitat

Ich stehe wiedermal vor einem Problem mit einer Speicherfunktion mit types und einer Eingabe über den Befehl Input$

Kenn mich mit dem speichern usw. noch nicht so aus, also bitte bissl Rücksicht nehmen ^^ danke Wink

Hier mal ein Code Ausschnitt:

Code: [AUSKLAPPEN]

PlanetFile=WriteFile("File.abc")

Type Tplanet
Field Name$
End Type

   Obct.Tplanet = New Tplanet

   obct\Name$=Input$("Name? ")

Spei=Input("Speichern? (Überprüfen sie ihre Angaben!) Für Ja=1 für Nein=2")

   If spei=1 Then WriteLine PlanetFile,Name$

closefile PlanetFile

Ich öffne also am Ende die .abc Datei welche ich damit geschrieben habe, da steht aber nichts drin, weil die Variable Name$ nicht definiert ist.
Weshalb ist sie nicht definiert?

MfG. NightPhoenix

	Coffee	So, Okt 21, 2007 15:57 Antworten mit Zitat
vllt solltest du Obct\Name$ reinschreiben? MfG
Mjam

Coffee

So, Okt 21, 2007 15:57
Antworten mit Zitat

vllt solltest du Obct\Name$ reinschreiben?

MfG

*Mjam*

	flona	So, Okt 21, 2007 15:57 Antworten mit Zitat
Versuchs mal mit: Code: [AUSKLAPPEN] [EINKLAPPEN] If spei=1 Then WriteLine PlanetFile,obct\Name$ edit Immer diese gleichzeitg Post's
www.Dreier-Florian.kilu.de Intel Core 2 Quad Q9400 \| Zotac 9800GT \| 4GB RAM \| 1TB HDD \| Windows 7 Professional 32bit