How to open a file in TextArea (quickly)?

BlitzPlus Forums/BlitzPlus Programming/How to open a file in TextArea (quickly)?

Leadwerks
 #1
This is better:

While Not EOF(f)
    If s$<>"" s=s+Chr(10)
    s=s+ReadLine(f)
    Wend
AddTextAreaText gadget,s