OpenToWrite(1,"message.txt",0)
for k=1 to 9
WriteInteger(1,k)
WriteString(1,"string"+Str(k))
next k
CloseFile(1)
OpenToRead(1,"message.txt")
for k=1 to 10
Print (ReadInteger(1))
Print (ReadString(1))
next k
CloseFile(1)
Sync()
do
loop
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
OpenToWrite(1,"message.txt",0) for k=1 to 9 WriteInteger(1,k) WriteString(1,"string"+Str(k)) next k CloseFile(1) OpenToRead(1,"message.txt") for k=1 to 10 Print (ReadInteger(1)) Print (ReadString(1)) next k CloseFile(1) Sync() do loop