Seite 1 von 1

SetGadgetColor() für Buttons?

Verfasst: 08.09.2013 21:57
von Delle
Hallo,

leider geht SetGadgetColor() ja nicht für Buttons :-(

PureCOLOR will ich eigentlich nicht mehr verwenden.

Gibt's eine andere einfache Möglichkeit? API?

Danke,
Delle

Re: SetGadgetColor() für Buttons?

Verfasst: 08.09.2013 23:59
von RSBasic
Du kannst mit CanvasGadget einen eigenen Button erstellen, den du einfärben kannst.

Re: AW: SetGadgetColor() für Buttons?

Verfasst: 09.09.2013 00:07
von computerfreak
Im Codearchiv gibt es einige gute Beispiele für Ownerdraw Buttons.

Mfg Computerfreak

Re: SetGadgetColor() für Buttons?

Verfasst: 09.09.2013 18:58
von Andesdaf
die Farbeigenschaft gibt es soweit ich weiß nativ für Buttons gar nicht,
jedenfalls kann man auch in anderen Sprachen keine normalen Buttons färben
(unter Windows).

Re: SetGadgetColor() für Buttons?

Verfasst: 10.09.2013 11:29
von kernadec
hallo
kleiner Test zum Spaß

guten Tag

Code: Alles auswählen

Procedure boutonImage(num_Img, x, y, w, h, colorFr, ColorTx, titre$, Ft$, hf,typ)
  ImgID = CreateImage(num_Img, w, h)
  Font=LoadFont(#PB_Any, ft$  , hf, typ) 
  StartDrawing(ImageOutput(num_Img))
    DrawingMode(1)
    Box(0, 0, w, h,colorFr)
    FrontColor(colorTx)
    DrawingFont(FontID(Font))
    DrawText(x,y,titre$)
  StopDrawing()
  ProcedureReturn ImgID
EndProcedure


OpenWindow(0,0,0,220,80,"Bouton Color",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)

ButtonImageGadget(1, 50, 10, 110, 40,boutonImage(1,10,8,110,40,RGB(128,128,128),RGB(0,250,0),"BINGO!!","verdana",14,#PB_Font_Bold))

Repeat : Until WaitWindowEvent()=#PB_Event_CloseWindow