In recent spec2 (head) we added support so that an application can have an iconProvider so it means that you can using the ThemeIcons load and manage a set of icons for your application.
On 27 May 2020, at 20:54, Tomaž Turk <tomaz.turk@ef.uni-lj.si> wrote:
I'm sorry, the raw tag at forum.world.st <http://forum.world.st/> ate the code :-)
| newIcons |
newIcons := IdentityDictionary new. ((FileSystem zip: 'C:\icons\a.zip' asFileReference) open workingDirectory allChildrenMatching: '*.png') do: [ :each | newIcons at: each base asSymbol put: (ImageForm open: each )].
SpToolBarButton new label: 'Go!'; icon: (newIcons at: #iconFileName).
Tomaz
-------------------------------------------- Stéphane Ducasse http://stephane.ducasse.free.fr / http://www.pharo.org 03 59 35 87 52 Assistant: Aurore Dalle FAX 03 59 57 78 50 TEL 03 59 35 86 16 S. Ducasse - Inria 40, avenue Halley, Parc Scientifique de la Haute Borne, Bât.A, Park Plaza Villeneuve d'Ascq 59650 France