Hallo liebe Delphianer! Habe folgendes Problem. Ich hab ein Programm, das beim Programmstart in einer TList 8Lampen erstellt! Diese 8 Lampen werden in der Listbox angezeigt. Jetzt möchte ich das wenn man in ein Edit schreibt und auf den Button "Hinzufügen" klickt. Die Position der Lampe den Wert von dem Edit bekommt. Aber ich weiß nicht so recht wie ich das schreiben soll. Mein Quelltext an der relevanten Stelle sieht bisher so aus:
Delphi-Quellcode:
procedure TForm1.btHinzu1Click(Sender: TObject);
var
x : integer;
begin
Lampe.Roehre1.Watt := strToInt(edWatt1.text);
end;
procedure TForm1.lstLampenClick(Sender: TObject);
begin
edWatt1.text := IntToStr(Lampe.Roehre1.Watt);
end;
Habe 2 Klassen erstellt. Einmal Lampe und einmal Röhre. Wobei Lampe 2 Instanzen von Röhre hat und Röhre die Eigenschaft Watt(integer) hat.
Wäre sehr froh, wenn es jemanden gibt, der mir da ein bisschen auf die Sprünge hilft.
Liebe Grüße
Dennis