[Delphi] Ciekawostka o enumach

[Toster]

calkiem ciekawe

  TLightEnum = (leGejzeryBiale=0, leGejzeryCzerwone, leGejzeryNiebieskie,
                leSzampanowki, leNieckiBiale, leNieckiCzerwone,
                leNieckiNiebieskie);

  TPompEnum = (peSzampany1 = Integer(leNieckiNiebieskie)+1, pePlaszczeWodne1,
               pePlaszczeWodne2, peSzampany2, peGajzery);

 

nieprawdaz ?

[Max1414]

nie bardzo czaje co tu niezwykłego : )?

[Force]

Pewnie o to, że rzutujesz enuma na integera i masz nowego enuma. Pewnie Toster chciał aby numeracja we wszystkich enumach była inna, żeby nie było dwóch enumów co mogą przyjąć tą samą liczbę. Jednak o ile dobrze wiem, to mógłby uzyć High(TLightEnum), powinno działać b w tym przypadku co ma to jak coś doda za "leNieckiNiebieskie" to lipnie, a High zawsze zadziała (jeśli dobrze pamiętam, że wogóle )

[Toster]

nom, to sprawdz czy mogl dzialac i odpowiedz uzasadnij

[Force]

Mea culpa Ale jednak jestem przekonany, że widziałem jakąś metodę dla enumów, ale nie pamiętam

[Toster]

High/Low mozesz uzyc na enumie ale nie w tym przypadku Ciekawe kto wie dlaczego

[TSr]

   TLightEnum = (leGejzeryBiale=0, leGejzeryCzerwone, leGejzeryNiebieskie,
                leSzampanowki, leNieckiBiale, leNieckiCzerwone,
                leNieckiNiebieskie);

  TPompEnum = (peSzampany1 = Integer(high(TLightEnum))+1, pePlaszczeWodne1,
               pePlaszczeWodne2, peSzampany2, peGajzery);

U mnie to działa jak należy hehe.

[Force]

aaa, rzeczywiście, High zwraca Smallinta