|
Registriert seit: 18. Mär 2003
Ort: Berlin
589 Beiträge
Delphi 8 Architect
|
darf man das?
4. Nov 2009, 23:12
Was haltet ihr von folgendem Code?
Delphi-Quellcode:
type
TMoeglicheProbleme = (mpKleinesProblem,mpMittleresProblem,mpGrossesProblem);
TProblemSammlung = set of TMoeglicheProbleme;
var
MeineProbleme :TProblemSammlung;
MeinProblemCast : Longword;
begin
MeineProbleme := [mpKleinesProblem,mpMittleresProblem];
MeinProblemCast := Longword(pointer(@Meinproblem)^); // scheint zu funktionieren...
MeinProblemCast := 4;
MeineProbleme := TProblemSammlung(Pointer(@MeinProblemCast)^); // das auch
end;
ernsthafte Einwände?
Gruß
Tim Leuschner
Programmierer = moderner Sysiphos: stets wenn er meint, den Stein seiner Dummheit auf den Berg des Wissens gewuchtet zu haben, erblickt er einen völlig neuen Aspekt und der Dummfels poltert mit Getöse zurück ins Tal der Unwissenheit...
|