Forum: Object-Pascal / Delphi-Language
Delphi
by DieHardMan,
12. Feb 2006
Naja er findet jetzt nur Strings mit genau 15% Abweichung, aber keine unter 15%, aber ich denk mal ich muss nur Minimum auf 0 setzen.
Das war jetzt nur ein Testwert, mein Abweichungswert wird bei 10% liegen.
Beim Markup muss ich schaun, wie schnell das geht, ob es sich überhaupt lohnt, die anderen Ratschläge werd ich befolgen, danke.
Forum: Object-Pascal / Delphi-Language
Delphi
by DieHardMan,
12. Feb 2006
Ja hab ich, habs auch versucht aber irgendwie net hinbekommen.
procedure TfrmMain.Button1Click(Sender: TObject);
var
i, a, Minimum, Maximum, Distance, MaxDistance, LengthFirstString,
LengthSecondString: Integer;
begin
MaxDistance := 15;
Forum: Object-Pascal / Delphi-Language
Delphi
by DieHardMan,
11. Feb 2006
Glaub das is zu hoch für mich, aber könnte man nicht beim ersten String alle Wörter anhand des Trennzeichens ' ' zählen und dann diese im zweiten String suchen und je nachdem wieviele gefunden werden, das Prozentual ausrechnen?! Wird zwar nicht genau sein, aber für meine Zwecke sollte es reichen.