XProfan

English

Jörg
Sellmeyer

is it possible from the Memory bitmap one Iconhandle To get?
One Bitmaphandle goes, Thanks Uwe Pascal Niemeier:
Compile Mark Separation

window 100,100-300,300
settruecolor 1
 $H Windows.ph
 $H Messages.ph
declare bmp&,Static&
mcls 100,100
startpaint -1
cls rgb(255,255,0)
usepen 0,5,rgb(255,0,255)
usebrush 1,rgb(0,255,255)
rectangle 10,10,90,90
--------------------------------------------------
bmp&=~GetCurrentObject(%hdc,~OBJ_BITMAP)
~DeleteDC(%hdc)
--------------------------------------------------
endpaint
Static&=control(static,,$5040000e,50,50,0,0,%hwnd,1,0)
sendmessage(Static&,~STM_SETIMAGE,0,bmp&)

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

09/06/06 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Sebastian
König

Hello Jörg,

a Possibility would this here (simply to the EndPaint in your Sourcecode insert):
Compile Mark Separation

--------------------------------------------------
struct IconInfo = ~IconInfo
declare ii#
dim ii#,IconInfo

with ii#

    .fIcon& = 1
    .hbmMask& = Bmp&
    .hbmColor& = Bmp&

endwith

declare Icon&
Icon& = ~CreateIconIndirect(ii#)
~DrawIcon(%hdc,0,0,Icon&)
-------------------------------------------------2>-

unfortunately becomes thereby The Size automatically minimizes, by me on 32x32... but really should the Bitmap too directly into a ImageList insert let - what very goes because there schief?

MfG

Sebastian

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

09/06/06 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Jörg
Sellmeyer

thanks, Sebastian!
the functions. If I bmp& directly on

Def @ImageList_AddIcon(2) !comctl32.dll,ImageList_AddIcon

commit, functions not. then is no Icon in the List view To see. with Your code goes it.
depending on How I The Imagelist dimensioniere is too the Icon properly big (too larger as 32x32)

Greeting
Jörg

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

09/06/06 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Sebastian
König

I have it now not probiert, but really müsstest You herewith too directly the Bitmap-lever using can:

int ImageList_Add(
HIMAGELIST himl,
HBITMAP hbmImage,
HBITMAP hbmMask
);
[...]
-- himl
lever to the image list.
-- hbmImage
lever to the bitmap that contains the image or images. The number of images is inferred from the width of the bitmap.
-- hbmMask
lever to the bitmap that contains the mask. If no mask is used with the image list, this parameter is ignored.

Presumably does AddIcon namely nothing other, as the two Bitmaps again from the Icon To procure and so Add aufzurufen...