Das deutsche QBasic- und FreeBASIC-Forum

[goooofy]

Hallo,

ich bin gerade dabei, mein QBasic-Prog zu FB umzuschreiben.
Die Funktion STR$(wert) von QBasic gibt positive Werte ja bekanntlich mit führendem Leerzeichen zurück, bei FB ohne. Jetzt habe ich mir eine Funktion geschrieben, die das fehlende Leerzeichen wieder einfügt, weil der folgende Code ja von den Leerzeichen ausgeht.

Nun meine Frage:
Wie schaffe ich es, dass ich an die qb_str$ jeden beliebigen Datentyp (INTEGR, SINGLE, was auch immer) übergeben kann (bei STR$ von QB geht das ja auch!), und der entsprechende Datentyp dann aber auch in der Funktion erkannt wird und nicht so ein Müll als String zurückgegeben wird wie " 1.387285e-043", wenn ich ne "99" als INTEGER übergebe.



Hier mal der Code:

DEFSNG a-z 'Nicht deklarierte Variablen als SINGLE (wie in QBasic)
DECLARE FUNCTION qb_str$ (AS ANY)
t = 100.123
t% = 99
PRINT qb_str$(t) 'Gibt " 100.123" aus, brav!
PRINT qb_str$(t%) 'Soll " 99" ausgeben, nicht " 1.387285e-043" !
SLEEP
END

'Wandelt Wert in Text um (MIT fuehrendem Leerzeichen, falls positiv)
'(Entspricht STR$ in QBasic)

FUNCTION qb_str$ (wert)
s$ = STR$(wert)
IF LEFT$(s$, 1) <> "-" THEN s$ = " " + s$
qb_str$ = s$
END FUNCTION


Kurz gesagt: Ich brauch ne Funktion, die exakt so funktioniert, wie die STR$ unter QB. Ideen?

[Michael Frey]

Schlechte Qualität, aber provischorisch sollte es gehen:

[MisterD]

ansonsten könnte man auch versuchen, mit http://format.freebasic.de dranzugehen..
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[Michael Frey]

Dumme Idee:
Wahrscheinlich sind deine Integer Werte nicht Unbedingt gross (die gute alte 16 Bit Integer Variabel, Freebasic hat ja 32 Bit).

[Dusky_Joe]

Was du brauchst ist das Schlüsselwort OVERLOAD:

http://www.freebasic.de/r.php?s=OVERLOAD

Damit kannst du dann mehrere FUNCs mit dem selben Namen schreiben, die sich nur um einen Parameter unterscheiden müssen.

Du kannst dann also so etwas machen wie

[goooofy]

Ich danke euch allen, hab mich für die OVELOAD-Variante entschieden.