Buchempfehlung
Windows System Programming
Windows System Programming
Das Kompendium liefert viele interessante Informationen zur Windows-Programmierung auf Englisch. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe Liste
Übersicht / Liste Neu
Datei hochladen Suche
Quellcode suchen Download
Dateidownload

Line input example

Uploader:Mitglieddarksider3
Datum/Zeit:12.10.2011 18:45:12

Dim as String Zeile,datei
Dim as Integer ff
ff = FREEFILE
Do
    INPUT "DATEI: ",datei
    if datei = "exit" Then
        print STRING(22, "-")
        Print "Please press any key"
        exit do
    Endif
    PRINT
    OPEN datei FOR INPUT AS #ff
    LINE INPUT #ff, Zeile
    PRINT "Inhalt: "+Zeile
    PRINT
    CLOSE #ff
    PRINT "DATEI: "+datei
loop
SLEEP