| |
| |
|
Jac
de
Lad | here time a couple functions, The Rolands new Imagelisten around the strain, what me momentarily yet missing. ought to ex XProfan 1 Sub 11 functions. there's yet More Imagelist-functions, but the are The most important. If someone what missing, Please loudly scream.
CompileMarkSeparationDef ImageList_GetCount(1) !comctl32,ImageList_GetCount
Def ImageList_Duplicate(1) !comctl32,ImageList_Duplicate
Def ImageList_Copy(5) !comctl32,ImageList_Copy
Def ImageList_Destroy(1) !comctl32,ImageList_Destroy
Def ImageList_Remove(2) !comctl32,ImageList_Remove
subproc Imagelist.Remove
Löscht ein Bildchen aus einer Imagelist
Parameters handle&,pos%
Return Imagelist_Remove(handle&,pos%)
endproc
subproc Imagelist.RemoveAll
Löscht ein Bildchen aus einer Imagelist
Parameters handle&
while 0,GetCount(Imagelist(GetCount,handle&))-1
Imagelist_Remove(handle&,&Loop)
endwhile
endproc
subproc Imagelist.Destroy
Entfernt eine Imagelist
Parameters handle&
Return Imagelist_Destroy(handle&)
endproc
subproc Imagelist.Copy
Kopiert ein Bildchen mit Position pos1& von il& nach Position pos2&
Flags:
$0=Kopieren
$1=Beide Bildchen vertauschen
Ergebnis: <>0 -> Erfolg
Parameters il&,pos1&,pos2&,flags&
Return ImageList_Copy(il&,il&,pos2&,pos1&,flags&)
endproc
subproc Imagelist.XCopy
Kopiert ein Bildchen mit Position pos1& von il1& nach il2& an Position pos2&
Flags:
$0=Kopieren
$1=Beide Bildchen vertauschen
Ergebnis: <>0 -> Erfolg
Parameters il1&,il2&,pos1&,pos2&,flags&
Return ImageList_Copy(il2&,il1&,pos2&,pos1&,flags&)
endproc
subproc Imagelist.Duplicate
Kopiert eine Imagelist in eine neu erzeugte
Ergebnis: Handle der neuen Imagelist oder 0
Parameters handle&
Return Imagelist_Duplicate(handle&)
endproc
subproc Imagelist.GetCount
Ermittelt die Anzahl der Bilderchen in einer Imagelist
Parameters handle&
Return Imagelist_GetImageCount(handle&)
<s=s4 href='./../../Function-References/XProfan/endproc/'>endproc
Jac  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/03/08 ▲ |
|
| |
|
|
RGH | Very beautiful! 
two small Notes:
ImageList(Destroy, handle&) there already - faith I* - , missing only still in the guide.
ImageList(GetCount, handle&) is superfluously, there this already with GetCount(handle&) Done becomes.
Greeting
Roland
* i'm me in the momentum not sure, whether I it yesterday to or to pack the Subscriptionspaketes installed have. |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 01/03/08 ▲ |
|
| |
|
|
Jac
de
Lad | Ah, Yes the GetCount have I largely overlooking, hehehe.
Habs not probiert, but ought to absolutely mere, there DestroyWindow() (and DeleteObject) not grab (think I time, especially since, ifs so ne exklusive function for gives).
Perhaps want You Yes a or others (or any  ) function(en) yet install, so would the Imagelist-pkg rounded and it should really no Opportunities open stay. too The Defs would entfallen, what me pleasantly rüberkommen would.
Perhaps would it yet meaningfully, if one for Imagelist The Color Depth determine could. there's there so some ? Happen? (i'm me sure, you know the already).
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/03/08 ▲ |
|
| |
|
|
Jac
de
Lad | @Roland: building You yet what a of because of Imagelist on GridBOX plus function to that Bildzuweisen (best same at AddStrings())?? otherwise poste I the same yet.
Jac  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/03/08 ▲ |
|
| |
|
|
Frank
Abbing | As I said, The new Imagelisten-functions stops I for relatively futile, there tappt im dunkeln hardly advantages to the simply held API having.
Sinnvoller would it, Imagelisten quick befüllen to, z.B. with the Icons of/ one kompletten Dll (shell32.dll) or yet rather with the Systemimageliste. but lass you no cheap (and unkomplette) copy of it turn on, separate Please only whom originalen lever.
If dus not hinbekommst, can I you gladly with code help out. |
|
| |
| |
| |
|
|
Jac
de
Lad |
CompileMarkSeparationDef ImageList_Replace(4) !comctl32,ImageList_Replace
Def ImageList_ReplaceIcon(4) !comctl32,ImageList_ReplaceIcon
Def ImageList_SetIconSize(3) !comctl32,ImageList_SetIconSize
subproc Imagelist.Replace
Ersetzt ein Bildchen einer Imagelist
Parameters handle&,pos%,neuhandle&
Return Imagelist_Replace(handle&,pos%,neuhandle&,0)
endproc
subproc Imagelist.Replaceicon
Ersetzt ein Bildchen einer Imagelist mit einem Icon oder Cursor
Parameters handle&,pos%,neuhandle&
Return Imagelist_ReplaceIcon(handle&,pos%,neuhandle&,0)
endproc
subproc Imagelist.SetIconSize
Setzt eine neue Größe für die Bilderchen in einer Imagelist und löscht sie komplett (die alten Bilder werde NICHT übernommen!)
Parameters handle&,x%,y%
Return Imagelist_SetIconSize(handle&,x%,y%)
endproc
so, the ought to everything his. The Rest is for Otto-normal-Profaner not important.
Jac  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/03/08 ▲ |
|
| |
|
|
Jac
de
Lad | |
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/07/08 ▲ |
|
| |
|
(906)
Deutsch
English
Français
Español
Italia