VPF::Drag an Drop на форму - Форум программистов

lamber

Дата 9.8.2010, 11:25 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 143
Регистрация: 20.12.2008

Репутация: нет
Всего: нет

Тема в следующем, не получается бросить файлы на форму, дулай как в мануле. (вот манул http://www.compdoc.ru/prog/builder/dragdrop/). Создаю два обработчика для формы OnDragDrop и OnDragOver. Вот код ниже

Код


void __fastcall TForm3::FormOnDragOver(TObject *Sender, TObject *Source, int X,
      int Y, TDragState State, bool &Accept)
{
Accept=true;

}
//---------------------------------------------------------------------------
void __fastcall TForm3::FormOnDragDrop(TObject *Sender, TObject *Source, int X,
      int Y)
{
TStringList* fString= (TStringList*)Source;
Label1->Caption= IntToStr(fString->Count);
}

В свойствах формы также ставлю dkMode:dmAutomatic DragKind:dkDrag

Использую Builder 2007
Проект компилится, но когда перетаскиваю файл на форму получаю значок запрета перетаскивания.

0x00

Дата 9.8.2010, 11:58 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 192
Регистрация: 3.4.2006

Репутация: нет
Всего: нет

при onCreate формы сделай

Код


this->DragMode = dmAutomatic;

Это сообщение отредактировал(а) 0x00 - 9.8.2010, 12:00

lamber

Дата 9.8.2010, 12:07 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 143
Регистрация: 20.12.2008

Репутация: нет
Всего: нет

Я это уже сделал в настройках формы, опечатался не dkMode, а DragMode в первом посте. Щас попробовал и явно указать при создании формы. все равно не помогает.

0x00

Дата 9.8.2010, 13:06 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 192
Регистрация: 3.4.2006

Репутация: нет
Всего: нет

Цитата(lamber @ 9.8.2010, 12:07)

вот так вроде получилось добавил BEGIN_MESSAGE_MAP
и в конструкторе DragAcceptFiles

Код


//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TForm3 : public TForm
{
__published:    // IDE-managed Components
    TLabel *Label1;
    TLabel *Label2;
    void __fastcall WmDropFiles(TWMDropFiles& Message);
private:    // User declarations
public:        // User declarations
    __fastcall TForm3(TComponent* Owner);

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

};
//---------------------------------------------------------------------------
extern PACKAGE TForm3 *Form3;
//---------------------------------------------------------------------------
#endif

Код


//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm3 *Form3;
//---------------------------------------------------------------------------
__fastcall TForm3::TForm3(TComponent* Owner):TForm(Owner)
{
    DragAcceptFiles(Handle,true);
}
//---------------------------------------------------------------------------
void __fastcall TForm3::WmDropFiles(TWMDropFiles& Message)
{
    Application->MessageBoxA(L"1", L"1", NULL);
};
//---------------------------------------------------------------------------

lamber

Дата 9.8.2010, 14:46 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 143
Регистрация: 20.12.2008

Репутация: нет
Всего: нет

Я видел такой метод, а не существует более лаконичного чтоб это через IDE сделать а не через Win API ?

0x00

Дата 9.8.2010, 15:50 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 192
Регистрация: 3.4.2006

Репутация: нет
Всего: нет

Цитата(lamber @ 9.8.2010, 11:25)

Использую Builder 2007
Проект компилится, но когда перетаскиваю файл на форму получаю значок запрета перетаскивания.

в конструкторе DragAcceptFiles(Handle, true); изменяет значок, а события через ИДЕ обрабатывай, тебе никто не мешает..

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »