メインコンテンツまでスキップ
バージョン: 開発中

ドラッグ&ドロップ

概要​

4Dにはフォームやアプリケーションのオブジェクト間で動作する組み込のドラック＆ドロップ機能があります。 一つのオブジェクトを同一のウインドウ内、または別のウインドウにドラック＆ドロップすることが出来ます。 言い換えれば、同一のプロセスまたは別のプロセスに対してドラック＆ドロップすることが出来ます。

またオブジェクトを4Dフォームと他のアプリケーション間でドラッグ＆ドロップできます。 例えば PNGピクチャーを 4D のピクチャーフィールドにドラッグ＆ドロップできます。 またワードプロセッサーアプリケーションでテキストを選択し、4D のテキスト変数やリストボックスなどにドロップできます。

そして、フォームが最前面になくとも、アプリケーションに直接オブジェクトをドロップできます。 On Drop データベースメソッド を使用して、このケースのドラッグ＆ドロップを管理できます。 つまり、例えば、4Dアプリケーションアイコンに 4D Write Pro ドキュメントをドロップして開くことができます。

4D では二つのドラッグ＆ドロップモードを提供しています:

  • ドラッグ&ドロップオペレーション全体がプログラマーによって管理されるカスタムモード。 このモードでは、ドラッグ＆ドロップに基づいたあらゆるインターフェースを実装することができます。 これにはデータの転送を必ずしも伴わないものも含まれ、ファイルを開くや計算をトリガーするなどの任意のアクションを実行することができます。
  • ドラッグ&ドロップオペレーションによってあるオブジェクトから別のオブジェクトへと、データが自動的にコピーあるいは移動される自動モード。 このモードはテキストベースのオブジェクトと (一部の) ピクチャーにおいて利用可能で、プロパティをチェックするだけで有効化されます。

ドラッグ可能オブジェクトとドロップ可能オブジェクト​

複数のフォームオブジェクトはカスタムモードまたは自動モードにおいてドラッグ可/ドロップ可に設定可能です(以下参照)。 デフォルトで、新しく作成されたオブジェクトはドラッグもドロップもできません("none" 値)。 これらのプロパティを設定するかどうかは開発者に任されています。

あるオブジェクトから別のオブジェクトにドラッグ&ドロップを実行するには、ドラッグ可 プロパティ を"自動" あるいは "カスタム" に設定する必要があります。 ドラッグ&ドロップ処理では、ドラッグされるオブジェクトがソースオブジェクトになります。

あるオブジェクトをドラッグ&ドロップ処理のドロップ先にするには、ドロップ可 プロパティ を "自動" あるいは "カスタム" に設定する必要があります。 ドラッグ&ドロップ処理では、データを受け取るオブジェクトがドロップ先オブジェクトになります。

以下の表はドラッグ可能またはドロップ可能なオブジェクトでの利用可能なプロパティの一覧をまとめたものです:

フォームオブジェクトドラッグ可 "カスタム"ドロップ可 "カスタム"ドラッグ可 "自動"ドロップ可 "自動"
4D Write Pro エリア○○○○
コンボボックス○○○
入力○○○○
階層リスト○○
リストボックス○○
プラグインエリア○○
ボタン○
ピクチャーボタン○

改装リスト内の項目、またはリストボックス内の行はドラッグ&ドロップすることができます。 逆に、あるオブジェクトを改装リスト内の項目またはリストボックスの行にドラッグ&ドロップすることもできます。 ただし、出力フォームの詳細エリアからオブジェクトをドラッグ&ドロップすることはできません。 アプリケーションのフォーム外へのドラッグアンドドロップも、On Drop データベースメソッド で管理できます。

注記
  • デフォルトで、ピクチャーフィールドや変数の場合は、ピクチャーとその参照は両方ともドラッグされます。 変数やフィールドの参照のみをドラッグしたい場合は、Alt ボタン(Windows) または Option ボタン(macOS) を押す必要があります。
  • 配列型リストボックスオブジェクトで“カスタム”のドラック可プロパティと“行の移動可” が同時に選択されている場合、行が移動された場合は“行の移動可”が優先されます。 この場合ドラッグはできません。
  • ドラッグとドロップの両方ができるオブジェクトは、開発者が禁止しない限り、自分自身にもドロップできます。

カスタムのドラッグ&ドロップ​

