types!!!

Übersicht

BlitzBasic

Beginners-Corner

	playmate Gast Betreff: types!!!	Fr, Jan 14, 2005 20:06 Antworten mit Zitat
ich fange jetzt an types zu lernen!! was ist hier falsch?? Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ End Type For i = 1 To 10 i = New wesen i\typ = Rnd(1,100) Next For i = 1 To 10 Print i\typ Next WaitKey End

playmate

Gast

Betreff: types!!!

Fr, Jan 14, 2005 20:06
Antworten mit Zitat

ich fange jetzt an types zu lernen!!
was ist hier falsch??
Code: [AUSKLAPPEN]

Type wesen
Field typ
End Type

For i = 1 To 10
i = New wesen
i\typ = Rnd(1,100)
Next
For i = 1 To 10
Print i\typ
Next
WaitKey End

	Blitzkrieg Bop	Fr, Jan 14, 2005 20:10 Antworten mit Zitat
Hi! Guck dir lieber nochmal die Type-Sachen genauer an. Ich hab dir einfach mal den Code verbessert: Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ End Type For i = 1 To 10 w.wesen = New wesen w\typ = Rnd(1,100) Next For w.wesen = Each wesen Print w\typ Next WaitKey:End
~ Hey Ho Let's Go ~

Blitzkrieg Bop

Fr, Jan 14, 2005 20:10
Antworten mit Zitat

Hi!
Guck dir lieber nochmal die Type-Sachen genauer an.
Ich hab dir einfach mal den Code verbessert:
Code: [AUSKLAPPEN]

Type wesen
Field typ
End Type

For i = 1 To 10
w.wesen = New wesen
w\typ = Rnd(1,100)
Next
For w.wesen = Each wesen
Print w\typ
Next
WaitKey:End

~ Hey Ho Let's Go ~

	Rallimen Sieger des 30-EUR-Wettbewerbs	Fr, Jan 14, 2005 20:10 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ End Type For z = 1 To 10 i.wesen = New wesen i\typ = Rnd(1,100) Next For i.wesen = Each wesen Print i\typ Next WaitKey End
[BB2D \| BB3D \| BB+]

Rallimen

Sieger des 30-EUR-Wettbewerbs

Fr, Jan 14, 2005 20:10
Antworten mit Zitat

Code: [AUSKLAPPEN]

Type wesen
Field typ
End Type

For z = 1 To 10
i.wesen = New wesen
i\typ = Rnd(1,100)
Next
For i.wesen = Each wesen
Print i\typ
Next
WaitKey
End

[BB2D | BB3D | BB+]

	Waveblue	Fr, Jan 14, 2005 20:15 Antworten mit Zitat
du must in schon in den Type-Einträgen weiter springen! du printest ja immer vom ersten Eintrag den Wert!
This is 10% luck 20% skill 15% concentrated power of will 5% pleasure, 50% pain and 100% reason to remember the name

Waveblue

Fr, Jan 14, 2005 20:15
Antworten mit Zitat

du must in schon in den Type-Einträgen weiter springen!
du printest ja immer vom ersten Eintrag den Wert!

This is 10% luck
20% skill
15% concentrated power of will
5% pleasure, 50% pain
and 100% reason to remember the name

	Darren	Fr, Jan 14, 2005 21:52 Antworten mit Zitat
er hat einfach das field typ nicht als flaot deklariert sondern als integer und rnd ermittelt floats so weit ich weiß und wenn mann floats in einem integer speichern will passiert logischerwiese nix oder es kommt 0 raus. hat nichts mit types zu tun
MFG Darren

Darren

Fr, Jan 14, 2005 21:52
Antworten mit Zitat

er hat einfach das field typ nicht als flaot deklariert sondern als integer und rnd ermittelt floats so weit ich weiß und wenn mann floats in einem integer speichern will passiert logischerwiese nix oder es kommt 0 raus.
hat nichts mit types zu tun

MFG Darren

	Waveblue	Fr, Jan 14, 2005 22:10 Antworten mit Zitat
ah, der Feher ist der: Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ End Type For i = 1 To 10 i = New wesen ;<--- i ist schon die Variable der For-Nextschleife i\typ = Rnd(1,100) Next For i = 1 To 10 Print i\typ Next WaitKey End Außerdem musst du i.wesen als Local oder Global deklarieren!!! Und Waitkey braucht Klammern! Und du musst in den Einträgen weiterspringen! Also erwa so: Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ End Type Global i.wesen For a = 1 To 10 i = New wesen i\typ = Rnd(1,100) Next For i = each wesen Print i\typ Next WaitKey() End
This is 10% luck 20% skill 15% concentrated power of will 5% pleasure, 50% pain and 100% reason to remember the name

Waveblue

Fr, Jan 14, 2005 22:10
Antworten mit Zitat

ah, der Feher ist der:
Code: [AUSKLAPPEN]

Type wesen
Field typ
End Type

For i = 1 To 10
i = New wesen ;<--- i ist schon die Variable der For-Nextschleife
i\typ = Rnd(1,100)
Next
For i = 1 To 10
Print i\typ
Next
WaitKey End

Außerdem musst du i.wesen als Local oder Global deklarieren!!!
Und Waitkey braucht Klammern!
Und du musst in den Einträgen weiterspringen!

Also erwa so:
Code: [AUSKLAPPEN]

Type wesen
Field typ
End Type

Global i.wesen

For a = 1 To 10
i = New wesen
i\typ = Rnd(1,100)
Next
For i = each wesen
Print i\typ
Next
WaitKey()
End

This is 10% luck
20% skill
15% concentrated power of will
5% pleasure, 50% pain
and 100% reason to remember the name

	Blitzkrieg Bop	Fr, Jan 14, 2005 22:34 Antworten mit Zitat
Warum guckt ihr nicht einfach nach oben, wo schon 2 mal die richtige Antwort gegeben wurde? Und siehe da: Zitat: Und Waitkey braucht Klammern! Es geht auch ohne Klammern
~ Hey Ho Let's Go ~

Blitzkrieg Bop

Fr, Jan 14, 2005 22:34
Antworten mit Zitat

Warum guckt ihr nicht einfach nach oben, wo schon 2 mal die richtige Antwort gegeben wurde?
Und siehe da:
Zitat:

Und Waitkey braucht Klammern!

Es geht auch ohne Klammern Rolling Eyes

~ Hey Ho Let's Go ~

	Waveblue	Fr, Jan 14, 2005 22:37 Antworten mit Zitat
sorry zumindest hab ich erklärt, was ich verändert hab
This is 10% luck 20% skill 15% concentrated power of will 5% pleasure, 50% pain and 100% reason to remember the name

Waveblue

Fr, Jan 14, 2005 22:37
Antworten mit Zitat

sorry

zumindest hab ich erklärt, was ich verändert hab Exclamation

This is 10% luck
20% skill
15% concentrated power of will
5% pleasure, 50% pain
and 100% reason to remember the name

	Blitzkrieg Bop	Sa, Jan 15, 2005 0:45 Antworten mit Zitat
Hi! Jo, stimmt natürlich! Aber wenn man solche einfachen Sachen nicht selbst rausfinden kann, sollte man wirklich nochmal nachlernen. Denn schließlich sollte man auch verstehen, was man so codet. Deshalb habe ich auch nur darauf verwiesen, das sich der Topicstarter lieber nochmal die Type-Sachen angucken soll. Nichts für Ungut.
~ Hey Ho Let's Go ~

Blitzkrieg Bop

Sa, Jan 15, 2005 0:45
Antworten mit Zitat

Hi!
Jo, stimmt natürlich!
Aber wenn man solche einfachen Sachen nicht selbst rausfinden kann, sollte man wirklich nochmal nachlernen. Denn schließlich sollte man auch verstehen, was man so codet. Deshalb habe ich auch nur darauf verwiesen, das sich der Topicstarter lieber nochmal die Type-Sachen angucken soll.
Nichts für Ungut. Razz

~ Hey Ho Let's Go ~

	Hubsi	Sa, Jan 15, 2005 11:38 Antworten mit Zitat
DarrenSharm hat Folgendes geschrieben: er hat einfach das field typ nicht als flaot deklariert sondern als integer und rnd ermittelt floats so weit ich weiß und wenn mann floats in einem integer speichern will passiert logischerwiese nix oder es kommt 0 raus. Wer hat Dir den Schmarrn eingetrichtert Thema automatische Typumwandlung
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

Hubsi

