9Live Buchstaben Salat-Spiel

[Sandi007]

OK, hier die Kopie für Interessenten vom "DAWGer"

.InsertXYZ() methoden:
.InsertString() oder .InsertStrings() für ganze TSringList's

dann schauen ob gepackt:
property .Mode = (dmEmpty, dmDAWG, dmPackedDAWG)

dann Packen:
.Pack
__________________________

Damit bei Euch DAWG über Delphi läuft, muss die Dawg.pas auf dem Desktop liegen oder im Projekt der Pfad geändert werden.

Dannach kommt noch eine Hürde beim Import einer *.wrt-Datei. Projekt1.exe funktioniert nicht mehr, bzw. Fehlermeldung siehe Screenshot, Codezeile 115-118

Delphi-Quellcode:

    for I := Low(C) to High(C) do C[I] := I;
    CharLowerBuff(@C, SizeOf(C));

    T := PerfCounter;

Wer weiß eine Lösung???