[erledigt] Problem bei Case - default :(

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
scholly
Beiträge: 793
Registriert: 04.11.2005 21:30
Wohnort: Düsseldorf

[erledigt] Problem bei Case - default :(

Beitrag von scholly »

moin moin...
Warum bekomme ich bei diesem

Code: Alles auswählen

  listchecker:
; abchecken, ob wirklich Daten, JUNK oder was auch immer kommt...
; JUNK und anderes Unerwartetes darf uns nicht aus dem Tackt werfen

;{
  Debug "listchecker start"
  weitersuchen = #True ; ob wir das file weiter untersuchen
  ;wir suchen solange, bis "weitersuchen" falsch ist
  While weitersuchen
  fourCC = ReadLong()
  
    Select fourCC
    ;laut RIFF-Doku kann auf dieser Ebene folgen:
    ; LIST ->bearbeiten
    ; JUNK ->überlesen
    ; Unregistriert gibts anscheinend noch "IDVX"
    ; als Default sollten wir also alles außer "LIST" einfach überlesen 
    ; und hoffen, daß die Längenangaben stimmen

      Case 'TSIL'
        Debug "FourCC ist LIST"
        ;laut RIFF-Doku können jetzt folgen:
        ;als 1, 'hdrl'
        ;als 2. 'strl' für video
        ;als 3. 'strl' für audio
        ;als 4. 'odml' für einen OpenDML-Chunk -->überspringen
        ;als 5, 'INFO' für einen oder mehrere Text-Informationen
        ;als 6. 'movi' Beginn der Nutzdaten und Ende für uns !
        ;als 7. 'MID ' für Movie Identifier Tags -->überspringen
      Default
        Debug "FourCC ist etwas anderes als LIST -> überlesen"
        If fourCC = 'KNUJ'
          Debug "FourCC ist 'JUNK' --> überlesen"
        ElseIf fourCC = 'XVDI'
          Debug "FourCC ist 'IDVX' --> überlesen"
        Else
          Debug "FourCC unbekannt ---> überlesen"
        EndIf
        sprungweite = ReadLong()
        FileSeek(Loc() + sprungweite)
                
    ; nur zum Test auf FALSCH setzen
    weitersuchen = #False
    EndSelect

  
  Wend

;}
  Return; listchecker
folgende DEBUG-Ausgabe:

Code: Alles auswählen

listchecker start
FourCC ist LIST
FourCC ist etwas anderes als LIST -> überlesen
FourCC unbekannt ---> überlesen
Nach meinem Verständnis dürfte "Default" garnicht eingesprungen werde, da der Case 'TSIL' ja wahr ist.
Was mache/verstehe ich hier flasch ?
höchst irritiert...
scholly
Zuletzt geändert von scholly am 21.04.2008 22:39, insgesamt 1-mal geändert.
Ich bin blutiger PB-Anfänger.
seit 17.12.08: PB 4.3 unter XP Home(SP3)
Benutzeravatar
Froggerprogger
Badmin
Beiträge: 855
Registriert: 08.09.2004 20:02

Beitrag von Froggerprogger »

Code: Alles auswählen

weitersuchen = #False 
steht bei dir (sehr wahrscheinlich fälschlicherweise) innerhalb Select/End Select.
!UD2
Benutzeravatar
scholly
Beiträge: 793
Registriert: 04.11.2005 21:30
Wohnort: Düsseldorf

Beitrag von scholly »

:angry: ARGL....
Mussich wohl mal fragen ob die KK mir ne Brille spendiert :o
:praise: Danke !!!
scholly
Ich bin blutiger PB-Anfänger.
seit 17.12.08: PB 4.3 unter XP Home(SP3)
Antworten