Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Wie iteriere ich durch eine Menge?

    Delphi
    by Dust Signs, 22. Aug 2013
  Warum nicht? Folgender Code funktioniert einwandfrei (siehe http://ideone.com/LfRwI8)
  
  program x;
  type
  TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble, ssTouch, ssPen, ssCommand, ssHorizontal);
  var
  state: SmallInt;
  begin
  for state := Ord(Low(TShiftState)) to Ord(High(TShiftState)) do
  begin
• Forum: Object-Pascal / Delphi-Language

  AW: Wie iteriere ich durch eine Menge?

    Delphi
    by Dust Signs, 22. Aug 2013
  Hallo!
  
  Ich habe zwar eine gefühlte Ewigkeit nicht mehr Delphi programmiert, aber was spricht gegen Folgendes?
  
  var
  state: SmallInt;
  begin
  for state := Ord(Low(TShiftState)) to Ord(High(TShiftState)) do //Iteriere über alle möglichen Werte
  begin
  if (state = Ord(ssAlt)) then //Beispiel für einen Vergleich