i have a little Problem with PB 4.4 and 4.3
When i compile the code i have got the error message:
Read can´t convert automaticly a number into a string
when i compile the same source with PB 4.2 there is no problem.
I cant find the bug.
I hope someone can help me.
here is a little bit code to see the problem.
Global Dim Block1.s(2,5)
Gosub ArraysFuellen
ExamineDesktops()
DataSection
AllgemeineFischkunde:
Data.s "Welche Aufgaben erfüllen Rücken- und Afterflossen heimischer Fische?"
Data.s "a) Sie dienen der Fortbewegung"
Data.s "b) Sie dienen der Steuerung"
Data.s "c) Sie dienen als Stabilisatoren"
Data.s "3"
Data.s "An welchen Teilen des Fischkörpers kann man das ungefähre Alter des Fisches feststellen?"
Data.s "a) An der Stärke der Haut und an der Anzahl der Flossenstrahlen"
Data.s "b) An der Anzahl und Länge der Kiemendorne"
Data.s "c) An den Schuppen und den Kiemendeckeln"
Data.s "3"
EndDataSection
End
ArraysFuellen:
Restore AllgemeineFischkunde:
For x= 1 To 2
For y= 1 To 5
Read (Block1.s(x,y))
Next y
Next x
Return