カスタムのドラッグ&ドロップインターフェースを実装するということは、プロパティ、イベント、そして一般的には ペーストボード テーマ のコマンドを組み合わせるということを意味します。 以下の図ではカスタムのドラッグ&ドロップシークエンスのキーポイントを描写しています:

実装の流れに関しては、以下のようなシナリオに基づいています:

  1. ソースオブジェクト(ドラッグ可 プロパティが"カスタム" に設定済み)のOn Begin Drag Over イベントにおいて、APPEND DATA TO PASTEBOARD、 SET FILE TO PASTEBOARD コマンド、あるいはペーストボード テーマ のコマンドなどを用いて適切なデータをペーストボードに入れます。 SET DRAG ICON コマンドを使用して特定のカーソルアイコンを定義することもできます。
  2. ドロップ先オブジェクト(ドロップ可 プロパティが"カスタム" に設定済み) のOn Drag Over イベントにおいて、GET PASTEBOARD DATA TYPE あるいは GET PASTEBOARD DATA を使用して、ペーストボード内のデータの型、あるいはデータのシグネイチャー取得し、ドロップ先オブジェクトと互換性があるかどうかをチェックします。 Drop position コマンドは、ドロップ先オブジェクトが配列(つまりスクロール可能なエリア)、階層リスト、テキストあるいはコンボボックスの場合にはターゲット要素のアイテム位置の要素番号を返し、ドロップ先オブジェクトがリストボックスの場合にはカラム番号を返します。
  3. ドロップ先オブジェクトのオブジェクトメソッド はアクションを受け付ける、または拒否するには0 または-1 を返さなければなりません。
    • 互換性がある場合、マウスボタンがリリースされた時にドロップを受け入れ、On Drop イベントを実行するためには0 を返します。
    • そうでない場合、-1 を返してドロップを拒否します。
      このやりとりにおけるインターフェース側の側面は4D によって自動的に管理され、ドロップが受け入れられたか拒否されたかによってカーソルの表示を変えます。
  4. ドロップ先オブジェクト(ドロップ可 プロパティが"カスタム" に設定済み)のOn Drop イベントにおいて、ドロップに対応するアクションを実行します。 例えばドラッグ&ドロップの操作がドラッグしているデータをコピーする目的であった場合、そのデータをドロップ先オブジェクトへ割り当てます。 ドラッグ&ドロップがデータの移動ではなく、特定の操作のためのユーザーインターフェースメタファーであった場合、例えばGet file from pasteboard コマンドを使用してファイルパスを取得するなど、必要な処理を実行します。

On Begin Drag Over イベントはドラッグのソースオブジェクトのコンテキストで生成される点に注意してください。対してOn Drag Over および On Drop イベントはドロップ先オブジェクトに送信されます。

アプリケーションがこれらのイベントを処理するためには、ソースオブジェクトとドロップ先オブジェクトの両方のプロパティリストで正しく選択されていなければなりません:

自動ドラッグ&ドロップ​

自動ドラッグ&ドロップは、単一のクリックで一つのエリアから他のエリアへと、テキストまたはピクチャーの選択範囲を移動またはコピーすることです。 このコピーは、同じ 4D エリア内、2つの 4D エリア間、4D と他のアプリケーション間で使用できます。

注

2つの4D エリア間の自動ドラッグ＆ドロップの場合、データは移動されます。言い換えれば、データはソースエリアから削除されます。 データをコピーしたい場合、アクションの間Ctrl (Windows) またはOption (macOS) キーを押します(macOS の場合、ドラッグを開始した後 に Option を押す必要があります)。

自動ドラッグ プロパティと自動ドロップ はフォームオブジェクトごとに個別に設定できます:

  • 自動ドラッグ: このオプションがチェックされると、オブジェクトの自動ドラッグモードが有効になります。 このモードでは、On Begin Drag フォームイベントは生成されません。 自動ドラッグが有効のときに標準のドラッグを"強制"したい場合、アクションの間Alt (Windows) または Option (macOS) キーを押しながら操作します(macOS の場合、ドラッグを開始する 前 にOption を押す必要があります)。 このオプションはピクチャーでは利用できません。
  • 自動ドロップ:: このモードでは、4D は可能な限り自動で、オブジェクトにドロップされたテキストやピクチャー型データの挿入を管理します (データはオブジェクトにペーストされます)。 この場合On Drag Over および On Drop フォームイベントは生成されません。 他方、ドロップ中のOn After Edit とオブジェクトがフォーカスを失った時のOn Data Change イベントは生成されます。

