Anzahl von Einträgen eines Arrays im Record ermitteln ?

[Airblader]

Naja, in meinem Programm zZ habe ich das selbe, ich habe ein record mit array.

auslesen tu ichs bei mir so:

length( TProduktion[n].Maschinen ); (Sind nur andere Bezeichnungen).

Wenn du nun die Anzahl aller haben willst, machst du es so:

Delphi-Quellcode:

var
 i: integer;

...

for i := 0 to high( TProduktion ) do
begin
  Form1.ListBox1.Items.Add( IntToStr(length( TProduktion[i].Maschinen )) );
end;

Das würde dann alles in einer Listbox anzeigen

air