[GELÖST] Eine MenuButton Erstell Funktion erstellen?

Übersicht

BlitzMax, BlitzMax NG

Beginners-Corner

Gehe zu Seite 1, 2 Weiter

	CO2 ehemals "SirMO" Betreff: [GELÖST] Eine MenuButton Erstell Funktion erstellen?	Mi, Aug 24, 2011 1:06 Antworten mit Zitat
Hallo, Ich möchte eine Funktion schreiben, welche einen MenüButton erstellt, und diesen dann auch updated, d.h die Funktion muss in der Hauptschleife stehen, was verhindert, das ich ein externes Bild Laden könnte (Und dafür war die Funktion eigentlich Gedacht), Da es dann jeden schleifendurchlauf geladen wird. Da ich die Funktion allerdings so "mobil" wie möglich halten will (Also das ich sie auch ohne weiteres in anderen Codes verwenden kann), schließt sich die Globale Variable aus, zumal die Funktion hinterher in eine externen Datei stehen wird. Meine Frage: Kann man das auch anders lösen und wenn ja, wie? mfG, CO2
mfG, CO² Sprachen: BlitzMax, C, C++, C#, Java Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

CO2

ehemals "SirMO"

Betreff: [GELÖST] Eine MenuButton Erstell Funktion erstellen?

Mi, Aug 24, 2011 1:06
Antworten mit Zitat

Hallo,
Ich möchte eine Funktion schreiben, welche einen MenüButton erstellt, und diesen dann auch updated, d.h die Funktion muss in der Hauptschleife stehen, was verhindert, das ich ein externes Bild Laden könnte (Und dafür war die Funktion eigentlich Gedacht), Da es dann jeden schleifendurchlauf geladen wird.
Da ich die Funktion allerdings so "mobil" wie möglich halten will (Also das ich sie auch ohne weiteres in anderen Codes verwenden kann), schließt sich die Globale Variable aus, zumal die Funktion hinterher in eine externen Datei stehen wird.
Meine Frage: Kann man das auch anders lösen und wenn ja, wie?

mfG,
CO2

mfG, CO²

Sprachen: BlitzMax, C, C++, C#, Java
Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

Zuletzt bearbeitet von CO2 am Mi, Aug 24, 2011 23:30, insgesamt einmal bearbeitet

	Xeres Moderator	Mi, Aug 24, 2011 1:11 Antworten mit Zitat
Eine Button-Funktion habe ich in jedem BCC Beitrag in dem einer benötigt und erlaubt ist. Ich verstehe nicht ganz, was das Problem mit dem Bild oder Globalen sein sollte.
Win10 Prof.(x64)/Ubuntu 16.04\|CPU 4x3Ghz (Intel i5-4590S)\|RAM 8 GB\|GeForce GTX 960 Wie man Fragen richtig stellt \|\| "Es geht nicht" \|\| Video-Tutorial: Sinus & Cosinus THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Xeres

Moderator

Mi, Aug 24, 2011 1:11
Antworten mit Zitat

Eine Button-Funktion habe ich in jedem BCC Beitrag in dem einer benötigt und erlaubt ist.
Ich verstehe nicht ganz, was das Problem mit dem Bild oder Globalen sein sollte.

Win10 Prof.(x64)/Ubuntu 16.04|CPU 4x3Ghz (Intel i5-4590S)|RAM 8 GB|GeForce GTX 960
Wie man Fragen richtig stellt || "Es geht nicht" || Video-Tutorial: Sinus & Cosinus
THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

	CO2 ehemals "SirMO"	Mi, Aug 24, 2011 1:48 Antworten mit Zitat
Ok, Hier das Problem mit dem Bild: Ich habe folgende Funktion erstellt: BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Function CreateAndUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int) Local ButtonBild1 = LoadImage(ButtonFileNormal) ;MARKIERT Local ButtonBild2 = LoadImage(ButtonFileMouseOn) ;MARKIERT DrawImage ButtonBild1, Posx, Posy If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey DrawImage ButtonBild2, Posx, Posy If MouseHit(1) Return 1 EndIf EndIf Return 0 End Function Diese Funktion müsste nun in der Hauptschleife Stehen, heißt: BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Repeat CreateAndUpdateButton("ButtonNormal.png", "ButtonMouseOn.png", 0, 0, 150, 50, MouseX(), MouseY()) Until KeyHit(1) End So, Und da alles, was in der Hauptschleife steht, 60 mal oder mehr pro sekunde ausgeführt wird, werden auch die Bilder in den beiden markierten (;MARKIERT) Zeilen 60 mal pro sekunde geladen, was nicht nur den Prozessor, sondern auch den RAM hoffnungslos überlastet. Und hier das Problem mit der Globalen Variable: Da die Funktion später in einer externen .bmx-Datei steht, und sie nur via "Include" Ins Programm includiert wird, kann ich keine Globale variable benutzen. mfG, CO2
mfG, CO² Sprachen: BlitzMax, C, C++, C#, Java Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

CO2

ehemals "SirMO"

Mi, Aug 24, 2011 1:48
Antworten mit Zitat

Ok,

Hier das Problem mit dem Bild: Ich habe folgende Funktion erstellt: BlitzMax: [AUSKLAPPEN]

Function CreateAndUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int)
     Local ButtonBild1 = LoadImage(ButtonFileNormal) ;MARKIERT
     Local ButtonBild2 = LoadImage(ButtonFileMouseOn) ;MARKIERT
     DrawImage ButtonBild1, Posx, Posy

     If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey
          DrawImage ButtonBild2, Posx, Posy
          If MouseHit(1) 
                Return 1
          EndIf
     EndIf
     Return 0
End Function

Diese Funktion müsste nun in der Hauptschleife Stehen, heißt:
BlitzMax: [AUSKLAPPEN]

Repeat
     CreateAndUpdateButton("ButtonNormal.png", "ButtonMouseOn.png", 0, 0, 150, 50, MouseX(), MouseY())
Until KeyHit(1)
End

So, Und da alles, was in der Hauptschleife steht, 60 mal oder mehr pro sekunde ausgeführt wird, werden auch die Bilder in den beiden markierten (;MARKIERT) Zeilen 60 mal pro sekunde geladen, was nicht nur den Prozessor, sondern auch den RAM hoffnungslos überlastet.

Und hier das Problem mit der Globalen Variable: Da die Funktion später in einer externen .bmx-Datei steht, und sie nur via "Include" Ins Programm includiert wird, kann ich keine Globale variable benutzen.

mfG,
CO2

mfG, CO²

Sprachen: BlitzMax, C, C++, C#, Java
Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

	Xeres Moderator	Mi, Aug 24, 2011 1:50 Antworten mit Zitat
Warum lädst du die Bilder nicht vor der Hauptschleife?!
Win10 Prof.(x64)/Ubuntu 16.04\|CPU 4x3Ghz (Intel i5-4590S)\|RAM 8 GB\|GeForce GTX 960 Wie man Fragen richtig stellt \|\| "Es geht nicht" \|\| Video-Tutorial: Sinus & Cosinus THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Xeres

