Array auf 0 setzen

[Daniel B]

Hallöchen,

mit SetLength kann man ja die Länge des Arrays auf 0 setzen.
Warum geht es hiermit nicht?

Delphi-Quellcode:

  TKWLok = Array [1..18] of String[5];

  TMenue = Record
    KWLok: TKWLok;
  end;

SetLength(KWLok, 0); Mit den Dynamischen kriege ich es hin, aber mit dem nicht.
Die Meldung: [Fehler] Main.pas(3329): Inkompatible Typen
Ich kann damit im mom. nichts anfangen.
Vielen Dank.

Grüsse, Daniel

[Chewie]

Die Länge eines statischen Arrays ist ja konstant, also nicht zur Laufzeit änderbar. Deshalb funktioniert dein Code nicht.
Alle Einträge auf 0 setzen kannst du aber hiermit:

Code:

ZeroMemory(@KWLok,Length(KWLok);

[Daniel B]

Aah, jetzt gehts, Danke Dir.

Das es zur RunTime nicht geht war mir jetzt neu.

Grüsse, Daniel

[Chewie]

Zitat von Daniel B:

Das es zur RunTime nicht geht war mir jetzt neu.

Soweit ich weiß kann man (außer vielleicht über fiese Tricks) Konstanten zur Laufzeit nicht ändern. Und Grenzen von statischen Arrays sind Konstanten. So gesehen ist es logisch, dass es nicht geht.

[Daniel B]

Zitat von Chewie:

Und Grenzen von statischen Arrays sind Konstanten. So gesehen ist es logisch, dass es nicht geht.

Klingt einleuchtend. Muss man aber auch erstmal wissen das man es so sehen muss.

Grüsse, Daniel