Forum: Object-Pascal / Delphi-Language
Delphi
by Liam,
23. Mai 2010
Vielen vielen Dank :thumb:
diese Variante hat mir geholfen:
Auto:=TFahrzeug.create(Radiogroup1.Items, Ed_L_H.Text);
Jetzt läuft alles. Die Ausgaben der Klasse und in ein Memo statt Edit bekomm ich auch noch irgentwie hin :)
Lg
Liam
Forum: Object-Pascal / Delphi-Language
Delphi
by Liam,
23. Mai 2010
Ich habs jetzt mal mit dieser Variante versucht:
procedure TForm1.AnlegenClick(Sender: TObject);
begin
case Radiogroup1.itemindex of
0:
begin
Bezeichnung := 'Verbrennungsmotor';
Auto:=TFahrzeug.create(Radiogroup1.Items.GetText, Ed_L_H.Text);
Forum: Object-Pascal / Delphi-Language
Delphi
by Liam,
21. Mai 2010
Leider funtkioniert das auch nicht. Selber fehler.
Forum: Object-Pascal / Delphi-Language
Delphi
by Liam,
21. Mai 2010
Danke für eure Hilfe ihr beiden. Ich hab die If-Anweisungen mal in eine Case gepackt, und jetzt hab ich auch kein Problem mehr mit inkompatiblen Typen. Allerdings kommt jetzt folgende Meldung:
"Konstantenausruck erwartet"
var
Form1: TForm1;
Auto: TFahrzeug;
M_Leistung: string;
M_Bezeichnung: string;