[
OT]
Womit mähst du denn? (Nagelschere *fg*)
Bei der Größe doch wohl mit nem Rasenmäher-Träcker, oder?
...ginge eventuell auch ein Canvas?
Delphi-Quellcode:
Procedure MowGrass;
Var Rasen:TCanvas;
begin
Rasen:=TCanvas.Create(0,0,Round(Sqrt(2000)),Round(Sqrt(2000)));
Try
Rasen.Clear;
Finally
Rasen.Free;
end;
end;
Ansonsten noch viel Spass
[/
OT]