Hallo Lukas,
deine Flächenberechnung solltest du davon abhängig machen, ob das Rechteck ir leer ist:
Delphi-Quellcode:
begin
// ...
if not IsRectEmpty(ir) then
if ((intersectspace >= puffer) xor IsValidSpace) then
begin
machwas;
end;
// ...
end;
Ostergrüße vom marabu