... möglicher Datenverlust HB_FUNC.PRG(214): warning C4312: "Typumwandlung": Konvertierung von "long" in größeren Typ "HIMAGELIST" HB_FUNC.PRG(220): error C2440: "Initialisierung": "HANDLE" kann nicht in "HBITMAP" konvertiert werden ...
... lo que hice. Modificar el codigo asi y funciona para Harbour o xHarbour METHOD GetImageFromFile( cImageFile ) #ifdef __XHARBOUR__ IF HHasKey( ::hImageList, cImageFile ) RETURN ::hImageList[ cImageFile ] ENDIF #else IF HB_HHasKey( ::hImageList, cImageFile ) RETURN ::hImageList[ cImageFile ] ENDIF ...
... que esta en xHarbour\lib en Harbour es esta libhpdf.lib y el el fuente hacer esta modificacion METHOD GetImageFromFile( cImageFile ) IF HHasKey( ::hImageList, cImageFile ) //con harbour es HB_HHasKey como esta el fuente original RETURN ::hImageList[ cImageFile ] ENDIF Estupendo! Estoy pensando ...
... que esta en xHarbour\lib en Harbour es esta libhpdf.lib y el el fuente hacer esta modificacion METHOD GetImageFromFile( cImageFile ) IF HHasKey( ::hImageList, cImageFile ) //con harbour es HB_HHasKey como esta el fuente original RETURN ::hImageList[ cImageFile ] ENDIF Te pregunto este archivo i2of5txt.ttf ...
... you should convert the icon to a bitmap using FWH function BmpFromIcon() then instead of calling ILADDICON() you should use HB_FUNC( ILADD ) // ( HIMAGELIST himl, HBITMAP hbmImage, HBITMAP hbmMask ) or HB_FUNC( ILADDMASKED ) // ( HIMAGELIST himl, HBITMAP hbmImage, COLORREF nClrMask ) I just saw ...
... Now fopr save the image of the file into listview I made: nImage := Icon_Read(cFile) nImage := max(0,ILADDICON( oImageList:hImageList, nImage ) ) oItem = TListViewItem():New( oList ) oItem:cText = cFile oItem:nImage = nImage oItem:Create() but I save only the icon of the ...
Sorry Antonio, I have on Listview many items when I add a item I made nImage := Icon_Read(cNewfile) ILADDICON( oImageListSmall:hImageList, nImage ) nImage := max(0,ILADDICON( oImageListBig:hImageList, nImage ) ) DestroyIcon(nImage) oItem = TListViewItem():New( oList ) oItem:cText = cNewfile ...
Hello, I am adding a listView in our program, and I see that the ImageList is always created at 24bit with alpha, but I want add 32bit icons. Now I change oImageList:hImageList with one created with ILC_COLOR32. Here the difference:
Thank you so much ! I was working for 2~3 days because of that problem I did what you told me and it is really working well now Thank you for the answer!
Hello yunbg1. you first should convert Icon to Bitmap, i dont remember, but i think you can not use TYPE_IMAGE for this you can use the converted handle ( hicon to hbitmap ) and add in aBitmaps ( Column Bitmaps array ) with AddBmpHandle i show a sample... (include BmpFromIcon function ) #include &qu...
Hello yunbg1 SHGetFileInfo no return HIMAGELIST http://msdn.microsoft.com/en-us/library/bb762179(VS.85).aspx you can get the info from: SHFILEINFO *psfiDWORD_PTR SHGetFileInfo( LPCTSTR pszPath, DWORD dwFileAttributes, ...
Hi all. How can i get return 'HIMAGELIST' ? Will do how and the possibility which will receive this 'hImageList' is? ico := ICON_EXEREAD("test.exe") DEFINE ICON oIcon RESOURCE ico DEFINE WINDOW oWnd FROM 0, 0 TO 10, 10 TITLE "Test" ...
Fafi, to call class from FWH = oAct:Do("Imagelist", with FWH Imagelist ) Try this: oAct:SetProp( "Imagelist", oImageList:hImageList ) Can we create this RibbonBar with FWH CLASS together ? yes :-) Please post the VB code here or email it to me, and we will test it together. ...