Sorry Nages, When I create the new record I made : aItems:=AddFirstRecord(1,cDescElemento,ncella,; dFirst,dLast,cSettore,nImage, ; lStagioneIntera,nInvoice) this function return me an array empty aTmp:={} if the search is positive ( found the record) this function returns an empty ...
... http://www.iispascalcomiforti.it/wp-content/uploads/2016/12/esempio.jpg 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 ...
... on class TTreeView: - GetSelected() -> oItem - Select( oItem ) - DeleteAll() - HitTest( nRow, nCol ) New datas on class TTVItem: - cPrompt - nImage New method on class TTVItem: - DeleteBranches() Actually this two classes make the standard TreeView window completely usable, but only for FWH. ...
... on class TTreeView: - GetSelected() -> oItem - Select( oItem ) - DeleteAll() - HitTest( nRow, nCol ) New datas on class TTVItem: - cPrompt - nImage New method on class TTVItem: - DeleteBranches() Actually this two classes make the standard TreeView window completely usable, but only for FWH. ...
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( ...
... from Class TBtnBmp: nBmpWidth() was used instead of nBmpHeight(). Now it is ok. * Enhancement: Class TTreeView new Methods SetItemImage( oItem, nImage ) and SetItemHeight( nHeight ), thanks to Manuel Calero! * Enhancement: Class TBtnFlat Method Redefine() is already available. It was missing. ...
Buen dia a todos: Mi idea es esta, siguiendo los paramentros de el Metodo ADD() de Treeview oItem:Add( cPrompt, nImage, nValue } ) oItem:Add( "Volumen 15151441", 2, "F78T47D" ) que armado desde un arreglo que esta sí: LOCAL aData:= {{"Unidades ...
Thanks a lot for all the Help. I added : cImage := cPath + "\_" + cOnlyName + "_" + StrZero(nImage,3) + "." + cExtension that works fine for me. I still have to check a list of round about 500 different Fileformats. I will test the formats ( Export ...
Dietmar, > Even then we would need a parameter for the font when the item is added in FWH, don't we? oItem1 = oTree:Add( cPrompt, nImage, nValue, xxxoFontxxx ) or similar Can this be done in the (near) future? > Yes, though it is much more complex than that. You can check Class TWindow, ...