Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

open legt Datei nicht an -> Illegal function call

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
player424



Anmeldungsdatum: 30.12.2008
Beiträge: 21

BeitragVerfasst am: 06.03.2010, 21:21    Titel: open legt Datei nicht an -> Illegal function call Antworten mit Zitat

Hi leute,
folgende Zeile funktioniert nicht wie sie sollte:

Code:

open newFile for output as #o


newFile ist eine string variable (enthält gültigen dateinamen) und o ist eine integer Variable, welche mit freefile belegt ist. Wenn ich das ganze als funktion aufrufe, sehe ich, dass diese 1 zurück gibt, was laut der Tabelle in der Referenz Illegal function call bedeutet. Was mache ich falsch?

Grüsse
player424
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 06.03.2010, 22:20    Titel: Antworten mit Zitat

Hallo,

da hätte ich verschiedene Vermutungen, woran es liegen könnte.

Vermutung 1: Kann es sein, dass du das Dateihandle o "recycelst"? Du musst nämlich vor jeder OPEN-Anweisung erneut FREEFILE zuweisen, weil du sonst nicht sicher sein kannst, dass das Handle noch verfügbar ist. Einmal am Anfang des Codes FREEFILE zuzuweisen und später einfach immer wieder das Handle zu nutzen, könnte Probleme verursachen:
Code:
DIM AS INTEGER a, b
a = FREEFILE
OPEN "TEST0000.TXT" FOR OUTPUT AS #a
PRINT #a, "Hallo"
CLOSE #a
b = FREEFILE
OPEN "TEST0001.TXT" FOR OUTPUT AS #b
PRINT #b, "Welt"
OPEN "TEST0002.TXT" FOR OUTPUT AS #a ' => Hier passiert's!
                                     '    a haette vorher erneut FREEFILE zugewiesen bekommen müssen.
PRINT #a, "Das ist ein Test."
CLOSE #a, #b
SLEEP

Ergebnis:
Code:
Aborting due to runtime error 1 (illegal function call) at line 9 of C:\FreeBASIC\test.bas()


Vermutung 2: Holst du möglicherweise 2 Dateihandles direkt hintereinander ab, ohne zwischendurch OPEN auszuführen?
Beispiel:
Code:
DIM AS INTEGER a, b
a = FREEFILE
b = FREEFILE
OPEN "X.TXT" FOR OUTPUT AS #a
OPEN "Y.TXT" FOR OUTPUT AS #b

Das würde einen Fehler verursachen, weil b das gleiche Handle zugewiesen wird wie a. Zum Zeitpunkt der Zuweisung wurde nämlich noch kein einziges Dateihandle durch OPEN belegt. Richtig wäre in dem Fall:
Code:
DIM AS INTEGER a, b
a = FREEFILE
OPEN "X.TXT" FOR OUTPUT AS #a
b = FREEFILE
OPEN "Y.TXT" FOR OUTPUT AS #b


Vermutung 3: Ist der Dateiname im String newFile vielleicht ungültig?

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1876
Wohnort: D59192

BeitragVerfasst am: 06.03.2010, 22:40    Titel: Antworten mit Zitat

Zitat:
Wenn ich das ganze als funktion aufrufe..

Wie rufst du das als Funktion auf, schreib mal ein Beispiel?
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
player424



Anmeldungsdatum: 30.12.2008
Beiträge: 21

BeitragVerfasst am: 06.03.2010, 23:24    Titel: Antworten mit Zitat

Vielen Dank es hat daran gelegen, dass ich freefile direkt hintereinander aufgerufen habe. Jetzt bin ich wieder etwas schlauer lächeln .

@volta: In FreeBASIC kann man open ja auch als Funktion aufrufen, um den Rückgabewert auszuwerten http://www.freebasic-portal.de/befehlsreferenz/open-funktion-234.html
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1876
Wohnort: D59192

BeitragVerfasst am: 07.03.2010, 11:05    Titel: Antworten mit Zitat

player424 hat Folgendes geschrieben:
@volta: In FreeBASIC kann man open ja auch als Funktion aufrufen, um den Rückgabewert auszuwerten http://www.freebasic-portal.de/befehlsreferenz/open-funktion-234.html

Richtig, aber achte auf die Klammern und "AS INPUT"!
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz