array auf Inhalt überprüfen

[Klaus01]

Delphi-Quellcode:

var 
  i: Integer; 
  leer:Integer; 
begin 
  .... 
  leer:=-1; 
  i:=low(datenfeld); 
  while (leer < 0) and (i <= high(datenfeld)) do 
    begin 
      if datenfeld[i].clanname = '' then       // <- etwas geändert
        leer:=i; 
      inc(i); 
    end;
  if leer = -1 then
    ShowMessage('keine leere Stelle gefunden')
  else
    ShowMessage('leere Stelle liegt an Position'+ IntToStr(leer)); 
  .... 
end;

Funktionert aber auch nur dann wenn der clanname wirklich nichts enthält.
Oder was ist Dein Kriterium um zu sehen, daß das Datenfeld leer ist?

Grüße
Klaus