Delphi相談室(超初心者用)その11
■ このスレッドは過去ログ倉庫に格納されています
0448デフォルトの名無しさん
NGNGうーむ、もっとも簡単なのは、ただ、ドロップファイルを受け取って、イベントハンドラ
を呼び出すだけの TPanel 派生コンポです。そのイベントハンドラで、設計時にコードで
受け取ったファイルの処理をするようすればいいのでは。上に載せるのは TImage でも
TPaintBox でも TLabel でもなでもいいので、設計時にのせたらいいのでは?
コンストラクタでウィンドウハンドルが取れないことがあるのは事実で、たしか、
>>441 のようなメソッドをoverrideしてウィンドウが作られたあとにする必要が
あったと思います。わたしだったら、DropEnable:Boolean というプロパティーを
作り、デフォルトで false にしておき、オブジェクトインスペクタやコードで
true にしたとき、DragAcceptFiles() を実行するようにします。false のときも
そうですが。
あと、procedure WMDropFiles(var Msg:TWMDropFile):message WM_DROPFILES;
というメッセージ処理手続きをくっつけるだけです。
■ このスレッドは過去ログ倉庫に格納されています