ну разве что чтото вроде
delphi Код:
type
TParserFunc = procedure .....
var
OpcodesFuncs : array[0..$ff] of TParserFunc;
гдето:
delphi Код:
OpcodesFuncs[0] := @Parse_Die;
........
OpcodesFuncs[$DA] := @Parse_exPackets;
........
гдето вместо кейса:
delphi Код:
OpcodesFuncs[packet.opcode]();
не си но идея понятна.