does anyone have the source-code?
Offline
loadCostumeFrom: url
| img newC |
(url asLowercase endsWith: '.gif')
ifTrue: [img _ (GIFReadWriter new setStream: (HTTPSocket httpGet: url)) nextImage]
ifFalse: [(url asLowercase endsWith: '.png')
ifTrue: [img _ (PNGReadWriter createAFormFrom: (HTTPSocket httpGet: url) contents) first]
ifFalse: [img _ HTTPSocket httpJpeg: url]].
newC _ ImageMedia new form: img;
mediaName: (self unusedMediaNameFromBaseName: self defaultImageMedia mediaName).
self addMediaItem: newC
Offline