こんにちは、みんな、
ユーザーに2つのファイルを選択するよう求めるダイアログボックスを作成します。
ファイル選択機能を使用できますが、ファイルを1回で選択するダイアログボックスを作成する必要があります。そうしないと、選択を複数回実行する必要があります。
画像に示すようなダイアログが欲しい。
ありがとう
Pick Fileには、複数のファイルを選択できる「Multiple」オプションがあります
見る:
Help ==> Scripting Index ==> Pick File
スケッチのようなインターフェイスが必要な場合は、ここから始めましょう。現時点では、同じファイルを選択して両方の役割を果たすことができますが、おそらくそれは望んでいないことです。
NamesDefaultToHere(1);
// Get a list of folders and directories
myFiles = FilesInDirectory("$Desktop");
// Only keep .csv files
for(f = NItems(myFiles), f >=1, f--,
thisOne = myFiles[f];
if (!IsFile(thisOne) | !EndsWith(thisOne, ".csv"), RemoveFrom(myFiles, f));
);
if(Nitems(myFiles) < 2, Print("Not enough .CSV files found"); Beep(); Throw());
// Make a user interface
nw =
NewWindow("Pick Two Files",
LineUpBox(NCol(2),
TextBox(" Pick File 1:"),
cb1 = ComboBox(myFiles),
TextBox(" Pick File 2:"),
cb2 = ComboBox(myFiles)
),
ButtonBox("OK", OKscript);
);
// Runs when 'OK' button is pressed
OKscript =
Expr(
nw << closeWindow;
f1 = myFiles[cb1 << get];
f2 = myFiles[cb2 << get];
Print(f1, f2);
);