TImage.Create() in extra Unit

[Neutral General]

Hi,

Zitat:

als Parameter wird u.a. eine TForm für die parent-Eigenschaft übergeben

was heißt EINE TForm? Du musst die Form übergeben auf der das Image sein soll....
So ungefähr sollte das ganze aussehn:

Delphi-Quellcode:

// Andere Unit:
TKlasse = class
private
  FImage: TImage;
public
  constructor Create(AParent: TForm);
end;

constructor TKlasse.Create(AParent: TForm);
begin
  inherited Create;
  FImage := TImage.Create(AParent);
  with FImage do
  begin
    Parent := AParent;
    //...
  end;
end;

// Haupt-Unit:
var Test: TKlasse;
begin
  Test := TKlasse.Create(Form1);
end;

Gruß
Neutral General