Moderator

Mi, Aug 24, 2011 1:50
Antworten mit Zitat

Warum lädst du die Bilder nicht vor der Hauptschleife?!

	PhillipK	Mi, Aug 24, 2011 4:58 Antworten mit Zitat
Ohne viel nachzudenken, lege ich dir Types ans herz. Dein Problem wie du es beschreibt, würde ich über ein Type und eine dort eingebundene Global machen. BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Type TButtons Global buttonList:TList = CreateList() Field x% Field y% Field img:TImage Method Draw:Int() Abstract Function DrawAll:Int() For Local button:TButtons = EachIn TButtons.buttonlist If button.draw() = 0 Then TButtons.buttonlist.remove(button) EndIf Next End Function Hier mal eine grundversion. Durch die abstract klasse kannst du nun beliebig viele buttontypen adden und in TButtons.buttonlist einfügen. Die funktion TButtons.DrawAll() kommt in deine hauptschleife. So würde ich das beheben Allerdings würde ich dann ALLE Gui elemente in eine Liste packen und aufeinander aufbauen. Ein wirklicher sinn dafür, das das Bild NICHT vorgeladen wird, sehe ich nicht. Allerdings gibt es auch eine andere möglichkeit, eine simplere Das umpointern einer funktion in einem Type (frage an alle: Geht das eigentlich auch ohne Type? ) Das ganze sieht dann etwa so aus: (ich bin mir nicht ganz sicher, ob ich den Funktionspointer nun richtig eingelesen hab, bin ein wenig müde!) BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Local tbd:TButton_dummy = New TButton_dummy While 1 Cls tbd.update() Flip 1 Wend Type TButton_dummy Field update = CreateAndUpdateButton(file:String, zweiterParam:String, posx:Int, posy:Int, sizex:Int, sizeY:Int, mousexpos:Int, mouseypos:Int, tbd:TButton_dummy) End Type Function CreateAndUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int, tbd:TButton_dummy) tbd.update = JustUpdateButton 'hier das umpointern! Wie genau das funktioniert hat, weiß ich nimmer :( Local ButtonBild1 = LoadImage(ButtonFileNormal) ;MARKIERT Local ButtonBild2 = LoadImage(ButtonFileMouseOn) ;MARKIERT DrawImage ButtonBild1, Posx, Posy If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey DrawImage ButtonBild2, Posx, Posy If MouseHit(1) Return 1 EndIf EndIf Return 0 End Function Function JustUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int, tbd:TButton_dummy) DrawImage ButtonBild1, Posx, Posy If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey DrawImage ButtonBild2, Posx, Posy If MouseHit(1) Return 1 EndIf EndIf Return 0 End Function Wie gesagt, 2 lösungen. Achja, noch was einfacheres 1) Zitat: Arrow Und hier das Problem mit der Globalen Variable: Da die Funktion später in einer externen .bmx-Datei steht, und sie nur via "Include" Ins Programm includiert wird, kann ich keine Globale variable benutzen. Include ungleich Import. Stell dir ein Include so vor, als würde der Compiler rumrennen und jegliche per Include eingebundenen bmxdateien öffnen, die sourcecodes zusammenkopieren und dann als eine große datei Compilen. 2) Den 2ten punkt hab ich vergessen <.< Aber es spricht absolut nichts gegen eine globale variable. Egal wo die datei herkommt, sie wäre da. Wenn ich mich nicht irre Schöner sind allerdings sammlungen in einem Type, da so der Endbenutzer nicht das problem hat, das Variablen-namen belegt sind. Hierzu solltest du aber nicht unnötig viele instanzen eines objektes erstellen, nutz einfach nur ein Dummyobjekt mit passendem, ersichtlichen Namen, und trage dort beliebig viele Global-felder ein. Na vielleicht hast du dein problem schon gelöst. Vielleich auch nicht ^^ Ich hoffe jedenfalls, ich konnte ein wenig helfen und hab nicht zuviel bockmist geschrieben. Kaffe, ich komme Mit freundlichen Grüßen - PhillipK!

PhillipK

Mi, Aug 24, 2011 4:58
Antworten mit Zitat

Ohne viel nachzudenken, lege ich dir Types ans herz.

Dein Problem wie du es beschreibt, würde ich über ein Type und eine dort eingebundene Global machen.

BlitzMax: [AUSKLAPPEN]


Type TButtons 
       Global buttonList:TList = CreateList()
       Field x%
       Field y%
       Field img:TImage
       
       Method Draw:Int() Abstract

       Function DrawAll:Int()
              For Local button:TButtons = EachIn TButtons.buttonlist
                        If button.draw() = 0 Then
                               TButtons.buttonlist.remove(button)
                        EndIf
              Next
       End Function

Hier mal eine grundversion. Durch die abstract klasse kannst du nun beliebig viele buttontypen adden und in TButtons.buttonlist einfügen. Die funktion TButtons.DrawAll() kommt in deine hauptschleife.

So würde ich das beheben Very Happy

Allerdings würde ich dann ALLE Gui elemente in eine Liste packen und aufeinander aufbauen. Ein wirklicher sinn dafür, das das Bild NICHT vorgeladen wird, sehe ich nicht.
Allerdings gibt es auch eine andere möglichkeit, eine simplere Smile

Das umpointern einer funktion in einem Type (frage an alle: Geht das eigentlich auch ohne Type? )

Das ganze sieht dann etwa so aus:
(ich bin mir nicht ganz sicher, ob ich den Funktionspointer nun richtig eingelesen hab, bin ein wenig müde!)
BlitzMax: [AUSKLAPPEN]



Local tbd:TButton_dummy = New TButton_dummy

While 1
      Cls
      tbd.update()
      Flip 1
Wend

Type TButton_dummy
       Field update = CreateAndUpdateButton(file:String, zweiterParam:String, posx:Int, posy:Int, sizex:Int, sizeY:Int, mousexpos:Int, mouseypos:Int, tbd:TButton_dummy)
End Type


Function CreateAndUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int, tbd:TButton_dummy)
     tbd.update = JustUpdateButton 'hier das umpointern! Wie genau das funktioniert hat, weiß ich nimmer :(
     Local ButtonBild1 = LoadImage(ButtonFileNormal) ;MARKIERT
     Local ButtonBild2 = LoadImage(ButtonFileMouseOn) ;MARKIERT
     DrawImage ButtonBild1, Posx, Posy

     If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey
          DrawImage ButtonBild2, Posx, Posy
          If MouseHit(1) 
                Return 1
          EndIf
     EndIf
     Return 0
End Function

Function JustUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int, tbd:TButton_dummy)
     DrawImage ButtonBild1, Posx, Posy

     If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey
          DrawImage ButtonBild2, Posx, Posy
          If MouseHit(1) 
                Return 1
          EndIf
     EndIf
     Return 0
