Das zuweisen kann man sich auch vereinfachen, obwohl es mit dem Case in codetechnischer Hinsicht schon optimal ist.
Dises global (also außerhalb der Prozedur, eventuell direkt davor) definieren, dann kannst du das Array direkt vordefinieren.
Delphi-Quellcode:
Const KI_statusList: array['A'..'K'] of Procedure =
(@ki_status_a, @ki_status_b, ..., @ki_status_k);
Und dann ist der Aufruf genauso wie bei Chimaira.
KI_StatusList[KI_Status[1]]();
Es kann auch sein, daß es ohne das @ geht, aber bei der Definition/Zuweisung in das Array muß in Cimairas version doch eigentlich das @ davor?