Sa, Jan 15, 2005 11:38
Antworten mit Zitat

DarrenSharm hat Folgendes geschrieben:

Wer hat Dir den Schmarrn eingetrichtert Very Happy

Thema automatische Typumwandlung Wink

Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

	Dreamora	Sa, Jan 15, 2005 12:50 Antworten mit Zitat
Type wesen Field typ End Type For i = 1 To 10 a.Wesen = New wesen a\typ = Rnd(1,100) Next For a = Each Wesen Print a\typ Next WaitKey End Für die genauen Warums bitte in der Hilfe unter Costum Types nachlesen.
Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.

Dreamora

Sa, Jan 15, 2005 12:50
Antworten mit Zitat

Type wesen
Field typ
End Type

For i = 1 To 10
a.Wesen = New wesen
a\typ = Rnd(1,100)
Next
For a = Each Wesen
Print a\typ
Next
WaitKey
End

Für die genauen Warums bitte in der Hilfe unter Costum Types nachlesen.

Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.

	Blitzkrieg Bop	Sa, Jan 15, 2005 12:54 Antworten mit Zitat
Wie oft soll hier noch die Lösung gepostet werden?
~ Hey Ho Let's Go ~

Blitzkrieg Bop

Sa, Jan 15, 2005 12:54
Antworten mit Zitat

Wie oft soll hier noch die Lösung gepostet werden? Very Happy

~ Hey Ho Let's Go ~

	playmate Gast	So, Jan 16, 2005 13:11 Antworten mit Zitat
Ich habe noch eine Frage! Ich habe eine Schleife, in der die Wesen abgefragt werden. Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ End Type Global selectwesen.wesen For selectwesen = Each wesen ;CODE ;CODE ;CODE Next In dieser Schleife möchte ich ein neues "Wesen" erstellen, wobei ich mit dem Eintrag Code: [AUSKLAPPEN] [EINKLAPPEN] selectwesen dennoch das alte "wesen" ansprechen kann, und nicht das neu erstellte!

playmate

Gast

So, Jan 16, 2005 13:11
Antworten mit Zitat

Ich habe noch eine Frage!
Ich habe eine Schleife, in der die Wesen abgefragt werden.
Code: [AUSKLAPPEN]

Type wesen
Field typ
End Type

Global selectwesen.wesen

For selectwesen = Each wesen
;CODE
;CODE
;CODE
Next

In dieser Schleife möchte ich ein neues "Wesen" erstellen, wobei ich mit dem Eintrag Code: [AUSKLAPPEN]

selectwesen

dennoch das alte "wesen" ansprechen kann, und nicht das neu erstellte!

	Hubsi	So, Jan 16, 2005 13:21 Antworten mit Zitat
Mit Handle das handle des Types speichern, neuen erstellen und via Object wieder das alte zuweisen. Den genauen Syntax hab ich jetzt nicht im Kopf, brauch das nicht oft
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

Hubsi

So, Jan 16, 2005 13:21
Antworten mit Zitat

Mit Handle das handle des Types speichern, neuen erstellen und via Object wieder das alte zuweisen. Den genauen Syntax hab ich jetzt nicht im Kopf, brauch das nicht oft Wink

Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

	playmate Gast	So, Jan 16, 2005 20:54 Antworten mit Zitat
habs probiert: klappt Code: [AUSKLAPPEN] [EINKLAPPEN] Type wesen Field typ Field art End Type Local one.wesen one.wesen = New wesen one\typ = 1 one\art = 2 handlevar = Handle(one) one.wesen = New wesen one\typ = 3 one\art = 4 one.wesen = Object.wesen(handlevar) Print one\typ Print one\art

playmate

Gast

So, Jan 16, 2005 20:54
Antworten mit Zitat

habs probiert:
klappt Very Happy

Code: [AUSKLAPPEN]

Type wesen
Field typ
Field art
End Type

Local one.wesen

one.wesen = New wesen
one\typ = 1
one\art = 2
handlevar = Handle(one)

one.wesen = New wesen
one\typ = 3
one\art = 4

one.wesen = Object.wesen(handlevar)
Print one\typ
Print one\art

Übersicht

BlitzBasic

Beginners-Corner

Nach Oben

BlitzBasic Portal

types!!!

playmate

Betreff: types!!!

playmate

playmate