-
Aufruf von Proceduren
Hallo!
Ich habe diesen code:
Code:
Dim Txt As String * 27
Dim X As Byte
Dim Y As Byte
...
Declare Sub Sendtxt(a As Byte , B As Byte , Text As String)
...
Call Sendtxt(x , Y , Txt);
...
Do
Loop
End 'end program
...
Sub Sendtxt(a As Byte , B As Byte , Text As String)
Print Chr(255);
Print Chr(a);
Print Chr(b);
Print Text;
End Sub
Ich bekomme aber jetzt die folgenden Fehler:
Getclass error [ 0]
Different parameter type passed then declared [Txt ;]
BYVAL should be used in declaration [[ 0]]
Was muß ich ändern?
-
Du musst das Semicolon ; am Ende der Zeile mit Call entfernen.
Dieses Zeichen gibt es in BASCOM-AVR am Ende der Zeile nur in der Print-Anweisung, falls kein Zeilenumbruch generiert werden soll.
Die Fehlermeldungen sind hier leider nicht sehr hilfreich.
-
hallo, setzt mal "byval x as byte..." in die declare.
mfg pebisoft