Files
harbour-core/harbour/contrib/hbwhat32/_winilst.c
Viktor Szakats e7d2031895 2007-12-01 02:55 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/make_b32_all.bat
   * contrib/make_vc_all.bat
   * contrib/Makefile
   - contrib/telepath
   + contrib/hbtpathy
   * contrib/hbtpathy/common.mak
   * contrib/hbtpathy/Makefile
   - contrib/what32
   + contrib/hbwhat32
   - contrib/win32
   + contrib/hbw32
   * contrib/hbw32/common.mak
   * contrib/hbw32/Makefile
   - contrib/adordd
   + contrib/hbrddado
   - contrib/gtwvg
   + contrib/hbgtwvg
   - contrib/rdd_ads
   + contrib/hbrddads
   - contrib/tip
   + contrib/hbtip
   * contrib/hbtip/common.mak
   * contrib/hbtip/Makefile
   - contrib/bmdbfcdx
   + contrib/hbbmcdx
   * contrib/hbct/Makefile
   * contrib/hbct/common.mak
   * contrib/hbgt/common.mak
   * contrib/hbgt/Makefile
   * contrib/hbnf/common.mak
   * contrib/hbnf/Makefile
     * Contrib lib rename finished.
     ; Please report build (or other) problems.
2007-12-01 01:56:25 +00:00

362 lines
12 KiB
C

