VPF::Drag&Drop >> Image - Форум программистов

Geniy00

Дата 13.6.2007, 23:56 (ссылка)

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

Загрузка ...

Новичок

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

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

Добрый день.

Как занести в Image какойто рисунок с рабочего стола(например), через Drag&Drop ?

SenkraD

Дата 14.6.2007, 08:57 (ссылка)

(голосов:1)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 933
Регистрация: 3.2.2006
Где: Украина::Киев

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

Вот так:

Код


// h-файл
TWndMethod m_lpfnOldProc;
void __fastcall NewProc(Messages::TMessage &Message);

// cpp-файл
// конструктор формы
DragAcceptFiles(Handle, true);
m_lpfnOldProc = WindowProc;
WindowProc    = NewProc;

//функция обработчик
void __fastcall TForm1::NewProc(Messages::TMessage &Message)
{
    HDROP  hDrop;
    int         nIndex;
    int         nFilesCount;
    char      szFileName[MAX_PATH];

    if(Message.Msg == WM_DROPFILES)
    {
         hDrop      = (HDROP)Message.WParam;
         nFilesCount = DragQueryFile(hDrop, 0xffffffff, NULL, 0);
         //for(nIndex = 0; nIndex < nFilesCount; nIndex ++)
         //{
             DragQueryFile(hDrop, /*nIndex*/0, szFileName, sizeof(szFileName));
             // Тут бы не помешало бы проверить файл на предмет это картинка или нет
             Image1->Picture->LoadFromFile(szFileName);
         //}
    }
     m_lpfnOldProc(Message);
}

--------------------

Имеющий язык - да не убоится спросить!

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