Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#4

AW: Aufzählungstyp aus Operatoren

  Alt 29. Okt 2012, 11:49
Da die Indizes nicht selbst vergeben wurden, hat opPlus den Index 0, opMinus Index 1 etc. Stehen also Deine Radiobuttons (anhand der Bezeichner denke ich, um solche handelt es sich) in exakt der Reihenfolge, wie sie in der Enumeration deklariert wurden, könntest Du einfach einen harten Cast anwenden.
getOperator:= TOperator(RdGrpOperator.ItemIndex); Ich hoffe, ich habe jetzt keinen Denkfehler gemacht, aber das sollte eigentlich funktionieren.

[edit] Zur Not kann man das aber auch als "Übersetzungsfunktion" realisieren:
Delphi-Quellcode:
case RdGrpOperator.ItemIndex of
  0:
    Result := opPlus;
  1:
    Result := opMinus;
  2:
    Result := opMultiply;
  3:
    Result := opDivide;
  else
    raise Exception.Create('Ungültiger Operator');
end;
[/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen

Geändert von DeddyH (29. Okt 2012 um 11:53 Uhr)
  Mit Zitat antworten Zitat