Ich versuche für einen Terminklalender eine function zu bauen um mir doppelte Eintragungen in einem array of Records (Terminliste) rauszuschneiden.
Nur hab ich hier einen Fehler bei dem ich keine Ahnung habe, was ich falsch gemacht habe:
Ich bekomm die Meldung 'Inkompatible Typen', obwohl es zwei Elemente aus einem array sind, und bei der Zuweisung ein paar Zeilen weiter wird auch nicht gemeckert
Delphi-Quellcode:
for i:=0 to length(Terminliste)-2 do
begin
if Terminliste[i] = Terminliste[i+1] then <--- Hier gibts die Fehlermeldung
begin
for j := i to length(Terminliste)-2 do // Verrückung;
begin
Terminliste[ j ]:=Terminliste[ j +1];
inc(loecher);
end;
end;
end; // of i:=0 to length(Terminliste)-2
Wer sieht was, das ich nicht sehe?
THXbyTOX
Erwarte das Beste und bereite dich auf das Schlimmste vor.