angeblich doppeltes Case-Label, aber ich find keines?

[himitsu]

Zitat von Angel4585:

ich hatte doch gesagt das er diese schreibweise nehmen soll un er meinte es geht trotzdem nicht
Ich meinte die Schreibweise natürlich für alle zweistelligen

$85 ist vom Typ her Char
$0085 WideChar
wenn ich das recht interpretiere

nein, delphi ignoriert führende Nullen

hab es ja versucht und es ging nicht

sonst müßte #$00000085 ja ein UCS4-Char sein und nicht mehr in einen Wide-Char passen

hab hier nur D7 und D2009 (vielleicht sollte ich nochmal des Turbodelphi draufmachen lassen)
- in D7 geht's



[add]
selbst dises slitten brachte erwartungsgemäß nichts

Delphi-Quellcode:

xtChar: Case C of
          #$09, #$0A, #$0D, #$20..#$7E, #$85, #$A0..#$FF: Result := True;
          #$0100..#$D7FF, #$E000..#$FDD0, #$FDDF..#$FFFD: Result := True;
          Else Result := False;
        End;

hab mir aber erstmal so behelfen können

Delphi-Quellcode:

Case Typ of
  xtChar: Case C of
            #$09, #$0A, #$0D, #$20..#$7E, #$A0..#$FF, #$0100..#$D7FF, #$E000..#$FDD0, #$FDDF..#$FFFD: Result := True;
            Else Result := (C = #$85);
          End;