Einzelnen Beitrag anzeigen

Maiky

Registriert seit: 14. Nov 2006
54 Beiträge
 
#2

Re: Komponente erweitern

  Alt 14. Nov 2006, 16:52
Ich habe mich mal weiter dran probiert

Delphi-Quellcode:
Daten = Record
   Name: WideString;
   Anzahl: Integer;
   WertProStueck: Integer;
end;

DatenArray = class
private
   SList: TList;
public
   constructor Create;
   destructor Destroy; override;
   procedure Add(Name: WideString; Anzahl: Integer; WertProStueck: Integer);
   procedure Delete(Index: Integer);
end;


implementation {===============================================================}


constructor DatenArray.Create;
begin
   SList := TList.Create;
end;

destructor DatenArray.Destroy;
begin
   SList.Free;
end;

procedure DatenArray.Add(Name: WideString; Anzahl: Integer; WertProStueck: Integer);
begin
   
   ?????????

   datenx.Name := Name;
   datenx.Anzahl := Anzahl;
   datenx.WertProStueck := WertProStueck;
   SList.Add(datenx);
end;

procedure DatenArray.Delete(Index: Integer);
begin
   SList.Delete(Index);
end;
Mein Problem nun liegt in de Zeile "SList.Add(datenx);" bzw besser gesagt wie reserviere ich Speicher für das "Daten : Record", damit ich es in die SList eintragen kann??
  Mit Zitat antworten Zitat