Forum: Algorithmen, Datenstrukturen und Klassendesign
by baumina,
20. Jun 2013
Vielleicht solltest du nicht darüber nachdenken überflüssige Einträge aus dem Array heraus zu löschen, sondern lieber unerwünschte Einträge in das Array erst gar nicht hinein zu schreiben. Ungefähr so:
setlength(arr,0);
while Stream.Position < Stream.Size do
begin
Stream.ReadBuffer(Digit, SizeOf(Digit));
Inc(byte);
time:= time+ 1/250;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by baumina,
20. Jun 2013
Deine If-Abfrage befindet sich sicherlich innerhalb irgendeiner Schleife (while/repeat/for), diese solltest du Rückwärts laufen lassen.
Forum: Algorithmen, Datenstrukturen und Klassendesign
by baumina,
20. Jun 2013
Deswegen kam dieser Hinweis:
Mit Byte oder SmallInt hat das meiner Meinung nach nichts zu tun.
Forum: Algorithmen, Datenstrukturen und Klassendesign
by baumina,
19. Jun 2013
http://www.delphi-treff.de/tipps/object-pascal/arrays/array-element-loeschen-ohne-dass-eine-luecke-entsteht/