Special Push Button needed

BlitzMax Forums/MaxGUI Module/Special Push Button needed

Grisu

(Posted 2006) [#1]

Hi everyone!

For a winamp like player I need special push buttons.

Is this possible or do some of you know ascii codes so I can make the buttons look like this:

Grisu

tonyg

(Posted 2006) [#2]

There's some 'imagebutton' add-ons such as this and this

Grisu

(Posted 2006) [#3]

Thanks Tony!

Grisu

(Posted 2006) [#4]

Is there a way to simply draw a toolbar to that location?
So the toolbar does not stay at the top part of a window and can be positioned freely.

Strict 

Local window:TGadget=CreateWindow("My Window",50,50,480,240)

Local trailertoolbar:TGadget=CreateToolBar("buttons.png",100,100,100,10,window)

SetToolBarTips trailertoolbar,["Start","Pause","Stopp"] 

While WaitEvent()
	Select EventID()
		Case EVENT_GADGETACTION
			If EventSource()=trailertoolbar 
				Print "ToolBar GadgetAction~nEventData()="+EventData()
			EndIf
		Case EVENT_WINDOWCLOSE
			End
	End Select
Wend

SebHoll

(Posted 2006) [#5]

Try drawing the toolbar to a panel gadget instead of a window, but position the panel gadget where you want the toolbar to be...

Grisu

(Posted 2006) [#6]

Never thought of this, thanks Seb for the tip.

Getting closer...

Is there a way to prevent the toolbar to draw a line on top of the images? It's ugly and I'm a perfectionist. :)

In theory one could just comment out the line from the "win32toolbar.cpp" file?

kfprimm

(Posted 2006) [#7]

not sure, but as quick workaround position the toolbar at 0,-2 to get rid of that

JoshK

(Posted 2006) [#8]

Create a panel, then create another panel offset within that, then create your toolbar on the second panel.

Grisu

(Posted 2006) [#9]

I can't position the toolbar, that is the problem.
The only thing that can be moved is the panel. :(

Edit: uff... gimme a sec. THAT'S CRAZY and UGLY, but it could work. :)

Grisu

(Posted 2006) [#10]

Your're awesome Leadwerks! :D

Thanks a lot.

Global TrailerPan:TGadget=CreatePanel(ClientW-295,ClientH-30,95,34,MyWindow)',PANEL_BORDER,"")
Global TrailerPan2:TGadget=CreatePanel(0,-2,95,34,TrailerPan)
Local  Trailertools:TGadget=CreateToolBar("Incbin::./Media/buttons.png",0,-2,0,0,TrailerPan2)
SetToolBarTips Trailertools,["Start","Pause","Stopp"]

I think Mark or Skidracer will scream loud if they ever read this dirty bit of code... ;)

My last impossible task is to code a trackbar slider with a proportional size knob... :/