Results for inumber translation from English to German

close #inumber
close #inumber

seek #inumber,2
seek #inumber,2

get #inumber,,stext
get #inumber,,stext

print lof(#inumber)
print lof(#inumber)

dim inumber as integer
dim inumber as integer

while not eof(#inumber)
while not eof(#inumber)

line input #inumber, sline
line input #inumber, szeile

put #inumber,,"this is new text "
put #inumber,,"das ist ein neuer text "

open afile for input as inumber
open afile for input as inumber

open afile for output as #inumber
open afile for output as #inumber

put #inumber,,"this is a new text "
put #inumber,,"das ist ein neuer text "

seek #inumber,1 rem position at beginning
seek #inumber,1 rem auf anfang positionieren

print #inumber, "another line of text"
print #inumber, "das ist eine weitere zeile text"

msgbox fileattr(#inumber, 1 ),0,"access mode "
msgbox fileattr(#inumber, 1 ),0,"zugriffsmodus "

print #inumber, "first line of text"
print #inumber, "das ist eine zeile text"

print "date:"; i; "next record:"; seek(inumber)
print "datum:"; i; "nächster datensatz:"; seek(inumber)