• File

Popis

declare function SelectDir dll "ActualDocument" (string, string, string): string

script TEST_SelectDirectory (): Boolean
var
  sDir: string
begin
  // výchozí adresář je rakosnicek share folders
  sDir := SelectDir("Prosím zvolte adresář pro export.", "\\rakosnicek", "")
  write(sDir)

  // výchozí adresář je úroveň Tento počítač
  sDir := SelectDir("Prosím zvolte adresář pro export.", "", "")
  write(sDir)
end