Ich will sowas machen:
Delphi-Quellcode:
procedure TuWas(Was: cardinal);
begin
case was of
1: ...
2: ...
3: ...
....
else
end;
end;
und jetzt will ich für 1,2,3... "Dummys" vergeben, also zb WAS_BEENDEN, WAS_DATEILADEN, WAS_NEUZEICHNEN... (so ähnlich wie bei den Windows WM_XXX - Messages). Wenn ich jetzt aber die Konstanten global deklariere, dann meckert delphi im case-Block immer noch, dass ihm das nicht konstant genug wäre....