Zitat:
Delphi-Quellcode:
var
i: ^Integer;
begin
i := Tasten.Pop;
case TDirection(i) of
Warum nicht "verständlichen" Code schreiben?
Ich weiß auch nicht, was ^Integer aka PInteger mit TDirection ode Pointer zu tun hat.
Hinzu wurde ja doch direkt gecastet. ( TDirections > Pointer )
Warum dann nicht auch rückzu? ( Pointer > PInteger > TDirections )
Delphi-Quellcode:
var
d: TDirection;
begin
d := TDirection(Tasten.Pop);
case d of