Zitat von
mkinzler:
Delphi-Quellcode:
Uses Unit1, ...;
Form1.Image1.
Ich hoffe, das soll ein (sehr, sehr) schlechter Scherz sein.
@Jibiel: Am Besten wäre es, wenn du im Konstruktor nur eine Canvas übergibst.
Delphi-Quellcode:
constructor Create(aCanvas: TCanvas);
...
THaus.Create(Image1.Canvas);
Damit muss dein THaus-Code deine Form überhaupt nicht kennen und alle Unitbezugsprobleme lösen sich in Luft auf
. Du könntest sogar problemlos z.B. von TImage auf TPaintbox umsteigen oder auch das Haus nur auf ein nichtvisuelles TBitmap zeichnen lassen. Es wäre auch zu überlegen, ob du den Konstruktor ganz leer lässt und die Canvas erst beim Zeichnen als Parameter übergibst.