Mich nervt
Das eine einfache Case anweisung wie diese nicht unterstützt wird.
Delphi-Quellcode:
case DisplayMin of
case Is > 9:
und nur über umwege machbar ist.
Delphi-Quellcode:
case DisplayMin of
9..59:
begin
NumberLed(Graphics, NumImgH, 1, StrToInt(Copy(IntToStr(DisplayMin), 1, 1)));
NumberLed(Graphics, NumImgH, 2, StrToInt(Copy(IntToStr(DisplayMin), 2, 1)));
end;
und generell nur Ordinal typen verwendet werden können.
Den sinn dahinter verstehe ich heute noch nicht.
Und das konvertieren natürlich
StrToInt, IntToStr usw..
gruss