Scheme “文件”对话框，在Racket中创建/保存新文件

我有以下代码来打开文件对话框：

(define fname (get-file))

但是，这仅显示要打开的现有文件。如何打开文件“保存”对话框，在该对话框中可以输入新文件名以创建文件？

---

填充行必须至少包含30个字符。

我不知道为什么无法访问此文档页。谢谢。我发现（definefname（get file））有效，但（definefname（put file））无效。这能解决吗？你看到了什么？怎么搞的？你期待什么？我忘了在#lang racket/gui中加“/gui”。它起作用了。