Funktion, Prozedur und eigen Klasse

[Relicted]

hiho!

das ganze was du suchst nennt sich constructor... gibt automatisch sich selbst zurück

Delphi-Quellcode:

type
  TAuto = class
  private
    FFarbe: string;
    FBaujahr: integer;
    procedure SetFarbe(Farbe: string);
  public
    property Farbe: string read FFarbe write FFarbe;
    constructor Create( sFarbe : string );
  end;

implementation

constructor TAuto.Create( sFarbe : string );
begin
  FFarbe := sFarbe;
end;

aufruf dann via coAuto := TAuto.Create( 'Blau' );

gruß
reli