Umstieg von C++ zu Delphi - Blicke nicht mehr durch

[DeddyH]

Außerdem

Delphi-Quellcode:

type
  TWaggon = class
    constructor Create(main_form: TGroupBox; filename: string; position_x: Integer); 
    destructor Destroy;override;
  private
    { Private declarations }
    Image: TImage;
    NextWaggon: TWaggon;
    ParentWidget: TGroupBox;
  public
    { Public declarations }
  end;

implementation

constructor TWaggon.Create(main_form: TGroupBox; filename: string; position_x: Integer);
begin
  inherited Create;
  NextWaggon := nil;
  ParentWidget := main_form;
  Image := TImage.Create(ParentWidget);
  Image.Parent := ParentWidget;
  Image.Picture.LoadFromFile(filename);
  Image.Top := 20;
  Image.Top := position_x;
end;

destructor TWaggon.Destroy;
begin
  Image.Free;
  inherited;
end;