テキストやピクチャー以外のデータ (他の 4Dオブジェクトやファイルなど) や 複合データがドロップされた場合、アプリケーションは"ドロップ可"オプションを参照します。オプションがチェックされていれば、On Drag Over および On Drop フォームイベントが生成されます。そうでなければドロップは拒否されます。

例題​

配列型リストボックスからテキストエリアへ​

このシンプルな例題では、配列型リストボックスからドラッグしてきたデータを入力テキストエリアに入れたい場合を考えます:

リストボックスのオブジェクトメソッドには以下のようなコードが書かれています:

  //Object Method: ListBox
 If(Form event code=On Begin Drag Over)
    SET TEXT TO PASTEBOARD(arrFirstname{arrFirstname}+" "+arrLastname{arrFirstname})
 End if

テキストエリアのオブジェクトメソッドには以下のようなコードが書かれています:


  // Object Method: label1
If(Form event code=On Drop) // プロパティリストでドロップ可を有効化しておく必要あり
    ARRAY TEXT($signatures_at;0)
    ARRAY TEXT($nativeTypes_at;0)
    ARRAY TEXT($formatNames_at;0)
    GET PASTEBOARD DATA TYPE($signatures_at;$nativeTypes_at;$formatNames_at)
    If(Find in array($signatures_at;"com.4d.private.text.native")#-1) // ペーストボード内には4D テキストが入っている
       OBJECT Get pointer(Object current)->:=Get text from pasteboard
    End if
 End if

セレクション型リストボックスからテキストエリアへ​

カスタムモード・自動モードの両方のドラッグ&ドロップ機構を組み合わせることで、シンプルで強力なインターフェースを作成することができます。 この例題ではリストボックスからドラッグしてきたデータを入力テキストエリアに入れたい場合を考えます:

  • リストボックス側: "ドラッグ可"プロパティがカスタムに設定されており"On Begin Drag Over" イベントがチェックされている
  • 入力テキストエリア側: "自動ドロップ"プロパティがチェックされている
  //リストボックスのオブジェクトメソッド
 Case of
    :(Form event code=On Begin Drag Over)
       LOAD RECORD([Clients])
       $label:=[Clients]Name+Char(CR ASCII code)+[Clients]Contact+Char(CR ASCII code)+\
       [Clients]Address1+Char(CR ASCII code)+[Clients]City+", "+[Clients]State+" "+[Clients]ZipCode)
       SET TEXT TO PASTEBOARD($label)
 End case

データの移動と整形は、ドラッグ&ドロップを通して行われます:

ファイルパスからテキストエリアへ​

ユーザーがディスク上のファイルを選択し、入力可能な(オブジェクト型の)変数にドラッグ&ドロップしたときにそのjson ファイル詳細を表示するようにしたい場合を考えます。