End Function

Wie gesagt, 2 lösungen.

Achja, noch was einfacheres Smile

1)
Zitat:

Arrow Und hier das Problem mit der Globalen Variable: Da die Funktion später in einer externen .bmx-Datei steht, und sie nur via "Include" Ins Programm includiert wird, kann ich keine Globale variable benutzen.

Include ungleich Import.
Stell dir ein Include so vor, als würde der Compiler rumrennen und jegliche per Include eingebundenen bmxdateien öffnen, die sourcecodes zusammenkopieren und dann als eine große datei Compilen.

2)
Den 2ten punkt hab ich vergessen <.< Aber es spricht absolut nichts gegen eine globale variable. Egal wo die datei herkommt, sie wäre da. Wenn ich mich nicht irre Razz

Schöner sind allerdings sammlungen in einem Type, da so der Endbenutzer nicht das problem hat, das Variablen-namen belegt sind.
Hierzu solltest du aber nicht unnötig viele instanzen eines objektes erstellen, nutz einfach nur ein Dummyobjekt mit passendem, ersichtlichen Namen, und trage dort beliebig viele Global-felder ein.

Na vielleicht hast du dein problem schon gelöst. Vielleich auch nicht ^^

Ich hoffe jedenfalls, ich konnte ein wenig helfen und hab nicht zuviel bockmist geschrieben. Kaffe, ich komme Smile

Mit freundlichen Grüßen - PhillipK! Smile

	BladeRunner Moderator	Mi, Aug 24, 2011 6:30 Antworten mit Zitat
Es spricht bei BMax auch nichts gegen eine Globale innerhalb der Funktion, da ja die Daten dennoch gekapselt vorliegen. BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Function bla() Global blub:TImage If blub = Null blub = LoadImage ... ... EDit: argh, das ist natürlich nur für einmal verwendete Ressourcen brauchbar. Ansonsten lager das ganze in einen eigenen Type aus wie vorgeschlagen.
Zu Diensten, Bürger. Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3 Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64 B3D BMax MaxGUI Stolzer Gewinner des BAC#48, #52 & #92

BladeRunner

Moderator

Mi, Aug 24, 2011 6:30
Antworten mit Zitat

Es spricht bei BMax auch nichts gegen eine Globale innerhalb der Funktion, da ja die Daten dennoch gekapselt vorliegen.
BlitzMax: [AUSKLAPPEN]

Function bla()
    Global blub:TImage
    If blub = Null blub = LoadImage ...
    ...

EDit: argh, das ist natürlich nur für einmal verwendete Ressourcen brauchbar.
Ansonsten lager das ganze in einen eigenen Type aus wie vorgeschlagen.

Zu Diensten, Bürger.
Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3
Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64
B3D BMax MaxGUI
Stolzer Gewinner des BAC#48, #52 & #92

	PhillipK	Mi, Aug 24, 2011 7:33 Antworten mit Zitat
Mal grade so, weils angeschnitten wurde: Ich hab noch nie eine Globale innerhalb einer funktion benutzt. Wie genau funktioniert das? Speicher, der reserveriert wird und nicht neu initialisiert wird? Aber ständig im Scope der Funktion aufrufbar ist? BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Global i:Int = 10 While 1 Print "in der mainloop i : "+i test() Wend Function Test() Global i:Int Print "test wurde aufgerufen! i: "+i i:+ End Function Gibt das unterschiedliche werte?

PhillipK

Mi, Aug 24, 2011 7:33
Antworten mit Zitat

Mal grade so, weils angeschnitten wurde:

Ich hab noch nie eine Globale innerhalb einer funktion benutzt.
Wie genau funktioniert das?

Speicher, der reserveriert wird und nicht neu initialisiert wird? Aber ständig im Scope der Funktion aufrufbar ist?

BlitzMax: [AUSKLAPPEN]


Global i:Int = 10
While 1
     Print "in der mainloop i : "+i
     test()
Wend

Function Test()
      Global i:Int
      Print "test wurde aufgerufen! i: "+i
      i:+
End Function

Gibt das unterschiedliche werte? Smile

	DaysShadow	Mi, Aug 24, 2011 8:00 Antworten mit Zitat
Ja gibt unterschiedliche Werte. Globale Variablen in Funktionen sind gleich mit z.B. mit "static" definierten Variablen in C/C++/C#/Java usw. "static" triffts auch irgendwie vom Keyword her, die Variable ist statisch in der Funktion vorhanden, sie wird nicht jedesmal neu erstellt oder der Wert zurückgesetzt und behält damit z.B. auch den Wert. Nur darauf zugreifen kann man von außerhalb nicht, sie ist also nur in der Funktion aufrufbar oder über Pointer. Daher ist Global halt ein wenig irreführend von der Bezeichnung her bei Funktionen, da Global Variablen ja sonst wirklich global sind und von überall aus aufgerufen werden können, nur halt hier nicht.
Blessed is the mind too small for doubt

DaysShadow

Mi, Aug 24, 2011 8:00
Antworten mit Zitat

Ja gibt unterschiedliche Werte.

Globale Variablen in Funktionen sind gleich mit z.B. mit "static" definierten Variablen in C/C++/C#/Java usw.
"static" triffts auch irgendwie vom Keyword her, die Variable ist statisch in der Funktion vorhanden, sie wird nicht jedesmal neu erstellt oder der Wert zurückgesetzt und behält damit z.B. auch den Wert.

Nur darauf zugreifen kann man von außerhalb nicht, sie ist also nur in der Funktion aufrufbar oder über Pointer.

Daher ist Global halt ein wenig irreführend von der Bezeichnung her bei Funktionen, da Global Variablen ja sonst wirklich global sind und von überall aus aufgerufen werden können, nur halt hier nicht.

Blessed is the mind too small for doubt

	Midimaster	Mi, Aug 24, 2011 10:40 Antworten mit Zitat
