Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Komponente erweitern

  Alt 14. Nov 2006, 16:10
du musst dafür "Daten" (besser TDaten) einen Pointertyp anlegen
Delphi-Quellcode:
Daten = Record
   Name: WideString;
   Anzahl: Integer;
   WertProStueck: Integer;
end;
//neu
PDaten = ^Daten;
dann kannst du mit
Delphi-Quellcode:
var
  DatenVariable: PDaten;
begin
  new(DatenVariable);
speicher für PDaten anfordern und mit
DatenVariable^.Anzahl := ... Dinge zuweisen.
Da es sich dann um einen Pointertyp handelt kann dieser auch der TList hinzugefügt werden.
mit
Dispose(SList.Item[i]); kann dann der reservierte Speicher wieder frei gegeben werden.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat