データベースの選択

また@関数。
@Promptのちょっと変わった使い方です。
R5からの追加機能なので、R4.6以前を使っている人は注意！（そうそういないだろうが・・・）
[ChooseDatabase]オプションを使うと、「データベースを開く」ダイアログが表示されるのである。
そこで、取得したいＤＢを選択して、「開く」ボタンをクリックするだけ。

戻り値はリスト形式になっていて、
１：サーバ名（ローカルの場合は、空白）
２：ＤＢファイル名（パス名付き）
３：ＤＢタイトル
となっている。利用する時は注意しないと、必要なものが取得できないのだ。

------------------------------------------------------------------------------
ret := @Prompt([ChooseDatabase];"";"");

@For(i:=1;i<=@Elements(ret);i:=i+1;@Prompt([Ok];@Text(i);ret[i]))