Кто знает, как сделать форму приёмником внешнего Drag-and-Drop'а?

Форум — Ответы ( К темам )

? Art: Кто знает, как сделать форму приёмником внешнего Drag-and-Drop'а? (31-03-2003 19:00:41)
Конкретная задача: получить значение ячейки MS Excel, которая была "перетащена" (dragged-and-dropped) в разработанное приложение. Если кто знает, как реализуется внешний drag-and-drop, или где про это прочитать, подскажите, пожалуйста.
ACD (01-04-2003 03:36:43)

В конструкторе формы — DragAcceptFiles(Handle,true);
В хеддере , например так
public:
void __fastcall onDropFl(TWMDropFiles& Message);

BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_DROPFILES,TWMDropFiles,onDropFl);
END_MESSAGE_MAP(TForm)

Далее , в реализуешь это в .cpp
void __fastcall TForm1::onDropFl(TWMDropFiles& Message)
{
char path[MAX_PATH];
HWND hw;
int nFiles;

HDROP drop=(HDROP)Message.Drop;
nFiles=DragQueryFile(drop,-1,NULL,NULL);
for(int i=0;i<nFiles;i++)
{DragQueryFile(drop,i,path,sizeof(path));
...;}

DragQueryPoint(drop,&point);
DragFinish(drop);
}

В коде может быть что-то лишнее — просто скопировал кусок из одного проекта и удалил не относящееся к вопросу.

ACD (01-04-2003 03:41:16)

Хотя если перетаскивать ячейку Excel то не знаю , что будет в path , и что вообще вернет DragQueryFile.

Art (01-04-2003 11:12:29)

ACD, cпасибо, конечно, но это не помогает. Ты предлагаешь зарегистрировать приложение как приёмник сообщения WM_DROPFILES функцией DragAcceptFiles, а затем повестить на это сообщение свой обработчик. Это здорово, но мне файлы не нужны (компоненты-приёмники/источники dragged-and-dropped URL, BMP, файлов и папок созданы ещё для Delphi 4 — правда они коряво портируются в C++ Builder 5.0), а нужен мне ЛЮБОЙ DragOver/DragDrop из других приложений.
В WinSigth есть Message wm_dropObject — прямо по соседству с WM_DROPFILES. Одна проблема: я не знаю как зарегистрировать приложение на получение этого сообщения!
HELP!!!!

ACD (03-04-2003 03:10:34)

Смотрел в MSDN WM_DROPOBJECT не нашел.
Что то есть по IDropTarget Interface :
RegisterDragDrop(),RevokeDragDrop()...
но как это все применить в билдере не известно.

Art (03-04-2003 12:06:22)

ACD, большое спасибо за такое участие!
Я уже нашёл нужный компонент TTextDropTarget — поставляется с 6-м Builder'ом. Excel при начале Drag'а создаёт свой мультиинтерфейсный DragObject, который в том числе поддерживает CF_TEXT. Теперь экспериментирую, как получить из этого DragObject'а все поддерживаемые им форматы: должно получиться как в офисном PasteSpecial.
Ещё раз спасибо. ;-)

?	Art: Кто знает, как сделать форму приёмником внешнего Drag-and-Drop'а? (31-03-2003 19:00:41)
Конкретная задача: получить значение ячейки MS Excel, которая была "перетащена" (dragged-and-dropped) в разработанное приложение. Если кто знает, как реализуется внешний drag-and-drop, или где про это прочитать, подскажите, пожалуйста.
ACD (01-04-2003 03:36:43)
В конструкторе формы — DragAcceptFiles(Handle,true); В хеддере , например так public: void __fastcall onDropFl(TWMDropFiles& Message); BEGIN_MESSAGE_MAP MESSAGE_HANDLER(WM_DROPFILES,TWMDropFiles,onDropFl); END_MESSAGE_MAP(TForm) Далее , в реализуешь это в .cpp void __fastcall TForm1::onDropFl(TWMDropFiles& Message) { char path[MAX_PATH]; HWND hw; int nFiles; HDROP drop=(HDROP)Message.Drop; nFiles=DragQueryFile(drop,-1,NULL,NULL); for(int i=0;i<nFiles;i++) {DragQueryFile(drop,i,path,sizeof(path)); ...;} DragQueryPoint(drop,&point); DragFinish(drop); } В коде может быть что-то лишнее — просто скопировал кусок из одного проекта и удалил не относящееся к вопросу.
ACD (01-04-2003 03:41:16)
Хотя если перетаскивать ячейку Excel то не знаю , что будет в path , и что вообще вернет DragQueryFile.
Art (01-04-2003 11:12:29)
ACD, cпасибо, конечно, но это не помогает. Ты предлагаешь зарегистрировать приложение как приёмник сообщения WM_DROPFILES функцией DragAcceptFiles, а затем повестить на это сообщение свой обработчик. Это здорово, но мне файлы не нужны (компоненты-приёмники/источники dragged-and-dropped URL, BMP, файлов и папок созданы ещё для Delphi 4 — правда они коряво портируются в C++ Builder 5.0), а нужен мне ЛЮБОЙ DragOver/DragDrop из других приложений. В WinSigth есть Message wm_dropObject — прямо по соседству с WM_DROPFILES. Одна проблема: я не знаю как зарегистрировать приложение на получение этого сообщения! HELP!!!!
ACD (03-04-2003 03:10:34)
Смотрел в MSDN WM_DROPOBJECT не нашел. Что то есть по IDropTarget Interface : RegisterDragDrop(),RevokeDragDrop()... но как это все применить в билдере не известно.
Art (03-04-2003 12:06:22)
ACD, большое спасибо за такое участие! Я уже нашёл нужный компонент TTextDropTarget — поставляется с 6-м Builder'ом. Excel при начале Drag'а создаёт свой мультиинтерфейсный DragObject, который в том числе поддерживает CF_TEXT. Теперь экспериментирую, как получить из этого DragObject'а все поддерживаемые им форматы: должно получиться как в офисном PasteSpecial. Ещё раз спасибо. ;-)