12. Use Native Windows Tools

System-dialog get-file

Define var proc-name as character no-undo.

Define var ok as logical no-undo initial yes.

Repeat:

System-dialog get-file proc-name

Title “choose procedure to run ...”

Filters “source files (.P)” “.P”,

“R-code files (.R)” “.R”

Must-exist use-filename update ok.

If ok then run value (proc-name).

else leave.

End.

Previous slide Next slide Back to first slide View graphic version