simUI.fileDialog fix

Author: fferri

Events capture.lua

@@ -40,11 +40,12 @@ function export()
     local scenePath = sim.getStringParameter(sim.stringparam_scene_path)
     local sceneName = sim.getStringParameter(sim.stringparam_scene_name):match("(.+)%..+")
     if sceneName == nil then sceneName = 'untitled' end
-    local fileName = simUI.fileDialog(
+    local fileNames = simUI.fileDialog(
                          simUI.filedialog_type.save, 'Export events dump...', scenePath,
                          sceneName .. '.cbor', 'CBOR file', 'cbor'
                      )
-    if fileName == nil then return end
+    if #fileNames == 0 then return end
+    local fileName = fileNames[1]
     local file = io.open(fileName, 'w')
     data = data .. string.char(255)
     file:write(data)

Events dump exporter.lua

@@ -19,16 +19,15 @@ function export()
     local scenePath = sim.getStringParameter(sim.stringparam_scene_path)
     local sceneName = sim.getStringParameter(sim.stringparam_scene_name):match("(.+)%..+")
     if sceneName == nil then sceneName = 'untitled' end
-    local fileName = simUI.fileDialog(
+    local fileNames = simUI.fileDialog(
                          simUI.filedialog_type.save, 'Export events dump...', scenePath,
                          sceneName .. '.cbor', 'CBOR file', 'cbor'
                      )
-    if fileName == nil then return end
+    if #fileNames == 0 then return end
+    local fileName = fileNames[1]
     local data = sim.getGenesisEvents()
     local file = io.open(fileName, 'w')
     file:write(data)
     file:close()
-    sim.addLog(
-        sim.verbosity_infos + sim.verbosity_undecorated, 'Exported events dump to ' .. fileName
-    )
+    sim.addLog(sim.verbosity_infos + sim.verbosity_undecorated, 'Exported events dump to ' .. fileName)
 end

Floor plan importer.lua

@@ -61,7 +61,7 @@ function sysCall_init()
     end
     path = sim.getStringParam(sim.stringparam_scene_path)
     fmts, fmtss = simUI.supportedImageFormats(';')
-    imageFile = simUI.fileDialog(
+    imageFiles = simUI.fileDialog(
                     simUI.filedialog_type.load, 'Open image...', path, '', 'Image files', fmtss
                 )
     addCuboid = function(classTbl, x1, y1, x2, y2)
@@ -118,7 +118,7 @@ function sysCall_init()
         optimizationEnabled = simUI.getCheckboxValue(ui, 901) > 0
         invertImageValues = simUI.getCheckboxValue(ui, 902) > 0
         respondable = simUI.getCheckboxValue(ui, 911) > 0
-        im, res = sim.loadImage(0, imageFile)
+        im, res = sim.loadImage(0, imageFiles)
         c = {res[1] / 2, res[2] / 2}
         im = sim.transformBuffer(im, sim.buffer_uint8rgb, 1, 0, sim.buffer_uint8)
         im = sim.unpackUInt8Table(im)
@@ -177,7 +177,7 @@ function sysCall_init()
         ui = nil
         leaveNow = true
     end
-    if imageFile then
+    if #imageFiles > 0 then
         ui = simUI.create(
                  [[<ui title="Import floorplan..." closeable="true" on-close="closeUi" resizable="true" modal="true" layout="vbox">
             <group layout="form">

Point cloud importer.lua

@@ -16,16 +16,16 @@ function sysCall_init()
 end
 
 function importClicked_callback()
-    local files = simUI.fileDialog(
+    local fileNames = simUI.fileDialog(
                       simUI.filedialog_type.load_multiple, '*.xyz point cloud import', '', '', '*.xyz',
                       'xyz'
                   )
-    if files then
+    if #fileNames > 0 then
         local pc = sim.createPointCloud(0.02, 20, 0, size)
-        for token in (files .. ";"):gmatch("([^;]*);") do
+        for _, fileName in ipairs(fileNames) do
             local pts = {}
             local cols = {}
-            for line in io.lines(token) do
+            for line in io.lines(fileName) do
                 local c = 0
                 for coord in line:gmatch("([^\9 ]+)") do
                     if c >= 3 then

Screenshot tool.lua

@@ -317,29 +317,27 @@ end
 function save_callback(ui, id, v)
     local options = 0
     if config.transparent then options = 1 end
-    local filenameAndPath
+    local fileNames
     if config.fileDlg then
-        filenameAndPath = simUI.fileDialog(
+        fileNames = simUI.fileDialog(
                               simUI.filedialog_type.save, 'title', '', 'screenshot.png', 'image file',
                               '*'
                           )
     else
-        local theOs = sim.getInt32Param(sim.intparam_platform)
-        if theOs == 1 then
+        local fileName = 'coppeliaSim_screenshot_' .. os.date("%Y_%m_%d-%H_%M_%S", os.time()) .. '.png'
+        if sim.getInt32Param(sim.intparam_platform) == 1 then
             -- MacOS, special: executable is inside of a bundle:
-            filenameAndPath = '../../../coppeliaSim_screenshot_' ..
-                                  os.date("%Y_%m_%d-%H_%M_%S", os.time()) .. '.png'
-        else
-            filenameAndPath =
-                'coppeliaSim_screenshot_' .. os.date("%Y_%m_%d-%H_%M_%S", os.time()) .. '.png'
+            fileName = '../../../' .. fileName
         end
+        fileNames = {fileName}
     end
-    if filenameAndPath then
-        if sim.saveImage(image, {resX, resY}, options, filenameAndPath, -1) ~= -1 then
-            sim.addLog(sim.verbosity_msgs, "Screenshot was saved to " .. filenameAndPath)
+    if #fileNames > 0 then
+        local fileName = fileNames[1]
+        if sim.saveImage(image, {resX, resY}, options, fileName, -1) ~= -1 then
+            sim.addLog(sim.verbosity_msgs, "Screenshot was saved to " .. fileName)
             simUI.msgBox(
                 simUI.msgbox_type.info, simUI.msgbox_buttons.ok, 'Screenshot',
-                "Screenshot was saved to " .. filenameAndPath
+                "Screenshot was saved to " .. fileName
             )
         else
             sim.addLog(

Video recorder.lua

@@ -61,12 +61,12 @@ function onUiClose()
 end
 
 function browse()
-    local r = simUI.fileDialog(
+    local fileNames = simUI.fileDialog(
                   simUI.filedialog_type.folder, 'Select output directory', outputDir, '', '', '',
                   true
               )
-    if r[1] == '' then return end
-    outputDir = r[1]
+    if #fileNames == 0 then return end
+    outputDir = fileNames[1]
     updateUi()
 end