ist das wirklich reines BlitzMax??? Du hast da einige typische BB-Codestellen drin, die unter BlitzMax Fehler sind: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Local ButtonBild1 = LoadImage(ButtonFileNormal) ;MARKIERT in BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Local ButtonBild1 = LoadImage(ButtonFileNormal) 'MARKIERT BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Until KeyHit(1) in BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Until KeyHit(Key_Escape) Hier mal mein Vorschlag zur Button-Verwaltung: BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Type ButtonTyp ' wir erstellen einen Type, der alle benötigtn Eigenschaften für Buttons hat: Field PosX% , PosY% , SizeX% , SizeY% , Checked% ' die neue Eigenschaft Checked% merkt sich den Zustand des Buttons Field ButtonBild1:TImage , ButtonBild2:TImage ' das Laden wird nur 1x vor der REPEAT erfolgen Method Lade (ButtonFileNormal$ , ButtonFileMouseOn$ , PosX%, PosY%) ButtonBild1 = LoadImage(ButtonFileNormal) ButtonBild2 = LoadImage(ButtonFileMouseOn) PosX=X PosY=Y ' die Imagegröße lässt sich ausrechnen SizeX=ImageWidth(Buttonbild1) SizeY=ImageHeight(Buttonbild1) End Method 'das Malen erfolgt aufgrund der bekannten Fieldswerte und des letzten Checks: Method Male() If Checked=1 DrawImage ButtonBild2, Posx, Posy Else DrawImage ButtonBild1, Posx, Posy EndIf End Method ' das Checken getrennt vom Malen ist immer besser Method Check%() If MouseHit(1) ' Anmerkung: kann es sein, dass Du SIZE% in deinem Code falsch verwendest? Das Ende ist doch bei Pos+Size If (MouseX() >= PosX) And (MouseX() <= PosX+SizeX) And (MouseX() >= PosY) And (MouseY() <= PosY+Sizey) Checked=1 Return 1 EndIf EndIf Checked=0 Return 0 End Method End Type ExitButton:ButtonTyp = New ButtonTyp ExitButton.Lade("ButtonNormal.png", "ButtonMouseOn.png", 0, 0) Repeat 'hier alle Entscheidungen: If ExitButton.Check()=1 ...... EndIf ' hier alle Mal-Sachen ExitButton.Male Until KeyHit(Key_Escape)
Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

Midimaster

Mi, Aug 24, 2011 10:40
Antworten mit Zitat

ist das wirklich reines BlitzMax??? Du hast da einige typische BB-Codestellen drin, die unter BlitzMax Fehler sind:

BlitzBasic: [AUSKLAPPEN]

     Local ButtonBild1 = LoadImage(ButtonFileNormal) ;MARKIERT

in BlitzMax: [AUSKLAPPEN]

     Local ButtonBild1 = LoadImage(ButtonFileNormal) 'MARKIERT

BlitzBasic: [AUSKLAPPEN]

Until KeyHit(1)

in BlitzMax: [AUSKLAPPEN]

Until KeyHit(Key_Escape)

Hier mal mein Vorschlag zur Button-Verwaltung:

BlitzMax: [AUSKLAPPEN]

Type ButtonTyp
	' wir erstellen einen Type, der alle benötigtn Eigenschaften für Buttons hat:
	Field PosX% , PosY% , SizeX% , SizeY% , Checked%
	' die neue Eigenschaft Checked% merkt sich den Zustand des Buttons
	Field ButtonBild1:TImage , ButtonBild2:TImage
	
	
	
	' das Laden wird nur 1x vor der REPEAT erfolgen
	Method Lade (ButtonFileNormal$ , ButtonFileMouseOn$ , PosX%, PosY%)
			ButtonBild1 = LoadImage(ButtonFileNormal) 
			ButtonBild2 = LoadImage(ButtonFileMouseOn) 
			PosX=X
			PosY=Y
			' die Imagegröße lässt sich ausrechnen
			SizeX=ImageWidth(Buttonbild1)
			SizeY=ImageHeight(Buttonbild1)
	End Method

	
	'das Malen erfolgt aufgrund der bekannten Fieldswerte und des letzten Checks:
	Method Male()
		     If Checked=1
          			DrawImage ButtonBild2, Posx, Posy
			Else
				DrawImage ButtonBild1, Posx, Posy
			EndIf
	End Method

	
	' das Checken getrennt vom Malen ist immer besser
	Method Check%()
			If MouseHit(1) 
				' Anmerkung: kann es sein, dass Du SIZE% in deinem Code falsch verwendest? Das Ende ist doch bei Pos+Size
				If (MouseX() >= PosX) And (MouseX() <= PosX+SizeX) And (MouseX() >= PosY) And (MouseY() <= PosY+Sizey)
					Checked=1
					Return 1
				EndIf
			EndIf
			Checked=0
			Return 0
	End Method
	
End Type



ExitButton:ButtonTyp = New ButtonTyp
ExitButton.Lade("ButtonNormal.png", "ButtonMouseOn.png", 0, 0)
Repeat
	'hier alle Entscheidungen:
	If ExitButton.Check()=1
		......
	EndIf 
	
	' hier alle Mal-Sachen
	ExitButton.Male
Until KeyHit(Key_Escape)

Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

	PhillipK	Mi, Aug 24, 2011 11:27 Antworten mit Zitat
BladeRunner hat Folgendes geschrieben: BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Function bla() Global blub:TImage If blub = Null blub = LoadImage ... ... EDit: argh, das ist natürlich nur für einmal verwendete Ressourcen brauchbar. Ansonsten lager das ganze in einen eigenen Type aus wie vorgeschlagen. Mh, wieso macht mans nicht direkt so? Hier die funktion, die CO2 gepostet hat, erweitert um 2 felder für file-namenspeicherung, sowie 2 globals für die TImages. BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Function CreateAndUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int) 'Globale variablen.. Global ButtonBild1:TImage Global ButtonBild2:TImage Global BB1str:String Global BB2str:String 'Bilder nachladen, wenn nötig (BB1str und BB2str sollen die zuletzt geladenen filenamen halten!) If buttonbild1 = Null Or BB1str <> buttonFileNormal Then 'Bild entspricht nicht dem zuletzt eingelesenen oder ist null! BB1str = buttonFileNormal buttonbild1 = LoadImage(BB1str) 'nichtmehr makiert EndIf If buttonbild2 = Null Or BB2str <> buttonFileMouseOn Then 'Bild2 entspricht nicht dem zuletzt eingelesenen oder ist null! BB2str = buttonFileMouseOn buttonbild2 = LoadImage(BB2str) 'nichtmehr makiert EndIf 'Funktionsablauf... DrawImage ButtonBild1, Posx, Posy If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey DrawImage ButtonBild2, Posx, Posy If MouseHit(1) Return 1 EndIf EndIf Return 0 End Function Wenn das mit den globals innerhalb einer funktion stimmt, so müsste das funktionieren. Somit hast du lediglich 2 IF abfragen die je einen String vergleichen. Das nachladen der bilder passiert nur, wenn die angegebenen parametern nicht mit denen des letzten aufrufes übereinstimmen. Eventuell sollten die alten bilder vor dem laden der neuen noch gelöscht werden (wenn sie irgendwo anders Referenziert sind, gibts ein memleak!) Die funktion ist in soweit auch portierbar, da die Globalen innerhalb der funktion liegen -> Der Restliche teil des programms hat keinerlei zugriff darauf. Für mich klingt das so nach dem einfachsten weg - dies ist allerdings abzuwägen, denn je komplexer eine Programmstruktur sein soll, desto sauberer sollte man auch arbeiten. Das heißt, das ganze als Type könnte dennoch sinnvoll sein.

PhillipK

Mi, Aug 24, 2011 11:27
Antworten mit Zitat

BladeRunner hat Folgendes geschrieben:

BlitzMax: [AUSKLAPPEN]

Function bla()
    Global blub:TImage
    If blub = Null blub = LoadImage ...
    ...