変数のオブジェクトメソッドに、以下のように書くだけです:

 #DECLARE -> $result : Integer
 Case of
 
    :(Form event code=On Drag Over)
  // ペーストボードにファイルが格納されている場合にのみOn Dropイベントを受け入れ、それ以外は拒否する
       If(Get file from pasteboard(1)="") //ペーストボードにファイルがない
          $result:=-1 //ドロップを拒否
       End if
 
    :(Form event code=On Drop) //プロパティリストにてドロップ可アクションが有効化されている必要あり
       var $path_t : Text
       var path_o : Object
       $path_t:=Get file from pasteboard(1)
       If($path_t#"")
          path_o:=Path to object($path_t)
       End if
 
 End case

ファイルパスからリストボックスへ​

ユーザーがディスク上のファイルを選択し、リストボックス上にドラッグ&ドロップしたときにそのファイルのパスを表示するようにしたい場合を考えます。

リストボックスのオブジェクトメソッドに、以下のように書くだけです:

 #DECLARE -> $result : Integer
 Case of
 
    :(Form event code=On Drag Over)
  // ペーストボードにファイルが格納されている婆にのみOn Drop イベントを受け入れ、それ以外は拒否する
       If(Get file from pasteboard(1)#"") // 少なくとも1つのファイルがドロップされた
          $result:=0 //ドロップを受け入れる
       Else //ペーストボードにファイルがない
          $result:=-1 //ドロップを拒否
       End if
 
    :(Form event code=On Drop) //プロパティリストにてドロップ可アクションが有効化されている必要あり
       ARRAY TEXT(importedPath_at;0)
       var $path_t :Text
       var $index_l:=1
       Repeat
          $path_t:=Get file from pasteboard($index_l)
          If($path_t#"")
             APPEND TO ARRAY(importedPath_at;$path_t)
          End if
          $index_l:=$index_l+1
       Until($path_t="")
 End case

ペーストボードコマンド​

“ペーストボード” テーマのコマンド は、コピー/ペーストアクション (クリップボード管理) とアプリケーション間のドラッグ＆ドロップの管理両方に使用できます。

4D は2つのデータペーストボードを使用します。1つはコピーあるいはカットされたデータ用で、もう1つはドラッグ&ドロップされたデータ用です。 これら2つのペーストボードは同じコマンドを使用して管理されます。 コンテキストにより、どちらかにアクセスします:

  • ドラッグ＆ドロップペーストボードには、On Drop データベースメソッド 内でのOn Begin Drag Over, On Drag over あるいは On Drop フォームイベントや内でのみアクセスできます。 これらのコンテキスト外では、ドラッグ＆ドロップペーストボードは使用できません。
  • コピー/ペーストペーストボードには、他のすべてのケースでアクセスできます。 ドラッグ＆ドロップペーストボードと異なり、そこに置かれたデータはクリアされるか再利用されるまで、セッション中保持されます。

データのタイプ​

ドラッグ＆ドロップアクション中、異なるタイプのデータがペーストボードに置かれたり、あるいはペーストボードから読み込まれます。 データタイプには複数の方法でアクセスします:

  • 4Dシグネチャ: 4Dシグネチャは4Dアプリケーションにより参照されるデータタイプを示す文字列です。 4D シグネチャはmacOS およびWindows で同じであるため、マルチプラットフォームアプリケーションの開発に適しています。 4D シグネチャの一覧は以下に示します。
  • UTI (Uniform Type Identifier, macOS のみ): Apple 社が定めるUTI 標準は、ネイティブタイプのオブジェクトごとに文字列を割り当てたものです。 例えば GIFピクチャーには UTIタイプ “com.apple.gif” が割り当てられています。 UTI は Apple社のドキュメント、あるいは関連するエディターで公開されています。
  • 数値またはフォーマット名 (Windowsのみ): Windowsでは、ネイティブデータタイプは数値 (“3”, “12”, 等) と名前 (“Rich Text Edit”)で参照されます。 デフォルトでMicrosoft社は標準データフォーマットと呼ばれるネイティブタイプを複数定義しています。 さらにサードパーティーエディターはシステムにフォーマットを “保存” し、対応する番号を得ることもできます。 この点に関する詳細とネイティブタイプについては、Microsoft developer documentation (特に http://msdn2.microsoft.com/en-us/library/ms649013.aspx ) を参照してください。
注

4D コマンド中では、Windows のフォーマット番号はテキストとして処理されます。

“ペーストボード” テーマのコマンド は、これらのデータタイプのそれぞれ1つを使用できます。 GET PASTEBOARD DATA TYPE コマンドを使用して、これらのフォーマットそれぞれにおいてペーストボードに格納されているデータのデータタイプを取得することができます。

注

4文字のタイプ (TEXT, PICT やカスタムタイプ) は以前のバージョンの4D との互換性のために保持されています。

4D シグネチャ​

以下は標準の4D シグネチャとその詳細です:

署名説明
"com.4d.private.text.native"ネイティブ文字セットのテキスト
"com.4d.private.text.utf16"Unicode 文字セットのテキスト
"com.4d.private.text.rtf"リッチテキスト
"com.4d.private.picture.pict"PICT ピクチャーフォーマット
"com.4d.private.picture.png"PNG ピクチャーフォーマット
"com.4d.private.picture.gif"GIF ピクチャーフォーマット
"com.4d.private.picture.jfif"JPEG ピクチャーフォーマット
"com.4d.private.picture.emf"EMF ピクチャーフォーマット
"com.4d.private.picture.bitmap"BITMAP ピクチャーフォーマット
"com.4d.private.picture.tiff"TIFF ピクチャーフォーマット
"com.4d.private.picture.pdf"PDF ドキュメント
"com.4d.private.file.url"ファイルパス名