| |
| |
|
Jac
de
Lad | ici la fois un paire Funktionen, qui Rolands neue Imagelisten um cela erweitern, quoi mir momentan encore fehlt. Sollte ab XProfan 1 Sous 11 marcher. il y a encore plus Imagelist-Funktionen, mais ce sont qui wichtigsten. si quelqu'un quoi vermisst, s'il te plaît le son schreien.
KompilierenMarqueSéparationDef 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='./../../funktionsreferenzen/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 | 03.01.2008 ▲ |
|
| |
|
|
RGH | très joli! 
deux kleine Anmerkungen:
ImageList(Destroy, handle&) gibt es déjà - glaube je* - , fehlt seulement encore dans qui Anleitung.
ImageList(GetCount, handle&) ist überflüssig, là ca bereits avec GetCount(handle&) erledigt wird.
Salut
Roland
* je suis mir im Moment pas sûrement, si je es gestern avant ou bien pour saisir des Subscriptionspaketes incorporé habe. |
|
| |
| 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 | 03.01.2008 ▲ |
|
| |
|
|
Jac
de
Lad | Ah, oui cela GetCount habe je großzügig übersehen, hehehe.
Tricolore pas probiert, mais sollte absolument rein, là DestroyWindow() (et DeleteObject) pas greifen (denke je la fois, zumal, wenns so ne exklusive Funktion pour gibt).
peut-être veux du oui qui une ou bien autre (ou bien alle  ) Funktion(en) encore einbauen, avec cela wäre cela Imagelist-paquet arrondi et es devrait eigentlich aucun Wünsche offen rester. aussi qui Defs serait entfallen, quoi mir enchanté rüberkommen serait.
peut-être wäre es encore sinnvoll, si on pour qui Imagelist qui Farbtiefe festlegen pourrait. il y a là so quelques Flags (je suis mir sûrement, tu sais cela déjà).
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 | 03.01.2008 ▲ |
|
| |
|
|
Jac
de
Lad | @Roland: Baust du encore quoi un de à cause de Imagelist à Gridbox plus Funktion zum Bildzuweisen (am besten juste beim AddStrings())?? Ansonsten Poste je cela juste encore.
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 | 03.01.2008 ▲ |
|
| |
|
|
Frank
Abbing | Comme je le disais, qui neuen Imagelisten-Funktionen halte je pour relativ sinnlos, là vous à peine Vorteile à qui simple gehaltenen API avons.
Sinnvoller wäre es, Imagelisten vite befüllen trop peut, z.B. avec den Icônes einer kompletten Dll (shell32.dll) ou bien encore besser avec qui Systemimageliste. mais lass dir aucun billige (et unkomplette) Kopie en andrehen, mais s'il te plaît seulement den originalen Handle.
si dus pas hinbekommst, peux je dir volontiers avec Code aushelfen. |
|
| |
| |
| |
|
|
Jac
de
Lad |
KompilierenMarqueSéparationDef 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, cela sollte alles son. qui reste ist pour den Otto-Normal-Profaner pas 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 | 03.01.2008 ▲ |
|
| |
|
|
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 | 07.01.2008 ▲ |
|
| |
|
(1.119)
Deutsch
English
Français
Español
Italia