EDit: argh, das ist natürlich nur für einmal verwendete Ressourcen brauchbar.
Ansonsten lager das ganze in einen eigenen Type aus wie vorgeschlagen.

Mh, wieso macht mans nicht direkt so?

Hier die funktion, die CO2 gepostet hat, erweitert um 2 felder für file-namenspeicherung, sowie 2 globals für die TImages.
BlitzMax: [AUSKLAPPEN]

Function CreateAndUpdateButton(ButtonFileNormal:String, ButtonFileMouseOn:String, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int)
     'Globale variablen..
     Global ButtonBild1:TImage
     Global ButtonBild2:TImage
     Global BB1str:String
     Global BB2str:String

     'Bilder nachladen, wenn nötig (BB1str und BB2str sollen die zuletzt geladenen filenamen halten!)
     If buttonbild1 = Null Or BB1str <> buttonFileNormal Then
             'Bild entspricht nicht dem zuletzt eingelesenen oder ist null!
             BB1str = buttonFileNormal
             buttonbild1 = LoadImage(BB1str) 'nichtmehr makiert 
     EndIf
     If buttonbild2 = Null Or BB2str <> buttonFileMouseOn Then
             'Bild2 entspricht nicht dem zuletzt eingelesenen oder ist null!
             BB2str = buttonFileMouseOn
             buttonbild2 = LoadImage(BB2str) 'nichtmehr makiert 
     EndIf

     'Funktionsablauf...
     DrawImage ButtonBild1, Posx, Posy

     If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey
          DrawImage ButtonBild2, Posx, Posy
          If MouseHit(1) 
                Return 1
          EndIf
     EndIf
     Return 0
End Function

Wenn das mit den globals innerhalb einer funktion stimmt, so müsste das funktionieren.
Somit hast du lediglich 2 IF abfragen die je einen String vergleichen. Das nachladen der bilder passiert nur, wenn die angegebenen parametern nicht mit denen des letzten aufrufes übereinstimmen.
Eventuell sollten die alten bilder vor dem laden der neuen noch gelöscht werden (wenn sie irgendwo anders Referenziert sind, gibts ein memleak!)

Die funktion ist in soweit auch portierbar, da die Globalen innerhalb der funktion liegen -> Der Restliche teil des programms hat keinerlei zugriff darauf.
Für mich klingt das so nach dem einfachsten weg - dies ist allerdings abzuwägen, denn je komplexer eine Programmstruktur sein soll, desto sauberer sollte man auch arbeiten. Das heißt, das ganze als Type könnte dennoch sinnvoll sein.

	Midimaster	Mi, Aug 24, 2011 11:38 Antworten mit Zitat
@PhillipK das hatte ich auch erst gedacht....und wollte ihm einen Tipp schreiben, der sehr nah an seinem Ausgangscode orientiert war. Der Haken ist aber, das man die Funktion alleine so nur für einen Button brauchen kann. Höchstens in der Kombination mit Bladerunners "TYPE und ABSTRACT" ist es verwendbar. Aber dies erschien mir nun sehr "abgehoben" und angesicht der Beginners-Corner unangebracht. Ich denke, die beste Lösung ist ein konsequent durchgezogener TYPE mit Fields, Funktionen und Methoden. In meinem Beispiel habe ich sogar die TList noch weggelassen.
Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

Midimaster

Mi, Aug 24, 2011 11:38
Antworten mit Zitat

@PhillipK
das hatte ich auch erst gedacht....und wollte ihm einen Tipp schreiben, der sehr nah an seinem Ausgangscode orientiert war.

Der Haken ist aber, das man die Funktion alleine so nur für einen Button brauchen kann. Höchstens in der Kombination mit Bladerunners "TYPE und ABSTRACT" ist es verwendbar. Aber dies erschien mir nun sehr "abgehoben" und angesicht der Beginners-Corner unangebracht.

Ich denke, die beste Lösung ist ein konsequent durchgezogener TYPE mit Fields, Funktionen und Methoden. In meinem Beispiel habe ich sogar die TList noch weggelassen.

Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

	Xeres Moderator	Mi, Aug 24, 2011 11:40 Antworten mit Zitat
Das macht keinen großen Sinn, weil die Funktion für exakt ein Bild gut ist, und man müsste für andere Bilder neue Funktionen schreiben - und Wiederverwendbarkeit ist der eigentliche Sinn von Funktionen. Deine Version hier ist auch nicht unbedingt besser als die weiter oben, wo jeden Schleifendurchlauf die Bilder neu geladen werden - jedenfalls wenn man 2 verschiedene Bilder hintereinander verwenden will. Wenn man keine Types verwenden will, muss man bloss ein Bild laden und dieses an die Funktion übergeben. Ich verwende immer Bilder mit mehreren Frames; Normal/Hover nebeneinander und gebe den Normal-Frame an, Hover = Normal-Frame+1. Mauskoordinaten & Klicks sind sowieso Global zugänglich - mit 3 bis 4 Parametern hat man hübsche, funktionelle Buttons.
Win10 Prof.(x64)/Ubuntu 16.04\|CPU 4x3Ghz (Intel i5-4590S)\|RAM 8 GB\|GeForce GTX 960 Wie man Fragen richtig stellt \|\| "Es geht nicht" \|\| Video-Tutorial: Sinus & Cosinus THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Xeres

Moderator

Mi, Aug 24, 2011 11:40
Antworten mit Zitat

Das macht keinen großen Sinn, weil die Funktion für exakt ein Bild gut ist, und man müsste für andere Bilder neue Funktionen schreiben - und Wiederverwendbarkeit ist der eigentliche Sinn von Funktionen.
Deine Version hier ist auch nicht unbedingt besser als die weiter oben, wo jeden Schleifendurchlauf die Bilder neu geladen werden - jedenfalls wenn man 2 verschiedene Bilder hintereinander verwenden will.

Wenn man keine Types verwenden will, muss man bloss ein Bild laden und dieses an die Funktion übergeben. Ich verwende immer Bilder mit mehreren Frames; Normal/Hover nebeneinander und gebe den Normal-Frame an, Hover = Normal-Frame+1. Mauskoordinaten & Klicks sind sowieso Global zugänglich - mit 3 bis 4 Parametern hat man hübsche, funktionelle Buttons.

	CO2 ehemals "SirMO"	Mi, Aug 24, 2011 19:03 Antworten mit Zitat
