Hallo.
Ich arbeite normal mit dem CBuilder, habe jedoch eine Komponente die auf Pascal basiert und jetzt ein Modifikationsproblem, da ich mich mit Pascal noch nicht so gut auskenne.
Ich möchte der Komponente eine Funktionalität hinzufügen.
Ich möchte gern in diese Komponente zusätzlich Daten ablegen und zwar zusammengehörige: {Name, Anzahl, WertProStueck} und das ähnlich wie ein TStringList mit Add beliebig viele hinzufügen und mit Delete(index) löschen können.
DieKomponente.Daten.Add("Name1",2,5);
DieKomponente.Daten.Add("Name2",1,3);
DieKomponente.Daten.Add("Name3",4,2);
DieKomponente.Daten.Delete(2); // entfernt ("Name2",1,3)
Kennt jemand dafür vielleich ein Tutorial oder kann helfen?
So habe ich angefangen, komme aber irgendwie nicht weiter
Delphi-Quellcode:
Daten = Record
Name: WideString;
Anzahl: Integer;
WertProStueck: Integer;
end;
DatenArray = class
private
Datas: array of Daten;
public
procedure Add(Name: WideString, Anzahl: Integer, WertProStueck: Integer);
procedure Delete(Index: Integer);
end;
MeineKomponente = class
private
public
property Items: DatenArray ????
end;
constructor DatenArray.Create;
begin
end;
destructor DatenArray.Destroy;
begin
end;
procedure DatenArray.Add(Name: WideString, Anzahl: Integer, WertProStueck: Integer);
begin
end;
procedure Delete(Index: Integer);
begin
end;