# TextOutputStream.Write Example ;)

**URL:** <https://forum.xojo.com/t/textoutputstream-write-example/88035>\
**Category:** Bugs and Feature Requests\
**Created:** [April 7, 2026, 8:49pm UTC](https://forum.xojo.com/t/textoutputstream-write-example/88035 "2026-04-07T20:49:02Z")\
**Posts on this page:** 1\
**Page:** 1

<div class="post-metadata">

**Author:** ![Emile\_Schwarz](https://forum.xojo.com/letter_avatar_proxy/v4/letter/e/90ced4/32.png) [@Emile\_Schwarz](https://forum.xojo.com/u/Emile_Schwarz)\
**Post date:** [April 7, 2026, 8:49pm UTC](https://forum.xojo.com/t/textoutputstream-write-example/88035/1 "2026-04-07T20:49:02Z")

</div>

TextOutputStream.Write Example 😉

```auto
Var f As FolderItem
Var stream As BinaryStream
f = FolderItem.ShowSaveFileDialog(FileTypes1.Text, "Untitled.txt")
If f<> Nil Then
  stream = BinaryStream.Create(f, True)
  stream.Write(TextArea1.Text)
  stream.Close
End If

```