Ok, erstmal danke für die zahlreichen Antworten. Soo, @ Xeres: Und wie soll ich die dann mithilfe der Funktion anzeigen lassen? Es geht ja darum, das ich eine separate Funktion(/Type) habe, die sich um das Button zeichnen, das Button updaten, etc. kümmert. @ PhillipK: Kann ich denn die Types in externen dateien speichern und diese dann im hauptprogramm "laden"? (P.S.: Zitat: Stell dir ein Include so vor, als würde der Compiler rumrennen und jegliche per Include eingebundenen bmxdateien öffnen, die sourcecodes zusammenkopieren und dann als eine große datei Compilen. Das ist doch beim Import der Fall, ein Include ist einfach eine externe Funktionssammlung, die bevor sie in das hauptprogramm includiert wird compiliert wird... - oder nicht?) @ Midimaster: Den code hatte ich auf die schnelle dahingeschrieben... Deshalb die Fehler (hab immernoch syntax, etc. von BB im Kopf ). (P.S.: Zitat: In meinem Beispiel habe ich sogar die TList noch weggelassen. mal ne allgemeine Frage: Was ist eine List, und was macht die?) Soo, hoffe habe alles beantwortet, mfG, CO2
mfG, CO² Sprachen: BlitzMax, C, C++, C#, Java Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

CO2

ehemals "SirMO"

Mi, Aug 24, 2011 19:03
Antworten mit Zitat

Ok, erstmal danke für die zahlreichen Antworten. Soo,

@ Xeres: Und wie soll ich die dann mithilfe der Funktion anzeigen lassen? Es geht ja darum, das ich eine separate Funktion(/Type) habe, die sich um das Button zeichnen, das Button updaten, etc. kümmert.
@ PhillipK: Kann ich denn die Types in externen dateien speichern und diese dann im hauptprogramm "laden"?
(P.S.: Zitat:

Stell dir ein Include so vor, als würde der Compiler rumrennen und jegliche per Include eingebundenen bmxdateien öffnen, die sourcecodes zusammenkopieren und dann als eine große datei Compilen.

Das ist doch beim Import der Fall, ein Include ist einfach eine externe Funktionssammlung, die bevor sie in das hauptprogramm includiert wird compiliert wird... - oder nicht?)
@ Midimaster: Den code hatte ich auf die schnelle dahingeschrieben... Deshalb die Fehler (hab immernoch syntax, etc. von BB im Kopf Very Happy

). (P.S.: Zitat:

In meinem Beispiel habe ich sogar die TList noch weggelassen.

mal ne allgemeine Frage: Was ist eine List, und was macht die?)

Soo, hoffe habe alles beantwortet,
mfG,
CO2

mfG, CO²

Sprachen: BlitzMax, C, C++, C#, Java
Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

	Xeres Moderator	Mi, Aug 24, 2011 19:11 Antworten mit Zitat
CO2 hat Folgendes geschrieben: Und wie soll ich die dann mithilfe der Funktion anzeigen lassen? ...DrawImage? Kann sein, das ich kein Gefühl mehr für die Schwierigkeit dabei habe - möchtest du ein Beispiel? Wie man Listen verwendet, solltest du dir in jedem Fall aneignen. Darin speichert man die Referenzen zu seinen Objekten (das was in BlitzBasic automatisch passiert).
Win10 Prof.(x64)/Ubuntu 16.04\|CPU 4x3Ghz (Intel i5-4590S)\|RAM 8 GB\|GeForce GTX 960 Wie man Fragen richtig stellt \|\| "Es geht nicht" \|\| Video-Tutorial: Sinus & Cosinus THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Xeres

Moderator

Mi, Aug 24, 2011 19:11
Antworten mit Zitat

CO2 hat Folgendes geschrieben:

Und wie soll ich die dann mithilfe der Funktion anzeigen lassen?

...DrawImage? Kann sein, das ich kein Gefühl mehr für die Schwierigkeit dabei habe - möchtest du ein Beispiel?

Wie man Listen verwendet, solltest du dir in jedem Fall aneignen. Darin speichert man die Referenzen zu seinen Objekten (das was in BlitzBasic automatisch passiert).

	CO2 ehemals "SirMO"	Mi, Aug 24, 2011 19:17 Antworten mit Zitat
Ok, hier mal ein schnell dahingeschriebener Code, wie ich mir das vorstelle: BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] 'VARIABLEN Global Bild1 = LoadImage("data\bild1.png") Global Bild2 = LoadImage("data\bild2.png") Global beendenbuttonueberpruefen = 0 'HAUPTSCHLEIFE Repeat beendenbuttonueberpruefen = CreateAndUpdateButton(Bild1, Bild2, 0, 0, 150, 50, MouseX(), MouseY()) If(beendenbuttonueberpruefen = 1) Exit EndIf Until KeyHit(KEY_ESCAPE) End 'FUNKTIONEN Function CreateAndUpdateButton(ButtonFileNormal:Int, ButtonFileMouseOn:Int, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int) DrawImage ButtonFileNormal, Posx, Posy If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey DrawImage ButtonFileMouseOn, Posx, Posy If MouseHit(1) Return 1 EndIf EndIf Return 0 End Function Oder wie meinst du das? "List" werde ich mir anschauen mfG, CO2
mfG, CO² Sprachen: BlitzMax, C, C++, C#, Java Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

CO2

ehemals "SirMO"

Mi, Aug 24, 2011 19:17
Antworten mit Zitat

Ok, hier mal ein schnell dahingeschriebener Code, wie ich mir das vorstelle:
BlitzMax: [AUSKLAPPEN]

'VARIABLEN
Global Bild1 = LoadImage("data\bild1.png")
Global Bild2 = LoadImage("data\bild2.png")
Global beendenbuttonueberpruefen = 0

'HAUPTSCHLEIFE
Repeat
     beendenbuttonueberpruefen = CreateAndUpdateButton(Bild1, Bild2, 0, 0, 150, 50, MouseX(), MouseY())
     If(beendenbuttonueberpruefen = 1)
          Exit
     EndIf     
Until KeyHit(KEY_ESCAPE)
End

'FUNKTIONEN
Function CreateAndUpdateButton(ButtonFileNormal:Int, ButtonFileMouseOn:Int, Posx:Int, Posy:Int, Sizex:Int, Sizey:Int, MousexPos:Int, MouseyPos:Int)
     DrawImage ButtonFileNormal, Posx, Posy

     If MousexPos >= Posx And MousexPos <= Sizex And MouseyPos >= Posy And MouseyPos <= Sizey
          DrawImage ButtonFileMouseOn, Posx, Posy
          If MouseHit(1) 
                Return 1
          EndIf
     EndIf
     Return 0
End Function

Oder wie meinst du das?
"List" werde ich mir anschauen Wink

mfG,
CO2

mfG, CO²

Sprachen: BlitzMax, C, C++, C#, Java
Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

	Xeres Moderator	Mi, Aug 24, 2011 19:41 Antworten mit Zitat
Wenn du kein SuperStrict / Strict am Anfang des Codes zu stehen hast, ist der Code kaum zu gebrauchen. Bilder sind Timage Objekte und sollten als solche verwendet werden. Int handel sind langsam und du kannst keine Methoden darauf anwenden (glaub ich - kam mir nie in den Sinn das aus zu probieren). Ansonsten: Ja, außer das ich die Funktion einfach "Button" und direkt in die If-Abfrage schreiben würde. If Button(...) then... und die Maus-Daten sind bestimmt auch Global gut aufgehoben, die als Parameter zu übergeben würde ich sparen.
Win10 Prof.(x64)/Ubuntu 16.04\|CPU 4x3Ghz (Intel i5-4590S)\|RAM 8 GB\|GeForce GTX 960 Wie man Fragen richtig stellt \|\| "Es geht nicht" \|\| Video-Tutorial: Sinus & Cosinus THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Xeres

