Also mit einer TStringList:
var Liste: TStringList;
geht das ganz einfach so:
Delphi-Quellcode:
For i:=1 to n do
begin
If Liste.Count=0 then
Exit;
Liste.Delete(0);
end;
Da bei einem
Array die Anzahl der Zeilen vordefiniert ist,
kannst du nicht nachträglich im Quellcode die Anzahl der Zeilen verändern.
z.B.:
var Liste: Array[1..20] of Strings;
Dann hast du 20 Zeilen, da kannste keine einfach so rausnehmen.
Höchstens so:
Delphi-Quellcode:
For i:=1 to n do
begin
Liste[i]:='';
If i=20 then
Exit;
end;
Aber dann hast du immer noch 20 Zeilen, bloß die ersten n Zeilen sind halt einfach leer.