Bascom und Übergabe von Variable

Gast #110114
Hallo

Ich bekomme es einfach nicht hin meinen string in eine Funktion zu
übertragen.
Mein Code in Bascom




Declare Sub Test(zahl As string * 1)

Dim Temp As String * 1

Do
Temp = ""
Call Test(Temp)
Loop
End


Sub Test([byref]zahl As string * 1)
local wert as byte

wert = asc(zahl)
print wert

End Sub




Habe auch schon ausprobiert von byref auf byval zu schalten. Auch
nichts.
Er meckert be der Funktion wert = asc(zahl), weil der typ der Variable
nicht übereinstimmt


Danke für eure Hilfe
Gast #110115
hi,

in deinem beispiel ist der string leer
ist WERT als byte definiert?

probier mal:

dim TEMP as string * 1
dim ZAHL as byte
dim WERT as byte

declare sub TEST

do
  for ZAHL = 0 to 255
    TEMP = chr(ZAHL)
    gosub TEST
    waitms 100
  next
loop

End


Sub Test

  wert = asc(TEMP)
  print wert
  return

End Sub

Antwort schreiben

Eine eigene Frage? Dieser Thread ist über 22 Jahre alt. Stell sie in einem eigenen Thread – dort lesen mehr Leute mit, und sie wird öfter und schneller beantwortet.

Neuen Thread starten

Eine Lösung, Ergänzung oder Rückmeldung zu diesem Thread? Dann antworte hier.

Formatierung
  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] – Link zu einem Artikel
  • Verweis auf einen anderen Beitrag: Rechtsklick auf dessen Beitrags-ID (#8078628), „Adresse kopieren“, in den Text einfügen

Mehr zur Formatierung

Längeren Sourcecode als Anhang, nicht in den Text. JPG nur für Fotos und Scans; Zeichnungen und Screenshots als PNG oder GIF. Siehe Bildformate.

Schon registriert? Anmelden

Wird nicht angezeigt. Wir schicken dir einen Link; sobald du damit bestätigst, erscheint dein Beitrag.

Mit dem Abschicken legst du einen kostenlosen Account an und erkennst die Nutzungsbedingungen und die Datenschutzerklärung an.