Français
Source/ Codesnippets

Großen Icônes Toolbar Windows

 

Frank
Abbing

(w) Frank Abbing
Déclarer newlist&,largeicon&,smallicon&,tbar&
Def ExtractIconEx(5) !"shell32","ExtractIconEx"
Cls
newlist&=Créer("ImageList", 32, 32)
ExtractIconEx("setupapi.dll",1,Addr(LargeIcon&),Addr(SmallIcon&),1)
ImageList("AddIcon", newlist&, largeicon&)
ExtractIconEx("inetcpl.cpl",8,Addr(LargeIcon&),Addr(SmallIcon&),1)
ImageList("AddIcon", newlist&, largeicon&)
ExtractIconEx("main.cpl",11,Addr(LargeIcon&),Addr(SmallIcon&),1)
ImageList("AddIcon", newlist&, largeicon&)
ExtractIconEx("inetcpl.cpl",22,Addr(LargeIcon&),Addr(SmallIcon&),1)
ImageList("AddIcon", newlist&, largeicon&)
ExtractIconEx("inetcpl.cpl",21,Addr(LargeIcon&),Addr(SmallIcon&),1)
ImageList("AddIcon", newlist&, largeicon&)
tbar&=Créer("Toolbar",%hwnd,newlist&,0,0,3000,1)
Toolbar("AddTextButton",tbar&,0,4000,"   Icon 1   ",»)
Toolbar("AddTextButton",tbar&,1,4001,"   Icon 2   ",»)
Toolbar("AddTextButton",tbar&,2,4002,"   Icon 3   ",»)
Toolbar("AddTextButton",tbar&,4,3000,"   Icon 4   ",»)
Toolbar("AddTextButton",tbar&,3,3001,"   Icon 5   ",»)

Tandis que 1

    WaitInput
    Cas %clé=2:Pause

Endwhile

Fin

pouvez son la fois s'il te plaît une Screenshot de dem la fenêtre faire? suis pas sûrement, si alle Icônes überall vorhanden sommes...
merci!!!

 
21.12.2008  
 




Rolf
Koch
Vue zeigt folgende Icônes

8 kB
Hochgeladen:21.12.2008
Downloadcounter352
Download
 
21.12.2008  
 




E.T.
Büdde...

20 kB
Hochgeladen:21.12.2008
Downloadcounter287
Download
 
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...
21.12.2008  
 




Paul
Glatz
chez mir qui gleichen comment chez Rolf
 
21.12.2008  
 




Frank
Abbing
Ok, merci!

Reicht mir déjà afin de voyons, dass es so pas allez. sous den verschiedenen Windowsversionen wurde qui Reihenfolge qui Icônes malheureusement pas eingehalten...
 
21.12.2008  
 



Zum Quelltext


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

7.791 Views

Untitledvor 0 min.
H.Brill01.10.2023
Normann Strübli01.02.2023
Peter Max Müller05.11.2017
Michael Borowiak20.02.2017
plus...

Themeninformationen



Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie