Thema: Delphi Zufallswörter

Einzelnen Beitrag anzeigen

omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#15

Re: Zufallswörter

  Alt 21. Nov 2005, 19:17
@alzaimar:

Bei nur einem Zeichen kommt bei deiner Variante keine Möglichkeit heraus.
Bei zwei Zeichen nur 1 Möglichkeit.
Bei drei Zeichen nur 5 Möglichkeiten.

irgendwie fehlt da immer eine, oder übersehe ist da jetzt was?

Ausserdem sehe ich gerade das da das Schlüsselwort var fehlt und die Variablendeklaration von i.
besser ist...
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
Const
  sLetters = 'URLTKADPE';
var f,i : Integer;
Es werden zusätzlich auch noch Warnungen ausgeschmissen.
besser ist...
Function NthPermutation (const aString : AnsiString; aCount : Cardinal) : AnsiString; Warum Integer, wenn negative Zahlen nicht vorkommen können?


MfG
Thorsten
  Mit Zitat antworten Zitat