diff options
Diffstat (limited to 'dtrans/test/win32/dnd/atlwindow.cxx')
| -rw-r--r-- | dtrans/test/win32/dnd/atlwindow.cxx | 265 |
1 files changed, 0 insertions, 265 deletions
diff --git a/dtrans/test/win32/dnd/atlwindow.cxx b/dtrans/test/win32/dnd/atlwindow.cxx deleted file mode 100644 index fab9587a70..0000000000 --- a/dtrans/test/win32/dnd/atlwindow.cxx +++ /dev/null @@ -1,265 +0,0 @@ -/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ - -// MARKER(update_precomp.py): autogen include statement, do not remove -#include "precompiled_dtrans.hxx" - -#include <com/sun/star/uno/Reference.h> -#include <com/sun/star/lang/XComponent.hpp> -#include <com/sun/star/lang/XInitialization.hpp> -#include <com/sun/star/datatransfer/dnd/XDropTarget.hpp> -#include <com/sun/star/datatransfer/dnd/DNDConstants.hpp> - -#include <cppuhelper/servicefactory.hxx> -#include <rtl/string.h> - -#include "atlwindow.hxx" -#include "targetlistener.hxx" -#include "sourcelistener.hxx" -#include <map> - -#include <winbase.h> -using namespace com::sun::star::lang; -using namespace com::sun::star::datatransfer::dnd; -using namespace com::sun::star::datatransfer::dnd::DNDConstants; -using namespace cppu; -using namespace std; - -using ::rtl::OUString; - -LRESULT APIENTRY EditSubclassProc( HWND hwnd, UINT uMsg,WPARAM wParam, LPARAM lParam) ; - - -extern Reference< XMultiServiceFactory > MultiServiceFactory; -DWORD WINAPI MTAFunc(LPVOID pParams); - -char* szSTAWin= "XDragSource::executeDrag is called from the same " - "OLE STA thread that created the window."; -char* szMTAWin= "XDragSource::executeDrag is called from a MTA thread " - "that did not create the window."; - -WNDPROC wpOrigEditProc; - -map<HWND, HWND> mapEditToMainWnd; - -LRESULT AWindow::OnClose(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled) -{ - Reference<XComponent> xcompSource( m_xDragSource, UNO_QUERY); - - PostQuitMessage(0); - - - m_xDropTarget=0; - m_xDragSource=0; - - - // Remove the subclass from the edit control. - ::SetWindowLong(m_hwndEdit, GWL_WNDPROC, - (LONG) wpOrigEditProc); - - return 0; -} - - -LRESULT AWindow::OnCreate(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled) -{ - // Prepare the EDIT control - m_hwndEdit = CreateWindowA( - "EDIT", // predefined class - NULL, // no window title - WS_CHILD | WS_VISIBLE | WS_VSCROLL | - ES_LEFT | ES_MULTILINE | ES_AUTOVSCROLL, - 0, 0, 0, 0, // set size in WM_SIZE message - m_hWnd, // parent window - (HMENU) NULL, // edit control ID - (HINSTANCE) GetWindowLong( GWL_HINSTANCE), - NULL); - - // the map is used in the window procedure for the edit window to associate the - // it to the right main window ( AWindow) - mapEditToMainWnd[m_hwndEdit]= m_hWnd; - // Superclass the edit window, because we want to process mouse messages - wpOrigEditProc = (WNDPROC) ::SetWindowLongA(m_hwndEdit, - GWL_WNDPROC, (LONG) EditSubclassProc); - - - // Add text to the window. - if( m_isMTA) - ::SendMessageA(m_hwndEdit, WM_SETTEXT, 0, (LPARAM) szMTAWin); - else - ::SendMessageA(m_hwndEdit, WM_SETTEXT, 0, (LPARAM) szSTAWin); - - - // create the DragSource - Reference< XInterface> xint= MultiServiceFactory->createInstance(OUString(L"com.sun.star.datatransfer.dnd.OleDragSource")); - m_xDragSource= Reference<XDragSource>( xint, UNO_QUERY); - Reference<XInitialization> xInit( xint, UNO_QUERY); - - Any ar[2]; - ar[1]<<= (sal_uInt32)m_hWnd; - xInit->initialize( Sequence<Any>( ar, 2) ); - - //create the DropTarget - Reference< XInterface> xintTarget= MultiServiceFactory->createInstance(OUString(L"com.sun.star.datatransfer.dnd.OleDropTarget")); - m_xDropTarget= Reference<XDropTarget>( xintTarget, UNO_QUERY); - Reference<XInitialization> xInitTarget( xintTarget, UNO_QUERY); - - Any any; - any <<= (sal_uInt32)m_hWnd; - xInitTarget->initialize( Sequence<Any>( &any, 1) ); - - - m_xDropTarget->addDropTargetListener( static_cast<XDropTargetListener*> - ( new DropTargetListener( m_hwndEdit)) ); -// // make this window tho a drop target - m_xDropTarget->setActive(sal_True); - - return 0; -} - -// When the mouse is dragged for a second than a drag is initiated -LRESULT AWindow::OnMouseAction(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled) -{ - if( uMsg== WM_LBUTTONDOWN) - { - SetTimer( 1, 1000); - } - - else if( uMsg == WM_LBUTTONUP) - { - KillTimer( 1); - } - - return 0; -} - -LRESULT AWindow::OnTimer(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled) -{ - HRESULT hr; - USES_CONVERSION; - KillTimer( 1); - if(m_xDragSource.is()) - { - - //Get the Text out of the Edit window - int length= (int)::SendMessageA( m_hwndEdit, WM_GETTEXTLENGTH, 0, 0); - char * pBuffer= new char[length + 1]; - ZeroMemory( pBuffer, length + 1); - ::SendMessageA( m_hwndEdit, WM_GETTEXT, length, (LPARAM) pBuffer); - - IDataObject* pData= NULL; - HRESULT hr= CreateDataCache( NULL, CLSID_NULL, __uuidof(IDataObject),(void**) &pData); - if( pData) - { - FORMATETC format={ CF_TEXT, NULL, DVASPECT_CONTENT, -1, }; - - HGLOBAL mem= GlobalAlloc(GHND, length + 1 ); - void* pMem= GlobalLock( mem); - memcpy( pMem, pBuffer, length+1); - GlobalUnlock( mem); - - STGMEDIUM medium; - medium.tymed= TYMED_HGLOBAL; - medium.hGlobal= mem; - medium.pUnkForRelease= NULL; - - pData->SetData( &format, &medium, TRUE); // releases HGLOBAL eventually - - Reference<XTransferable> xTrans= m_aDataConverter.createTransferableFromDataObj( - MultiServiceFactory, pData); - - // call XDragSource::executeDrag from an MTA - if( m_isMTA ) - { - DWORD mtaThreadId; - ThreadData data; - data.source= m_xDragSource; - data.transferable= xTrans; - - data.evtThreadReady= CreateEvent( NULL, FALSE, FALSE, NULL); - - HANDLE hThread= CreateThread( NULL, 0, MTAFunc, &data, 0, &mtaThreadId); - // We must wait until the thread copied the ThreadData structure - WaitForSingleObject( data.evtThreadReady, INFINITE); - CloseHandle( data.evtThreadReady); - - - } - else - { - m_xDragSource->startDrag( DragGestureEvent(), - ACTION_LINK|ACTION_MOVE|ACTION_COPY, - 0, - 0, - xTrans, - Reference<XDragSourceListener>( static_cast<XDragSourceListener*>(new DragSourceListener() ) ) ); - } - } - - delete[] pBuffer; - } - - return 0; -} - -LRESULT AWindow::OnSize(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled) -{ - // Make the edit control the size of the window's - // client area. - ::MoveWindow(m_hwndEdit, - 0, 0, // starting x- and y-coordinates - LOWORD(lParam), // width of client area - HIWORD(lParam), // height of client area - TRUE); // repaint window - - return 0; -} -LRESULT AWindow::OnFocus(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled) -{ - ::SetFocus(m_hwndEdit); - return 0; -} - - - -// Subclass procedure for EDIT window -LRESULT APIENTRY EditSubclassProc( HWND hwnd, UINT uMsg,WPARAM wParam, LPARAM lParam) -{ - - if( uMsg >= WM_MOUSEFIRST && uMsg <= WM_MOUSELAST) - { - HWND hAWindow= mapEditToMainWnd[hwnd]; - ::SendMessage( hAWindow, uMsg, wParam, lParam); - - } - return CallWindowProc( wpOrigEditProc, hwnd, uMsg, - wParam, lParam); -} - - -/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |