From: Lukáš Jiřiště <jiriste@icpf.cas.cz>
Date: Mon, 29 Jul 2024 08:05:06 +0000 (+0200)
Subject: Add dialog window for output file selection
X-Git-Url: https://git.ljiriste.work/?a=commitdiff_plain;h=303d5608796efb42c1c28bec7c15e307a3d1ac23;p=Bubble_column.git

Add dialog window for output file selection
---

diff --git a/Bubliny.m b/Bubliny.m
index a833fe0..48a5a81 100755
--- a/Bubliny.m
+++ b/Bubliny.m
@@ -12,7 +12,6 @@ clc;                                                                        % cl
 DirectoryName = get_data_dir();
 
 %DirectoryPath='T:\00-Orvalho\Travnickova\Bubble column\';
-disp(['The data directory used for files is ', DirectoryName]);             % displays the name of selected file in Command Window
 
 DDirectory = dir(DirectoryName);                                            % Loads directories or subdirectories to struct FFiles(1).name, FFiles(1).folder, FFiles(1).date - i s casem
 
@@ -30,7 +29,11 @@ if isempty(SelectedDirectory)                                               % ha
 end
 nSelectedDirectory = numel(SelectedDirectory);                              % Counts directories
 
-ResFile = [DirectoryName '.xlsm'];
+[ResFile, res_path] = uiputfile('*.xlsm', 'Save results to');
+if (ResFile == 0)
+	error('No file elected to save the results to.')
+end
+ResFile = [res_path, ResFile];
 
 
 %%