Das deutsche QBasic- und FreeBASIC-Forum

[Eastler_dart]

glaub, ich habs schonmal gelesen, weiß nur nicht mehr,
wie die das dort angekeilt hatten

Mal bildlich hier gesprochen:


DIM Farbsub$(2)
Farbsub$(0)="RotMalen"
Farbsub$(1)="BlauMalen"
Farbsub$(2)="GruenMalen"


Beispielhaft vereinfachte Anwenderabfrage:

input "Sie sehen drei nummerierte Beispiele, welches nehmen Sie?", B%


und nun das Problem:

CALL inhaltvon(Farbsub$(B%)) ' wirklich bildlich, nicht so abtippen


zur Vollständigkeit noch:

SUB RotMalen()
........
END SUB
SUB BlauMalen()
........
END SUB
SUB GruenMalen()
........
END SUB


Ihr wißt doch bestimmt, wie das geht, oder?
_________________
Kaum macht mans richtig, schon geht's

[mjs]

Für so etwas sind Funktions-Zeiger geeignet.

Beispiel:

[Eastler_dart]

na is ja super, und super schnell, dann kanns ja weiter gehen


Geht sowas eigenlich auch mit Goto/Gosub?

SUB MaleAlleFarben(uebergabe)

GOSUB InhaltVon(uebergabe)

maleGruen:
Print "Gruen"
Return

maleBlau:
Print "Blau"
Return

END SUB


das wird wohl kaum funzen, oder?
_________________
Kaum macht mans richtig, schon geht's

[d.j.peters]

[Eastler_dart]

Is ja Irre

jetzt wo ichs lese, merk ich, das hatte ich früher schon mal so verwendet (on gosub)

Wenn ich so weitermach, kann ich Basic bald wieder auswendig

bei Freebasic gibts scheinbar gar nichts, was es nicht gibt.


merci beaucoup für eure Hilfen, streng mich an, daß ne Belohnung bald hier reinkommt

euer Eastler
_________________
Kaum macht mans richtig, schon geht's

[Mecki]

Fast genau das selbe, nur auf deutsch steht auch in der deutschen Befehlsreferenz im Artikel On...Gosub

Grüßle,
Mecki
_________________
» Yodl.de: So sucht man gestern.
» Geld verdienen im Netz + ICQ.
» Firefox!
» 100€ zu gewinnen
» FreeBASIC.de