Buchempfehlung
Visual Basic 6 Kochbuch
Visual Basic 6 Kochbuch
Viele praktische Tipps zum Programmieren mit Visual Basic 6, die sich oft auch auf FB übertragen lassen. [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

Tab-Größe automatisch ändern

Uploader:MitgliedMichael Frey
Datum/Zeit:09.10.2005 17:58:19

defint a-z

cls

? "Alte Tab Groesse?"
input old

? "Neue Tab Groesse?"
input new

open command$ for input as #1
open command$+".new" for output as #2
do until eof(1)
    line input #1, x$
    a=(len(x$)-len(ltrim$(x$)))/old*new
    ? #2,space$(a)+ltrim$(x$)
loop