Code: Select all
TEXT$ = text$(1)
buttonsize = TEXT_WIDTH(TEXT$) + 15
BUTTON 0 TEXT TEXT$ AT 25, 25 SIZE buttonsize, 25
Code: Select all
TEXT$ = text$(1)
buttonsize = TEXT_WIDTH(TEXT$) + 15
BUTTON 0 TEXT TEXT$ AT 25, 25 SIZE buttonsize, 25
Code: Select all
' Label Settings
FILL COLOR w(1,1), w(1,2), w(1,3)
DRAW COLOR 0,0,0
SET BUTTONS FONT NAME labelfont$
SET BUTTONS FONT SIZE 14
label$(categ, 1) = categ$(categ, 1)
label$(categ, 2) = label$(categ, 1) & 2
TEXT$ = label$(categ, 1)
labelsizex = TEXT_WIDTH(TEXT$) + 16
labelsizey = headerheight * 0.495
labely = (graphdiv(startline) + graphdiv(maxline(categ))) / 2
' Label 1
labelx = (margin/2) - (labelsizex/2)
BUTTON label$(categ, 1) TEXT TEXT$ AT labelx, labely SIZE labelsizex, labelsizey
' Label 2
labelx = ((maxx + (maxx - margin)) / 2) - (labelsizex/2)
BUTTON label$(categ, 2) TEXT TEXT$ AT labelx, labely SIZE labelsizex, labelsizey
Code: Select all
DRAW FONT SIZE 14
DRAW FONT NAME labelfont$