Wie kann man nachträglich den Style eines Gadget ändern ?

silbersurfer · **Registriert:** 06.07.2014 12:21

Hallo Leute,
gibt es eine möglichkeit den Style eines Gadgets nachträglich (in laufzeit) zu ändern ?

z.B. ListIconGadget(#PB_ListIcon_MultiSelect) so das man diesen praktisch ein und aus schalten kann.
Wenn möglich auch über Api.

Mijikai · **Registriert:** 25.09.2016 01:42

Iirc:

Code:

Style = GetWindowLongPtr_(GadgetID(),#GWL_STYLE)
SetWindowLongPtr_(GadgetID(),#GWL_STYLE,Style + #NEW STYLES)

silbersurfer · **Registriert:** 06.07.2014 12:21

Super, danke Mijikai für die schnelle Antwort, werde das gleich ausprobieren :allright:

Edit: Bin nicht sicher ob ich das richtig gemacht habe, aber es kommt bei mir immer ein (Adress Lesefehler 24)

gibt keinen Adressfehler aber änderung ist nicht vorhanden

Code:

Style = GetWindowLongPtr_(GadgetID(1),#GWL_STYLE)
SetWindowLongPtr_(GadgetID(1),#GWL_STYLE, Style | #PB_ListIcon_HeaderDragDrop)

gibt keinen Adressfehler, aber das Gadget wird nicht mehr dargestellt

Code:

Style = GetWindowLongPtr_(GadgetID(1),#GWL_STYLE)
SetWindowLongPtr_(GadgetID(1),#GWL_STYLE, Style + #PB_ListIcon_HeaderDragDrop)

gibt den besagten Adressfehler

Code:

Style = GetWindowLongPtr_(GadgetID(1),#GWL_STYLE)
SetWindowLongPtr_(GadgetID(1),#GWL_STYLE, Style & #PB_ListIcon_HeaderDragDrop)

was mache ich da Falsch ?

Mijikai · **Registriert:** 25.09.2016 01:42

Habs mal getestet mit den #PB_ "Styles" geht es nicht.

Aber so

Code:

;Multiselect abschalten
;style = GetWindowLongPtr_(GadgetID(2),#GWL_STYLE)
;SetWindowLongPtr_(GadgetID(2),#GWL_STYLE,style | #LVS_SINGLESEL)

;Multiselect wieder anschalten    
;style = GetWindowLongPtr_(GadgetID(2),#GWL_STYLE)
;SetWindowLongPtr_(GadgetID(2),#GWL_STYLE,style & (~#LVS_SINGLESEL))

silbersurfer · **Registriert:** 06.07.2014 12:21

@Mijikai

Zitat:

Aber so

Danke, werde das gleich testen ! :allright:

PureBoard

Wie kann man nachträglich den Style eines Gadget ändern ?

Wer ist online?