Moderator

Mi, Aug 24, 2011 19:41
Antworten mit Zitat

Wenn du kein SuperStrict / Strict am Anfang des Codes zu stehen hast, ist der Code kaum zu gebrauchen. Bilder sind Timage Objekte und sollten als solche verwendet werden. Int handel sind langsam und du kannst keine Methoden darauf anwenden (glaub ich - kam mir nie in den Sinn das aus zu probieren).

Ansonsten: Ja, außer das ich die Funktion einfach "Button" und direkt in die If-Abfrage schreiben würde.
If Button(...) then... und die Maus-Daten sind bestimmt auch Global gut aufgehoben, die als Parameter zu übergeben würde ich sparen.

	Midimaster	Mi, Aug 24, 2011 20:06 Antworten mit Zitat
also ich würde folgendes ändern: 1. SizeX und SizeY können direkt aus dem Bild gelesen werden. Also mach es nicht selbst! 2. Es macht keinen Sinn, bei gedrückter Maus zunächst das Bild1 zeichnen zu lassen, um es dan mit Bild2 zu übermalen. Also IF...ELSE...ENDIF 3. Die Bilder die du übergibst sind vom Typ TIMAGE und nicht vom Typ INT 4. Wenn die Funktion etwas zurückgibt, dann ist sie selbst vom Typ INT 5. Die Zwischenspeicherung in beendenbuttonueberpruefen ist unnötig 6. Die Mouse() muss nicht übergeben werden. Sie steht auch in der Funktion zur Verfügung. BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] 'VARIABLEN Global Bild1 = LoadImage("data\bild1.png") Global Bild2 = LoadImage("data\bild2.png") 'HAUPTSCHLEIFE Repeat If CreateAndUpdateButton(Bild1, Bild2, 0, 0) Exit EndIf Until KeyHit(KEY_ESCAPE) End 'FUNKTIONEN Function CreateAndUpdateButton:Int( ButtonNormal:TImage, ButtonMouseOn:TImage, Posx:Int, Posy:Int) Local SizeX:Int , SizeY:Int SizeX=ImageWidth(ButtonNormal) SizeY=ImageHeight(ButtonNormal) If MouseX() >= Posx And MouseX() <= (SizeX+PosX) And MouseyPos >= Posy And MouseyPos <= (SizeY + PosY) DrawImage ButtonMouseOn, Posx, Posy If MouseHit(1) Return 1 EndIf Else DrawImage ButtonNormal, Posx, Posy EndIf Return 0 End Function
Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

Midimaster

Mi, Aug 24, 2011 20:06
Antworten mit Zitat

also ich würde folgendes ändern:

1.
SizeX und SizeY können direkt aus dem Bild gelesen werden. Also mach es nicht selbst!

2.
Es macht keinen Sinn, bei gedrückter Maus zunächst das Bild1 zeichnen zu lassen, um es dan mit Bild2 zu übermalen. Also IF...ELSE...ENDIF

3.
Die Bilder die du übergibst sind vom Typ TIMAGE und nicht vom Typ INT

4.
Wenn die Funktion etwas zurückgibt, dann ist sie selbst vom Typ INT

5.
Die Zwischenspeicherung in beendenbuttonueberpruefen ist unnötig

6.
Die Mouse() muss nicht übergeben werden. Sie steht auch in der Funktion zur Verfügung.

BlitzMax: [AUSKLAPPEN]

'VARIABLEN
Global Bild1 = LoadImage("data\bild1.png")
Global Bild2 = LoadImage("data\bild2.png")

'HAUPTSCHLEIFE
Repeat
     If CreateAndUpdateButton(Bild1, Bild2, 0, 0)
          Exit
     EndIf     
Until KeyHit(KEY_ESCAPE)
End

'FUNKTIONEN
Function CreateAndUpdateButton:Int( ButtonNormal:TImage, ButtonMouseOn:TImage, Posx:Int, Posy:Int)
	Local SizeX:Int , SizeY:Int
	SizeX=ImageWidth(ButtonNormal)
	SizeY=ImageHeight(ButtonNormal)
		
     If MouseX() >= Posx And MouseX() <= (SizeX+PosX) And MouseyPos >= Posy And MouseyPos <= (SizeY + PosY)
          DrawImage ButtonMouseOn, Posx, Posy
          If MouseHit(1) 
                Return 1
          EndIf
	Else
     		DrawImage ButtonNormal, Posx, Posy	
	EndIf
     Return 0
End Function

Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

	CO2 ehemals "SirMO"	Mi, Aug 24, 2011 23:29 Antworten mit Zitat
Hallo, @ Xeres: Bin es noch aus BB gewohnt, dort waren Bilder immer Ints @ Midimaster: 1. Da wusste ich den Befehl nicht 2. Der Code war schnell hingeschrieben 3. siehe Xeres 4. Verstehe ich nicht... Die Funktion soll doch einen Int zurückgeben, deshalb ja auch return 0 oder return 1 5. Siehe 2. 6. Ok, das war dann ein Folgefehler: Also, eigentlich werden MouseX() und MouseY() in einer Globalen Variable gespeichert, der schnelligkeit halber habe ich dies im obigen Code ausgelassen und die Werte direkt als Parameter der Funktion übergeben. Deshalb benutze ich die Mouse() befehle auch nicht in der Funktion... Besten dank euch beiden, denke das Thema hat sich geklärt mfG, CO2
mfG, CO² Sprachen: BlitzMax, C, C++, C#, Java Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

CO2

ehemals "SirMO"

Mi, Aug 24, 2011 23:29
Antworten mit Zitat

Hallo,
@ Xeres: Bin es noch aus BB gewohnt, dort waren Bilder immer Ints Very Happy

@ Midimaster:
1. Da wusste ich den Befehl nicht Embarassed

2. Der Code war schnell hingeschrieben Embarassed

3. siehe Xeres
4. Verstehe ich nicht... Die Funktion soll doch einen Int zurückgeben, deshalb ja auch return 0 oder return 1 Wink

5. Siehe 2.
6. Ok, das war dann ein Folgefehler: Also, eigentlich werden MouseX() und MouseY() in einer Globalen Variable gespeichert, der schnelligkeit halber habe ich dies im obigen Code ausgelassen und die Werte direkt als Parameter der Funktion übergeben. Deshalb benutze ich die Mouse() befehle auch nicht in der Funktion...

Besten dank euch beiden, denke das Thema hat sich geklärt Wink

mfG,
CO2

mfG, CO²

Sprachen: BlitzMax, C, C++, C#, Java
Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

	Midimaster	Mi, Aug 24, 2011 23:58 Antworten mit Zitat
