Zitat von
Stefan92:
Aber wie mach ich das denn mit einer Case-Anweisung, das geht doch nur mit ordinalen Typen, oder?
char _ist_ ein ordinaler Typ.
Delphi-Quellcode:
case key of
'1': button1.click;
'2': button2.click;
'3': button3.click;
...
',', '.': button11.click;
...
else
// sonstige Tasten
end;
Der Vorteil der CASE-Lösung besteht darin, daß nur ein Zweig durchlaufen wird - bei deinem Code werden immer alle IF-Anweisungen abgearbeitet. Ein CASE kann die ebenfalls mögliche (aber unübersichtliche) Schachtelung von "IF..THEN..ELSE IF"-Strukturen ersetzen.
Gruß Hawkeye