[irrelevant]"'read' can't convert automatically a numbe

[Captn. Jinguji]

Diese Meldung erhalte ich postwendend in Zeile 6 für folgenden Code bei 4.30ß3.

Code: Alles auswählen

Dim nono.s(30)
Define jj.s
Define maxj = 0
Restore strdata
For i = 0 To 29
    Read jj
    If jj <> "<>"
       nono(i) = jj
       maxj + 1
    Else 
       Break
    EndIf 
Next
DataSection 
strdata:
Data.s "PROMOTION","CLIX","FREE","TRAFFIC","BUSINESS"
Data.s "TRACK","FARM","AD","CLICK","EBAY","CIAO","<>"
EndDataSection 

Unter 4.20p kein Problem.

Kann das mal bitte jemand bei seinem 4.30ß3 prüfen und bestätigen (ODER widerlegen)? Boardsuche hier und im engl. Forum hat nix rechtes dazu gefunden.

Gruß
CJ

[marco2007]

Guck mal bei den Ankündungen zu Beta1. Read hat jetzt auch einen Typen (so weit ich das im Kopf habe)...

[Captn. Jinguji]

Guck mal bei den Ankündungen zu Beta1. Read hat jetzt auch einen Typen (so weit ich das im Kopf habe)...

Ach Mist aber auch, stimmt.
Hatte die ganze Zeit im Hinterkopf: Da war doch was ?
Aber da bei der Boardsuche nix kam, ...

Hab nach E-W-I-G-keiten mal wieder READ benutzt....

Danke jedenfalls, Marco.