Hi,
das Problem ist, dass Du hier Delphi sagen musst, was alles zu dem else gehört und was eben nicht mehr. Dazu verwendet man einfach Blöcke, die werden mit einem begin und end; markiert.
Delphi-Quellcode:
else
begin
DrawBlood(buffer.canvas,blood,blood,x2,y2,Bframe);
Zahl := Zahl+50;
end; // ende Else
Delphi (und viele andere Sprachen) nehmen einfach an, dass wenn kein Block kommt nur die nächste Zeile zum else (oder if, der for/while Schleife, ...) gehört.
Gruß Der Unwissende
[add]
Juhu, endlich mal wieder ein roter Kasten!!!
[/add]