[Delphi] Geheugen reserveren voor dynamische array

[Verwijderd]

Ik heb een dynamische array in delphi die informatie bevat over een klasse van een vliegtuig.

Delphi:

  TKlassen = record
    Klasse: Integer;
    VliegtuigKlasseID: Integer;
    Prijs: Double;
    Capaciteit: Integer;
    AantalBeschikbarePlaatsen: Integer;
  end;

  ArrayKlassen: array of TKlassen;

  ReallocMem(ArrayKlassen, SizeOf(ArrayKlassen) * 3);

Bij de applicatie treedt steeds een error op (wat duidt op een geheugen probleem).

Nu wil ik ff 100% zeker weten of deze code voor het reserveren van geheugen voor 3 klassen goed is, want ik heb het vermoeden dat dit niet helemaal goed is.

Klopt dat?

[Knutselsmurf]

Maak er eens

code:

Sizeof(TKlassen)

van.

[LordLarry]

Zoals je de code hier schrijft is het inderdaad niet goed.

Ik neem aan dat ArrayKlassen een variable is? Dan zal het dit moeten zijn:

Delphi:

ReallocMem(ArrayKlassen, SizeOf(TKlassen) * 3);

En moet je niet eerst AllocMem doen voordat je ReallocMem kan doen?

[LordLarry]

Heb het even opgezocht, maar je hoeft niet eerst AllocMem voor ReallocMem te doen.
Maar houd er ook rekening mee dat het geheugen dat deze functie extra reserveerd voor jouw niet standaard wordt gevuld met 0. Er kunnen dus willekeurige waarden in staan. AllocMem doet dat wel. Je kan hiervoor ook de functie FillChar gebruiken.

[MaxxRide]

Of iets van setlength(arrayklassen,3)

[LordLarry]

hehe, inderdaad Pinda Je hebt helemaal gelijk! Je maakt met

Delphi:

var ArrayKlassen: array of TKlassen;

een dynamisch array. Die moet je gewoon met SetLength van grote veranderen. Dit ik daar overheen gekeken heb.

tokkie als je geen dynamische arrays wil gebruiken en hetzelf doen zal je zoeits moeten doen:

Delphi:

type
  PArrayKlassen = ^TArrayKlassen;
  TArrayKlassen = array[0..MAXINT] of TKlassen;

var
  ArrayKlassen: PArrayKlassen;

Maar het makkelijste is gewoon de sinds Delphi v4 ingebouwde dynamische arrays gebruiken

[Verwijderd]

Het is inmiddels gelukt.

Bedankt.