Ist das nun ein Fall von "Einsicht" oder "Beratungsresistenz"??? Klingt so, als hätte er nichts geändert....oder nichts ändern wollen... zu 1.) Und? weißt du ihn jetzt? zu 2.) also hast du es gelassen, oder was? zu 3.) heißt das nun, du hast es eingesehen und bist Xeres Weg gefolgt, oder heißt es, ich soll mir das Fett, das Xeres abgekriegt hat, mit ihm teilen? zu 4.) Ja!!! dann schreib auch INT hinter die Funktion! BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Function CreateAndUpdateButton:Int( .... zu 5.) da isses mir wurscht, wie du es machst.... zu 6.) Ich glaub, du hast es immer noch nicht gerafft! Glaub ich's noch? Also Junge, du sollst dich nicht für Deine Fehler entschuldigen! du sollst Sie ausbessern... velleicht gehört das alles in den Fu-Thread verschoben?
Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

Midimaster

Mi, Aug 24, 2011 23:58
Antworten mit Zitat

Ist das nun ein Fall von "Einsicht" oder "Beratungsresistenz"???

Klingt so, als hätte er nichts geändert....oder nichts ändern wollen...

zu 1.)
Und? weißt du ihn jetzt?

zu 2.)
also hast du es gelassen, oder was?

zu 3.)
heißt das nun, du hast es eingesehen und bist Xeres Weg gefolgt, oder heißt es, ich soll mir das Fett, das Xeres abgekriegt hat, mit ihm teilen?

zu 4.)
Ja!!! dann schreib auch INT hinter die Funktion!
BlitzMax: [AUSKLAPPEN]

Function CreateAndUpdateButton:Int( ....

zu 5.)
da isses mir wurscht, wie du es machst....

zu 6.)
Ich glaub, du hast es immer noch nicht gerafft! Glaub ich's noch?

Also Junge, du sollst dich nicht für Deine Fehler entschuldigen! du sollst Sie ausbessern...

velleicht gehört das alles in den Fu-Thread verschoben? Wink

Gewinner des BCC #53 mit "Gitarrist vs Fussballer" http://www.midimaster.de/downl...ssball.exe

	CO2 ehemals "SirMO"	Do, Aug 25, 2011 1:46 Antworten mit Zitat
Was hast du denn?! Komm mal wieder runter, ich habe dir nichts getan! Es ist ein Fall von Einsicht (sonst hätte ich wohl kaum nach ner besseren Lösung gefragt, oder?) 1.) Jo, kann man so sagen... 2.) Den Code habe ich noch nirgendswo stehen, er war lediglich als Muster gedacht... Und weil ich wusste, das es bessere Arten gibt, das umzusetzten, habe ich ihn so hier stehen lassen... 3.) Was soll ich darauf noch sagen?! Da fällt mir echt nix mehr zu ein!!! Denk mal bitte über die Antwort von dir nach und sag mir was ich darauf hätte antworten sollen! 4.) WIESO? BMax kann das auch ohne das es dahinter steht! EDIT: Ich lasse mich belehren: Das kann BMax doch nicht... 5.) Ja dann. 6.) Zitat: Ich glaub, du hast es immer noch nicht gerafft! Glaub ich's noch? Also ohne Witz... was soll das denn bitte?! Zitat: Also Junge, du sollst dich nicht für Deine Fehler entschuldigen! du sollst Sie ausbessern... Ich habe mich nicht dafür entschuldigt, ich habe sie gerechtfertigt! Und wieso in Gottes Namen sollte ich die Fehler in dem Code der in diesem Threat steht ausbessern?! Das hat doch keinen sinn, in einer woche wird sich jmd diesen Threat anschauen und fragen was der denn soll, der Code wäre doch von anfang an richtig gewesen. Außerdem hilft die Fertige lösung keinem Anfänger, da sie wahrscheinlich nicht wissen werden, was der Code macht, und das läuft auf ein stupides Copy'n'Paste hinaus. mfG, CO2 P.S.: Wenn die Antwort etwas pampig klang, schaut warum ich sie geschrieben habe! Bei dem Jungen fällt mir echt nix mehr ein.
mfG, CO² Sprachen: BlitzMax, C, C++, C#, Java Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

CO2

ehemals "SirMO"

Do, Aug 25, 2011 1:46
Antworten mit Zitat

Was hast du denn?! Komm mal wieder runter, ich habe dir nichts getan! Rolling Eyes

Es ist ein Fall von Einsicht (sonst hätte ich wohl kaum nach ner besseren Lösung gefragt, oder?)
1.) Jo, kann man so sagen...
2.) Den Code habe ich noch nirgendswo stehen, er war lediglich als Muster gedacht... Und weil ich wusste, das es bessere Arten gibt, das umzusetzten, habe ich ihn so hier stehen lassen...
3.) Was soll ich darauf noch sagen?! Da fällt mir echt nix mehr zu ein!!! Denk mal bitte über die Antwort von dir nach und sag mir was ich darauf hätte antworten sollen!
4.) WIESO? BMax kann das auch ohne das es dahinter steht! EDIT: Ich lasse mich belehren: Das kann BMax doch nicht...
5.) Ja dann.
6.) Zitat:

Ich glaub, du hast es immer noch nicht gerafft! Glaub ich's noch?

Also ohne Witz... was soll das denn bitte?!

Zitat:

Also Junge, du sollst dich nicht für Deine Fehler entschuldigen! du sollst Sie ausbessern...

Ich habe mich nicht dafür entschuldigt, ich habe sie gerechtfertigt! Und wieso in Gottes Namen sollte ich die Fehler in dem Code der in diesem Threat steht ausbessern?! Das hat doch keinen sinn, in einer woche wird sich jmd diesen Threat anschauen und fragen was der denn soll, der Code wäre doch von anfang an richtig gewesen. Außerdem hilft die Fertige lösung keinem Anfänger, da sie wahrscheinlich nicht wissen werden, was der Code macht, und das läuft auf ein stupides Copy'n'Paste hinaus.
mfG,
CO2

P.S.: Wenn die Antwort etwas pampig klang, schaut warum ich sie geschrieben habe! Bei dem Jungen fällt mir echt nix mehr ein.

mfG, CO²

Sprachen: BlitzMax, C, C++, C#, Java
Hardware: Windows 7 Ultimate 64-Bit, AMX FX-6350 (6x3,9 GHz), 32 GB RAM, Nvidia GeForce GTX 750 Ti

Zuletzt bearbeitet von CO2 am Do, Aug 25, 2011 3:25, insgesamt einmal bearbeitet

Gehe zu Seite 1, 2 Weiter

Übersicht

BlitzMax, BlitzMax NG

Beginners-Corner

Nach Oben

BlitzBasic Portal

[GELÖST] Eine MenuButton Erstell Funktion erstellen?

Betreff: [GELÖST] Eine MenuButton Erstell Funktion erstellen?