funktioniert XbpIcon():Savefile() ? [erledigt]
Verfasst: Mi, 15. Aug 2018 2:51
wenn man XbpIcon() (\SOURCE\SYS\xbparts.prg) so modifiziert
dann kann man eine Imagelist und "GetIcon" verwenden
nun wollte ich die (sichtbaren) Images als Icon abspeichern
und das passiert ... nichts
wenn ich es nun so mache
bekomme ich ein Bitmap ... hm
deshalb meine Frage ob XbpIcon():Savefile() überhaupt funktioniert ...
es gibt ja auch kein o:Make() was ein o:Savefile() erst notwendig machen würde.
Code: Alles auswählen
EXPORTED:
VAR Handle
Code: Alles auswählen
nHICON := @comctl32:ImageList_GetIcon( hImageToolbar, ;
nIndex-1 , ;
ILD_NORMAL )
// assign to modifyed XbpIcon()
oIcon:Handle := nHICON
oIcon:GetIconInfo()
@User32:DestroyIcon( nHICON )
Code: Alles auswählen
oIcon:saveFile(cFilename)
wenn ich es nun so mache
Code: Alles auswählen
oBMP := oIcon:GetBitmap()
oBMP:saveFile(cFilename,XBPBMP_FORMAT_WIN3X)
deshalb meine Frage ob XbpIcon():Savefile() überhaupt funktioniert ...
es gibt ja auch kein o:Make() was ein o:Savefile() erst notwendig machen würde.