/*
* $Id$
*/
// What32
// ImageList functions
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400
#define _WIN32_IE 0x0500
#include <windows.h>
#include <commctrl.h>
#include "hbapi.h"
extern BOOL Array2Point(PHB_ITEM aPoint, POINT *pt );
//-----------------------------------------------------------------------------
//WINCOMMCTRLAPI HIMAGELIST WINAPI ImageList_Create(int cx, int cy, UINT flags, int cInitial, int cGrow);
HB_FUNC( IMAGELIST_CREATE )
{
HIMAGELIST ilist;
ilist = ImageList_Create( hb_parni(1), hb_parni(2), hb_parnl(3), hb_parni(4), hb_parni(5));
hb_retnl((LONG) ilist);
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI int WINAPI ImageList_ReplaceIcon(HIMAGELIST himl, int i, HICON hicon);
HB_FUNC( IMAGELIST_REPLACEICON )
{
hb_retni( ImageList_ReplaceIcon( (HIMAGELIST) hb_parnl(1),
(int) hb_parni(2) ,
(HICON) hb_parnl(3) ) ) ;
}
//-----------------------------------------------------------------------------
//#define ImageList_AddIcon(himl, hicon) ImageList_ReplaceIcon(himl, -1, hicon)
HB_FUNC( IMAGELIST_ADDICON )
{
hb_retni( ImageList_AddIcon( (HIMAGELIST) hb_parnl(1), (HICON) hb_parnl(2) ) );
}
//-----------------------------------------------------------------------------
// ImageList_Destroy(HIMAGELIST himl);
HB_FUNC( IMAGELIST_DESTROY )
{
hb_retl( ImageList_Destroy( (HIMAGELIST) hb_parnl(1) ) );
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI int WINAPI ImageList_GetImageCount(HIMAGELIST himl);
HB_FUNC( IMAGELIST_GETIMAGECOUNT )
{
hb_retni( ImageList_GetImageCount((HIMAGELIST) hb_parnl(1) ) );
}
//-----------------------------------------------------------------------------
// ImageList_SetImageCount(HIMAGELIST himl, UINT uNewCount);
HB_FUNC( IMAGELIST_SETIMAGECOUNT )
{
hb_retl( ImageList_SetImageCount((HIMAGELIST) hb_parnl( 1 ),
(UINT) hb_parni( 2 ) ) ) ;
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI int WINAPI ImageList_Add(HIMAGELIST himl, HBITMAP hbmImage, HBITMAP hbmMask);
HB_FUNC( IMAGELIST_ADD )
{
hb_retni( ImageList_Add((HIMAGELIST) hb_parnl( 1 ),
(HBITMAP) hb_parnl( 2 ) ,
(HBITMAP) hb_parnl( 3 ))) ;
}
//-----------------------------------------------------------------------------
//WINCOMMCTRLAPI COLORREF WINAPI ImageList_SetBkColor(HIMAGELIST himl, COLORREF clrBk);
HB_FUNC( IMAGELIST_SETBKCOLOR )
{
hb_retnl( (LONG) ImageList_SetBkColor((HIMAGELIST) hb_parnl( 1 ),
(COLORREF) hb_parnl( 2 )));
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI COLORREF WINAPI ImageList_GetBkColor(HIMAGELIST himl);
HB_FUNC( IMAGELIST_GETBKCOLOR )
{
hb_retnl( (LONG) ImageList_GetBkColor((HIMAGELIST) hb_parnl( 1 )));
}
//-----------------------------------------------------------------------------
// ImageList_SetOverlayImage(HIMAGELIST himl, int iImage, int iOverlay);
HB_FUNC( IMAGELIST_SETOVERLAYIMAGE )
{
hb_retl( ImageList_SetOverlayImage((HIMAGELIST) hb_parnl( 1 ) ,
hb_parni(2), hb_parni(3)));
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI BOOL WINAPI ImageList_Draw(HIMAGELIST himl, int i, HDC hdcDst,;
// int x, int y, UINT fStyle);
HB_FUNC( IMAGELIST_DRAW )
{
hb_retl( ImageList_Draw((HIMAGELIST) hb_parnl( 1 ), hb_parni(2) ,
(HDC) hb_parnl(3), hb_parni(4), hb_parni(5),
(UINT) hb_parni(6))) ;
}
//-----------------------------------------------------------------------------
// ImageList_Replace(HIMAGELIST himl, int i, HBITMAP hbmImage, HBITMAP hbmMask);
HB_FUNC( IMAGELIST_REPLACE )
{
hb_retl( ImageList_Replace((HIMAGELIST) hb_parnl( 1 ),
hb_parni( 2 ) ,
(HBITMAP) hb_parnl(3) ,
(HBITMAP) hb_parnl(4))) ;
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI int WINAPI ImageList_AddMasked(HIMAGELIST himl, HBITMAP hbmImage, COLORREF crMask);
HB_FUNC( IMAGELIST_ADDMASKED )
{
hb_retni( ImageList_AddMasked((HIMAGELIST) hb_parnl( 1 ) ,
(HBITMAP) hb_parnl( 2 ) ,
(COLORREF) hb_parnl( 3 )));
}
//-----------------------------------------------------------------------------
// ImageList_DrawEx(HIMAGELIST himl, int i, HDC hdcDst, int x, int y, int dx, ;
// int dy, COLORREF rgbBk, COLORREF rgbFg, UINT fStyle);
HB_FUNC( IMAGELIST_DRAWEX )
{
hb_retl( ImageList_DrawEx((HIMAGELIST) hb_parnl( 1 ), hb_parni( 2 ) ,
(HDC) hb_parnl( 3 ), hb_parni(4), hb_parni(5) ,
hb_parni(6), hb_parni(7),(COLORREF)hb_parnl(8),
(COLORREF) hb_parnl(9), (UINT) hb_parni(10))) ;
}
//-----------------------------------------------------------------------------
// ImageList_DrawIndirect(IMAGELISTDRAWPARAMS* pimldp);
// uses structure
HB_FUNC( IMAGELIST_DRAWINDIRECT )
{
IMAGELISTDRAWPARAMS *pimldp = ( IMAGELISTDRAWPARAMS *) hb_parc( 1 ); //hb_param( 1, HB_IT_STRING )->item.asString.value ;
hb_retl( ImageList_DrawIndirect( pimldp ) );
}
//-----------------------------------------------------------------------------
// ImageList_Remove(HIMAGELIST himl, int i);
HB_FUNC( IMAGELIST_REMOVE )
{
hb_retl( ImageList_Remove((HIMAGELIST) hb_parnl( 1 ), hb_parni( 2 )));
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI HICON WINAPI ImageList_GetIcon(HIMAGELIST himl, int i, UINT flags);
HB_FUNC( IMAGELIST_GETICON )
{
hb_retnl( (LONG) ImageList_GetIcon((HIMAGELIST) hb_parnl( 1 ),
hb_parni( 2 ) ,
(UINT) hb_parni(3))) ;
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI HIMAGELIST WINAPI ImageList_LoadImageA(HINSTANCE hi, LPCSTR lpbmp,;
// int cx, int cGrow,(COLORREF)crMask, UINT uType, UINT uFlags);
HB_FUNC( IMAGELIST_LOADIMAGE )
{
hb_retnl( (LONG) ImageList_LoadImageA( (HINSTANCE) hb_parnl(1),
ISCHAR(2)?(LPCSTR) hb_parcx(2) : MAKEINTRESOURCE(hb_parni(2)) ,
hb_parni(3) ,
hb_parni(4) ,
(COLORREF) hb_parnl(5),
(UINT) hb_parni(6) ,
(UINT) hb_parni(7))) ;
}
//-----------------------------------------------------------------------------
// ImageList_Copy(HIMAGELIST himlDst, int iDst, HIMAGELIST himlSrc, int iSrc, UINT uFlags);
HB_FUNC( IMAGELIST_COPY )
{
hb_retl( ImageList_Copy((HIMAGELIST) hb_parnl( 1 ),
hb_parni( 2 ) ,
(HIMAGELIST) hb_parnl( 3 ),
hb_parni( 4 ) ,
(UINT) hb_parni(5))) ;
}
//-----------------------------------------------------------------------------
// ImageList_BeginDrag(HIMAGELIST himlTrack, int iTrack, int dxHotspot, int dyHotspot);
HB_FUNC( IMAGELIST_BEGINDRAG )
{
hb_retl( ImageList_BeginDrag((HIMAGELIST) hb_parnl( 1 ),
hb_parni( 2 ) ,
hb_parni( 3 ) ,
hb_parni( 4 ))) ;
}
//-----------------------------------------------------------------------------
#if defined(__MINGW32__) || defined(__WATCOMC__)
void WINAPI ImageList_EndDrag(void);
#else
WINCOMMCTRLAPI void WINAPI ImageList_EndDrag(void);
#endif
HB_FUNC( IMAGELIST_ENDDRAG )
{
ImageList_EndDrag() ;
}
//-----------------------------------------------------------------------------
// ImageList_DragEnter(HWND hwndLock, int x, int y);
HB_FUNC( IMAGELIST_DRAGENTER )
{
hb_retl( ImageList_DragEnter( (HWND) hb_parnl(1), hb_parni(2), hb_parni(3)));
}
//-----------------------------------------------------------------------------
// ImageList_DragLeave(HWND hwndLock);
HB_FUNC( IMAGELIST_DRAGLEAVE )
{
hb_retl( ImageList_DragLeave( (HWND) hb_parnl(1)));
}
//-----------------------------------------------------------------------------
// ImageList_DragMove(int x, int y);
HB_FUNC( IMAGELIST_MOVE )
{
hb_retl( ImageList_DragMove( hb_parni(1), hb_parni(2)));
}
//-----------------------------------------------------------------------------
// ImageList_SetDragCursorImage(HIMAGELIST himlDrag, int iDrag, int dxHotspot, int dyHotspot);
HB_FUNC( IMAGELIST_SETDRAGCURSORIMAGE )
{
hb_retl( ImageList_SetDragCursorImage((HIMAGELIST) hb_parnl( 1 ),
hb_parni( 2 ) ,
hb_parni( 3 ) ,
hb_parni( 4 ))) ;
}
//-----------------------------------------------------------------------------
// ImageList_DragShowNolock(BOOL fShow);
HB_FUNC( IMAGELIST_DRAGSHOWNOLOCK )
{
hb_retl( ImageList_DragShowNolock( hb_parl( 1 )));
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI HIMAGELIST WINAPI ImageList_GetDragImage(POINT FAR* ppt,POINT FAR* pptHotspot);
HB_FUNC( IMAGELIST_GETDRAGIMAGE )
{
POINT pt ;
POINT ptHotspot ;
PHB_ITEM aPt1 = hb_param(1,HB_IT_ARRAY);
PHB_ITEM aPt2 = hb_param(2,HB_IT_ARRAY);
if ( Array2Point(aPt1,&pt) )
if( Array2Point(aPt2,&ptHotspot) )
hb_retnl( (LONG) ImageList_GetDragImage( &pt, &ptHotspot));
}
//-----------------------------------------------------------------------------
// ImageList_GetIconSize(HIMAGELIST himl, int FAR *cx, int FAR *cy);
HB_FUNC( IMAGELIST_GETICONSIZE )
{
int cx ;
int cy ;
if ( ImageList_GetIconSize((HIMAGELIST) hb_parnl( 1 ), &cx, &cy) )
{
hb_storni( cx, 2 );
hb_storni( cy, 3 );
hb_retl( 1 );
}
else
hb_retl(0);
}
//-----------------------------------------------------------------------------
// ImageList_SetIconSize(HIMAGELIST himl, int cx, int cy);
HB_FUNC( IMAGELIST_SETICONSIZE )
{
hb_retl( ImageList_SetIconSize((HIMAGELIST) hb_parnl( 1 ) ,
hb_parni( 2 ), hb_parni( 3 ) ) );
}
//-----------------------------------------------------------------------------
// ImageList_GetImageInfo(HIMAGELIST himl, int i, IMAGEINFO FAR* pImageInfo);
// returns structure buffer
HB_FUNC( IMAGELIST_GETIMAGEINFO )
{
IMAGEINFO ii ;
if ( ImageList_GetImageInfo((HIMAGELIST) hb_parnl( 1 ), hb_parni( 2 ), &ii ) )
hb_retclen( (char*) &ii, sizeof(IMAGEINFO));
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI HIMAGELIST WINAPI ImageList_Merge(HIMAGELIST himl1, int i1, HIMAGELIST himl2, int i2, int dx, int dy);
HB_FUNC( IMAGELIST_MERGE )
{
hb_retnl( (LONG) ImageList_Merge((HIMAGELIST) hb_parnl( 1 ),
hb_parni( 2 ) ,
(HIMAGELIST) hb_parnl( 3 ),
hb_parni( 4 ) ,
hb_parni( 5 ) ,
hb_parni( 6 ))) ;
}
//-----------------------------------------------------------------------------
// WINCOMMCTRLAPI HIMAGELIST WINAPI ImageList_Duplicate(HIMAGELIST himl);
HB_FUNC( IMAGELIST_DUPLICATE )
{
hb_retnl( (LONG) ImageList_Duplicate((HIMAGELIST) hb_parnl( 1 )));
}