Hilfe bei Types und Drawimage

Übersicht BlitzMax, BlitzMax NG Beginners-Corner

Neue Antwort erstellen

SamFisher

Betreff: Hilfe bei Types und Drawimage

BeitragSo, Jan 24, 2010 0:59
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich bin neu in BMax und bin ein bisschen am rumexperimentieren. Nun hab ich einen kleine Code geschrieben nur ich frage mich warum nur ein Bild gezeichnet wird, statt den drei??

Danke schonmal im Vorraus für die Hilfe
Hier der Code:

BlitzMax: [AUSKLAPPEN]
SuperStrict

Graphics 800,600,0

Type Button
Field Name:String
Field PosX:Int,PosY:Int
Field SizeX:Int,SizeY:Int
Field Image:TImage

Global ButtonList:TList=CreateList()

Function CreateButton(Text:String,PosX:Int=0,PosY:Int=0)
Local But:Button=New Button
But.Name=Text
But.PosX=PosX
But.PosY=PosY
But.SizeX=64
But.SizeY=64
Cls
DrawRect (0,0,64,64)
SetColor 0,0,0
DrawText (text,10,10)
But.Image=CreateImage (64,64)
GrabImage(But.Image,0,0)
ListAddFirst(ButtonList,But)
End Function

Function DrawButton()
For Local b:Button=EachIn Button.ButtonList
DrawImage b.image,b.posx,b.posy
Print b.name
Print b.posx
Print b.posy
Print CurrentTime()
Next
End Function

End Type





button.createbutton("Button1")
button.createbutton("Button2",100,100)
button.createbutton("Button3",200,200)
SetColor 255,255,255
While Not KeyHit(KEY_ESCape)
Cls

Button.DrawButton()
Flip

Wend
 

furbolg

BeitragSo, Jan 24, 2010 1:19
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi !

Das liegt an folgendem

BlitzBasic: [AUSKLAPPEN]

Cls
DrawRect (0, 0, 64, 64)
SetColor 0,0,0
DrawText (Text,10,10)


Unter dem Cls musst du noch ein SetColor 255,255,255 für die weiße Box machen, sonst wird die nächste Box wie der Text schwarz Smile

mfg

Furb

d-bug

BeitragSo, Jan 24, 2010 1:21
Antworten mit Zitat
Benutzer-Profile anzeigen
...kann gelöscht werden... (alles lesen sollte auch mir mal weiterhelfen :/)

SamFisher

BeitragSo, Jan 24, 2010 1:28
Antworten mit Zitat
Benutzer-Profile anzeigen
danke Laughing moah voll übersehen. wie dumm Embarassed Embarassed

beanage.johannes

BeitragSo, Jan 24, 2010 1:35
Antworten mit Zitat
Benutzer-Profile anzeigen
Tipp: es verbraucht viel speicher wenn du bilder in Types speichern (natürlich nur wenn di viele Buttons erstells) mache liber eine global variable im Type mit dem Bild.

Neue Antwort erstellen


Übersicht BlitzMax, BlitzMax NG Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group