Delphi Records und pointer

Thema durchsuchen

Ansicht

Themen-Optionen

Records und pointer

Ein Thema von blinder007 · begonnen am 6. Sep 2013 · letzter Beitrag vom 6. Sep 2013

Vorheriger Beitrag

Nächster Beitrag

DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.658 Beiträge

Delphi 12 Athens

AW: Records und pointer

6. Sep 2013, 19:13

zusammenfalten · markieren

Delphi-Quellcode:

			type

  PSpieler = ^TSpieler; 

  tspieler = record

    leben: extended;

    verteidigung,

    angreifen: integer;

end;

...

var

  Spieler: PSpieler;

begin

  New(Spieler);

  Spieler^.leben := 3.12345;

  Spieler^.verteidigung := 42;

  Spieler^.angreifen := 12;

  Liste.Add(Spieler);

end;

Und beim Löschen aus der Liste schön Dispose aufrufen, sonst gibbet Speicherlecks.

Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen