Alle TypeEinträge durchgehen

Übersicht

BlitzMax, BlitzMax NG

Allgemein

	Artemis Betreff: Alle TypeEinträge durchgehen	Mo, Jul 04, 2005 19:20 Antworten mit Zitat
Wie kann ich alle Einträge von einem Type durchgehen. In Bb gings mit For-Each. Aber in BMax net!! Wie funzt das hier??

Artemis

Betreff: Alle TypeEinträge durchgehen

Mo, Jul 04, 2005 19:20
Antworten mit Zitat

Wie kann ich alle Einträge von einem Type durchgehen.
In Bb gings mit For-Each.

Aber in BMax net!!

Wie funzt das hier??

	simi	Mo, Jul 04, 2005 19:23 Antworten mit Zitat
Hi..... du musst in BMax deine Types in eigenen Listen verwalten..... Du musst dasbei die Typeeintrage zu einer Liste hinzufügen, etwa so: link = list.adllast(deinObjekt:TObjekt) Ich hab zum erlernen mal von BMax etwas einfaches gemacht...... Kannst dich ja mal durch den Code wühlen http://chat-blitz.de/freepasting/view.php?id=9 cu simi

simi

Mo, Jul 04, 2005 19:23
Antworten mit Zitat

Hi.....

du musst in BMax deine Types in eigenen Listen verwalten.....
Du musst dasbei die Typeeintrage zu einer Liste hinzufügen, etwa so:
link = list.adllast(deinObjekt:TObjekt)

Ich hab zum erlernen mal von BMax etwas einfaches gemacht...... Kannst dich ja mal durch den Code wühlen
http://chat-blitz.de/freepasting/view.php?id=9

cu simi

	konstantin	Mo, Jul 04, 2005 19:24 Antworten mit Zitat
BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] For i = EachIn list .... Next

konstantin

Mo, Jul 04, 2005 19:24
Antworten mit Zitat

BlitzBasic: [AUSKLAPPEN]

For i = EachIn list
....
Next

	Travis	Fr, Jul 08, 2005 21:59 Antworten mit Zitat
Wenn man sowas zum ersten Mal macht, ist das ganz schön verwirrend. BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Global ResX = 640 Global ResY = 480 Type star Field x#, y#, layer Field link:TLink End Type Global StarList:TList = New TList For i= 0 To 250 s:star = New star s.x = Rnd(ResX) s.y = Rnd(ResY) s.layer = Rnd(4) s.link = StarList.addlast(s:star) Next Graphics ResX, ResY, 16, 2 Repeat Cls For s:Star = EachIn StarList Plot s.x, s.y Next DrawText (\"Dies ist ein Test.\", 0,0) Flip Until KeyHit(1) End Warum muss der Type eine Variable für den Listeneintrag haben? Das Beispiel funzt übrigens.
www.funforge.org Ich hasse WASD-Steuerung. Man kann alles sagen, man muss es nur vernünftig begründen können.

Travis

Fr, Jul 08, 2005 21:59
Antworten mit Zitat

Wenn man sowas zum ersten Mal macht, ist das ganz schön verwirrend.

BlitzBasic: [AUSKLAPPEN]


Global ResX = 640
Global ResY = 480

Type star
 Field x#, y#, layer
 Field link:TLink
End Type

Global StarList:TList = New TList

For i= 0 To 250
 s:star = New star
 s.x = Rnd(ResX)
 s.y = Rnd(ResY)
 s.layer = Rnd(4)
 s.link = StarList.addlast(s:star)
Next


Graphics ResX, ResY, 16, 2
Repeat
 Cls

   For s:Star = EachIn StarList
    Plot s.x, s.y
   Next

  DrawText (\"Dies ist ein Test.\", 0,0)
 
 Flip
Until KeyHit(1)
End

Warum muss der Type eine Variable für den Listeneintrag haben? Das Beispiel funzt übrigens.

www.funforge.org

Ich hasse WASD-Steuerung.

Man kann alles sagen, man muss es nur vernünftig begründen können.

	Suco-X Betreff: .....	Fr, Jul 08, 2005 22:05 Antworten mit Zitat
hi Muss nicht. Aber TList.Remove(Object) muss erstmal nach dem Object in der Liste suchen und TLink.Remove() nicht. Wenn man also viele Einträge hat die immer entfernt werden müssen, ist ein Linkeintrag zum flotten entfernen nicht verkehrt. Mfg Suco
Intel Core 2 Quad Q8300, 4× 2500 MHz, 4096 MB DDR2-Ram, GeForce 9600GT 512 MB

Suco-X

Betreff: .....

Fr, Jul 08, 2005 22:05
Antworten mit Zitat

hi
Muss nicht. Aber

TList.Remove(Object) muss erstmal nach dem Object in der Liste suchen und
TLink.Remove() nicht.
Wenn man also viele Einträge hat die immer entfernt werden müssen, ist ein Linkeintrag zum flotten entfernen nicht verkehrt.
Mfg Suco

Intel Core 2 Quad Q8300, 4× 2500 MHz, 4096 MB DDR2-Ram, GeForce 9600GT 512 MB

	regaa	Fr, Jul 08, 2005 22:35 Antworten mit Zitat
Und ich hab so ein schönes Beispiel gemacht http://www.blitzwiki.de/index....harp=Blitz
UltraMixer Professional 3 - Download QB,HTML,CSS,JS,PHP,SQL,>>B2D,B3D,BP,BlitzMax,C,C++,Java,C#,VB6 , C#, VB.Net