OOP - Neuling braucht ein bisschen Hilfe

[Liam]

Ich habs jetzt mal mit dieser Variante versucht:

Delphi-Quellcode:

procedure TForm1.AnlegenClick(Sender: TObject);
 begin
  case Radiogroup1.itemindex of
   0:
    begin
     Bezeichnung := 'Verbrennungsmotor';
     Auto:=TFahrzeug.create(Radiogroup1.Items.GetText, Ed_L_H.Text);
     Memo1.lines.Add := Auto.getDaten;
    end;

Delphi-Quellcode:

constructor TFahrzeug.create (M_Bezeichnung: string; M_Leistung: string);
 begin
  Bezeichnung := M_Bezeichnung ;
  Leistung :=M_Leistung ;
 end;

...


 function TFahrzeug.getDaten: string;
  begin
    result:= Bezeichnung + Leistung;
  end;

Hier hab ich jetzt wieder das anfangsproblem. Inkompatible Typen und nicht genügend wirkliche Parameter bei der Zeile Memo1.lines.Add := Auto.getDaten;

Und ich hab grad echt ein Brett vorm Kopf (wohl eher ne Bohle)