Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
So, kurzer Überschlag, jetzt habe ich das verstanden.
Bevor ich mich nun in mein Schwert stürze wegen verschärfter Begriffstutzigkeit :wall: möchte ich mich für die Hilfestellungen bedanken.
Ade, du schnöde Programmierwelt.
creehawk
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
Wie gesagt also, erste Post:
If AnsiPos(STR,DDSList.Strings) = 0 dann aufschreiben
Wenn der STR (also ein Dateiname) im aktuellen String der DDSList NICHT enthalten ist dann...
Aja, natürlich. :(
Das muss ich jetzt erstmal ventilieren.
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
Aha, 9.6 Mill Zeilen. Und das ist mir jetzt nicht bewusst.
Ich sage ja, da ist was faul. Und jetzt: WAS?
creehawk
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
So, funktioniert anstandlos und zügig.
Aber warum geht mein Kunstwerk von oben nicht. Okay, mit IndexOf geht es nicht. Also dachte ich eben wenn ich frage, ob der String (also der Dateiname) in dem anderen String(s) enthalten ist oder nicht das er wenn nicht diesen String in die neue Liste schreibt.
SackerlZement.
creehawk
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
Okay, tut mir leid, war vielleicht nicht deutlich genug, aber in der ersten Post stehten zwei Beispiele drin im Delhi Code.
Es sollte aber funktionieren wenn ich die Listen angleiche. Das mache ich mal.
Trotzdem: Warum OutOfMemory?
creehawk
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
Tja, jetzt ist die CopaList so gross wie die Currentlist....
Hatte ich nicht irgendwo gelesen das IndexOf nur ein ganzen Stringvergleich macht? In der Currentlist stehen aber nur die Dateinamen, in der DDSList die Dateinamen MIT den Pfaden....
creehawk
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
Ich habe jetzt mal anstell des schreibens in die CopyList das ausgeben lassen in ein Memofeld auf der Form.
Das läuft und läuft - ein Eintrag nach dem anderen...
Eigentlich sollte doch die Zeile AnsiPos nur dann in die Memo/Stringlist schreiben wenn er den Eintrag nicht findet.
Irgendwas ist im Konstrukt faul. Aber was zum Teufel?
creehawk
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
IndexOf ......
Wie macht man das richtig?:oops:
Freigegeben? Wenn ich die beiden - Current und DDS - VOR dem speichern der CopyList freigebe (Free) ändert das nicht am OutofMemory....
creehawk
Ausserdem : die beiden Dateien sind zusammen 400 KB groß.... OutOfMemory?
Forum: Programmieren allgemein
Delphi
by creehawk,
6. Jun 2022
Moin Moin.
Ich möchte muss 2 Listen vergleichen um herauszufinden was in der einen Liste fehlt
var
I,II:Integer;
Str : String;
CurrentList : TStringlist;
DDSList : TStringList;