Environment loadModule:'AppKit'.

panel := NSOpenPanel openPanel.

runResult := panel runModal.

Transcript showLine: (panel filename).