Das deutsche QBasic- und FreeBASIC-Forum

[tomcat13]

Hello @all:
Ich bin neu hier und versuche mich mal in FreeBasic. Mein erstes 'Projekt' ist ein Playlisten-Converter. Klappt soweit auch ganz gut, dazu benutze ich den komfortablen Window-Dialog zur Auswahl des Laufwerk/Pfad/Dateinamens zum öffnen oder speichern einer Datei in Consolenanwendungen - by Volta.
Allerdinga habe ich folgendes Problem:
Ich rufe dei Funktion in einer Schleife auf, um nacheinander die verschiedenen Playlisten zu laden, so weit so gut. Nach der letzten klicke ich dann auf "Abbrechen" im Filedialog, dami schließt sich nicht nur der FileLoader, sondern auch mein Programmfenster. Darim zeige ich im Lauf der Schleife dien Namen der Aktuellen Playliste und die Anzahl der enthaltenen Lieder an. Danach wollte ich noch die Summe der Playlisten und die Gesamtsumme der Lieder anzeigen, aber das Fenster ist ja weg. Was mache ich falsch? Wie kann ich das Ausgabefenster überhaupt steuern?
_________________
Heute ist nur das Gestern von Morgen

Gruß
tomcat13

[volta]

Hi,

Willkommen im Forum.

Benutzt du diese Version http://www.freebasic-portal.de/index.php?s=code&id=45

[tomcat13]

Danke für die schnelle Antwort, werde ich gleich mal einbauen und dann mal Details zum Playlist-Converter schreiben (wenn's interessiert)
_________________
Heute ist nur das Gestern von Morgen

Gruß
tomcat13

[tomcat13]

@volta: Fehler ist leider immer noch da
_________________
Heute ist nur das Gestern von Morgen

Gruß
tomcat13

[volta]

könnte es ein sein, dass dort kein SLEEP eingebaut ist..
siehe http://www.freebasic-portal.de/index.php?s=tutorials&id=7&seite=1

oder versagen da meine hellseherischen Kräfte

|
|
V
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.

[tomcat13]

Nein, war es leider nicht, es sind einige SLEEPs drin.
Hier ein Schema des Programms (der komplette Code ist ein bischen viel)

---------------------------------------------------
Types
declares
Dims

DO UNTIL taste = "e"

DateiName = LoadSaveDialog(....)

OPEN DateiName FOR INPUT AS #DNr
WHILE NOT EOF(DNr)
LINE INPUT #DNr, Zeile
...
...
WEND
CLOSE #DNr

OPEN save_pfad FOR OUTPUT AS #DNr
FOR nummer = 1 TO anzahl
PRINT #DNr, songtab(nummer)
NEXT nummer
CLOSE #DNr

taste = ""
SLEEP 10
taste = INKEY
? taste

LOOP

SLEEP 1000
?
? "Anzahl Playlisten:", total_list
? "Anzahl Lieder :", total_lieder

SLEEP

Funtions
--------------------------------------------------

Es fehlen zwar einige zwischenzeilen und die Functions usw. aber so läufts ab.
_________________
Heute ist nur das Gestern von Morgen

Gruß
tomcat13

[tomcat13]

Sorry - mein Fehler. Naja, 90% aller Computerfehler sitzen direkt vor der Tastatur.

Ich habe jetzt mal den Open- und Save-Teil in eine Abfrage gepackt:

IF LEN(dateiname) > 0 THEN
OPEN....
Save...
END IF

Tja, kaum macht man's richtig, schon funktioniert's

Aber ein weiteres Problem habe ich mit den Umlauten:
Entweder werden sie richtig am Bildschirm angezeigt, oder richtig in die Date gespeichert.
Ersetze ich das importierte "ö", durch "ö" steht am BS "÷", in der Datei ist es ok.
Ersetze ich es durch chr(148) ist es am BS ok, ist es in der Datei falsch.

"WINDOWS.BI" und "win\COMMDLG.BI" sind included!
_________________
Heute ist nur das Gestern von Morgen

Gruß
tomcat13

[volta]

Hi,
ja die Umlaute sind unter FB ein Problem

Es gibt einige Möglichkeiten:
z.B.
http://www.freebasic-portal.de/index.php?s=code&id=9
http://www.freebasic-portal.de/index.php?s=tutorials&id=25&

unter Windows bevorzuge ich dies:
http://www.freebasic-portal.de/index.php?s=tutorials&id=25&seite=2

in fbgfx (SCREEN typ, bpp) dies:
http://www.freebasic-portal.de/index.php?s=tutorials&id=44&seite=7

http://www.freebasic-portal.de ist der gockel (oder wie? ) für FB


_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.