Das liegt daran, dass Du zformular als TForm ansprichst. Das TForm kennt Deine Komponente aber (noch) nicht. Also entweder:
Delphi-Quellcode:
constructor THaus.create(formular : TForm1; imghinten : TImage); // <-- hier TForm1
begin
inherited create;
zformular := formular;
zimghinten := imghinten;
end;
und natürlich dann auch
Delphi-Quellcode:
private
zformular : TForm1;
- oder -
Delphi-Quellcode:
procedure THaus.Zeichnen;
begin
TForm1(zformular).zimghinten.Canvas.Rectangle(5,5,20,20);
end;
Grüsse
...Doc