Forum: Object-Pascal / Delphi-Language
by Luckie,
22. Mai 2010
Wenn das die ganze Prozedur ist, dann ist er doch so wie so am Ende der Prozedur.
procedure Foo;
begin
if (Not TBaseObject(Sprite).Active) or (Not TBaseObject(Sprite).Solid) then
Exit;
end;
Forum: Object-Pascal / Delphi-Language
by Luckie,
22. Mai 2010
Dann ersetze doch mal das Exit durch ein ShowMessage, dann weißt du, ob er überhaupt in den Block reingeht.
Ist da noch ein try-finally-Block drumherum?
Forum: Object-Pascal / Delphi-Language
by Luckie,
22. Mai 2010
Werden denn die Bedingungen auch erfüllt? wird ein ShowMessage angezeigt?