9Live Buchstaben Salat-Spiel

[vlees91]

Zitat von negaH:

Das mein DAWG Algo. langsammer als eine Scriptsprache wie PHP sein soll die dann sogar noch einen Algo benutzt der von seiner Komplexität wesentlich schlechter sein muß, halte ich für ein Gerücht. Sorry das ich das so deutlich sagen muß, das hat nichts mit einem persönlichen Angriff zu tuen.

Wer hat das denn behauptet?


EDIT: Wo steht, dass das Array sortiert ist. Dies stimmt zwar, wäre aber für die Funktion des Scripts total irrelevant.
Noch dazu: Ich habe nie behauptet, dass mein billiges Script, welches 20min (ja, ich schäme mich für die zeit ) meiner Zeit zur Programmierung verbraucht hat, besser ist, als ein Alg., an dem du bestimmt länger als ich gearbeitet hast.

[vlees91]

Zitat von negger:

Sag mal, ich bin ja nicht sooo fit in PHP, aber kann es sein das dein Code nur alle Wörter raussucht die zb. 7 Buchstaben enthalten ? Also wir haben 7 Buchstaben wie "AACDHIK" und suchen nun alle Wörter die exakt aus diesen 7 Buchstaben bestehen. Kann es sein das es deinem PHP Code schnuppe ist welche 7 Buchstaben gesucht werden und einfach alle Wörter mit 7 Buchstaben raussucht ??

Wenn ja, sind das Äpfel mit Birnen verglichen, denn meine kombinatorische DAWG Suche findet nur die Wörter die sich aus diesen 7 Buchstaben bilden lassen, also gültige Wörter !

Tut er nicht.
wenn das gesuchte wort legov ist, findet er Vogel und sonst nichts. Und um ehrlich zu sein: ich finde es irgendwie sinnlos, dass dein DAWG auch da sachen mit z.B. 2 Buchstaben finden würde.

EDIT: Mein Script war nach dem ersten Teil auch auskommentiert und damit läuft es noch schneller. Der eigentliche Grund, das ich die Auskommentierung wieder "aktiviert" habe, liegt an meiner Faulheit bei kleingeschrieben Wörtern nach mehreren Kombi's zu suchen.

[leddl]

Zitat von vlees91:

Und um ehrlich zu sein: ich finde es irgendwie sinnlos, dass dein DAWG auch da sachen mit z.B. 2 Buchstaben finden würde.

Nö, das finde ich sogar sehr sinnvoll. Du kannst ja einstellen, wie lange das Wort mindestens sein muß. Manchmal ist es eben von Interesse, welche Wörter jedweder Länge ich aus den gegebenen Buchstaben basteln kann

[vlees91]

Wieso sthet da denn jetzt manchmal DWAG? Tippfehler oder bedeutet das was anderes?

[Olli]

Zitat von vlees91:

Wieso sthet da denn jetzt manchmal DWAG? Tippfehler oder bedeutet das was anderes?

Fipptäler ... dafür ist Hagen berühmt(-berüchtigt). Aber das tut seiner sonstigen Professionalität ja keinen Abbruch.

Aber Gegenfrage: wieso steht da manchmal "steht" und manchmal "sthet" in den obigen Beiträgen? Tippfehler?

[vlees91]

ich habe das nur einmal vertippt und hagen hats in seinem prog 3mal auf drei buttons geschrieben, die nebeneinander stehen/kleben/sitzen/platziert wurden und auf zwei, die wiederum daneben sind stehts richtig

PS: recht- und grammatikfehler dürfen behalten werden

[Sandi007]

Hallo Hagen,

dein DWAG ist absolut genial! Kann ich auch zur Laufzeit im test.DWAG Wörter ergänzen - ohne über eine wrt-Datei per import/export gehen zu müssen?

Grüße
Sandi

[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???

[himitsu]

Zitat von Sandi007:

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

Wieso?

Zitat von Sandi007:

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

Welche Delphi-Version?

Zitat von Sandi007:

Codezeile 115-118

Keine der Zeilen

Delphi-Quellcode:

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

    T := PerfCounter;

löst einen Fehler aus ... garantiert.

Wo genau steht der Debugger, nach der Exception
und was sagt er vor der Exception? (wenn man ihn zum Debuggen benutzt)

[Sandi007]

OK, werde nun eher mit Firebird weiter machen, da ich meine Sonderwünsche nicht im DAWG unterbekomme. - leider denn der Code ist schon rasend schnell.
Für Liebhaber: mann müsste die Unit mal für Delphi 2010 checken, ist glaub ich nicht kompartibel wegen Char - Ansichar usw. (IMHO).

Begin Viele Grüße Sandi End; If Ostern then frohes Ostern,[herzlich, lächelnd] End.