TBruteForce - Version 0.5a [Update: 28.04.2008]

[Luckie]

Da stimmt wa snicht mit dem Algorithmus. Ich habe alle kleinen Buchstaben eingeben und gesagt mindestens drei, höchstens fünf Buchstaben. Raus kam:

Zitat:

caa
caaa
caaaa
caaab
...

Wo ist

Zitat:

cab
cba
abc
bca
...

Sind da 29 Thread gelaufen oder warum steh 29 mal 'Thread finished' in der unteren Listbox?

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ProgressBar1.Position := Round(BruteForce1.Percent);
end;

Warum hat deine Komponente kein Ereignis, welches den Fortschritt zurückgibt? Mit einem Timer ständig abzufragen, wie weit er ist, ist mehr als unglücklich.

Nachtarg: Beim Beenden deines Demos, hat es mich mit Fehlern nur so zugeschmissen.