Einzelnen Beitrag anzeigen

BenjaminH

Registriert seit: 14. Okt 2004
Ort: Freiburg im Breisgau
713 Beiträge
 
Turbo Delphi für Win32
 
#1

Succ(TMyType) Scheint ein falsches ergebniss zu geben.

  Alt 4. Nov 2005, 21:07
Hallo
Ich habe einen eigenen Typen deklariert:
Delphi-Quellcode:
type
TReiz=(RWeg=0, KaroMit1=18,HerzMit1=20,PikMit1=22,RNull=23,Kreuzmit1=24, KaroMit2=27,HerzMit2=30,PikMit2=33,NullHand=35,KreuzMit2=36, KaroMit3=36,HerzMit3=40,PikMit3=44,NullOuvert=46,KreuzMit3=48, KaroMit4=45,HerzMit4=50,PikMit4=55,NullOuvertHand=59,KreuzMit4=60);
Ich will jetzt einfach mit
Delphi-Quellcode:
Var Reiz:TReiz;
...
Reiz:=RWeg;
Reiz:=Succ(Reiz);
die Nächste Reizung erhalten
Imho müsste da KaroMit1 raus kommen, tut es aber nicht! Ich erhalte da jedes mal 1 und auch bei anderen werten erhalte ich Odd(Reiz)+1 was mir gar nicht passt..
Entdeckt jemand, was falsch ist, oder wie ich das ändern kann?
Vielen Dank!!
Schönes Wochenende!
Benjamin
Benjamin
  Mit Zitat antworten Zitat