Ich habe Dein Tool noch nicht getestet. Aber Deinen Sourcecode angeschaut. Ich gebe Dir den Rat, Deine Buttons, RadioButtons u.s.w. mit richtigen Namen zu versehen, die die Tätigkeit des Buttons oder des RadioButtons beschreiben. Ich benenne meine Buttons zum Beispiel so
Btn_GeneratePwd. Damit weiß ich, wenn ich den Namen im Sourcecode sehe, dass dieser Button dazu da ist, dass Passwort zu generieren. Das erleichtert die Übersicht. Dann könntest Du noch diesen Bereich vereinfachen :
Deine Version:
Delphi-Quellcode:
konsonanteklein[1] := 'b';
konsonanteklein[2] := 'c';
konsonanteklein[3] := 'd';
konsonanteklein[4] := 'f';
konsonanteklein[5] := 'g';
konsonanteklein[6] := 'h';
konsonanteklein[7] := 'j';
konsonanteklein[8] := 'k';
konsonanteklein[9] := 'l';
konsonanteklein[10] := 'm';
konsonanteklein[11] := 'n';
konsonanteklein[12] := 'p';
konsonanteklein[13] := 'q';
konsonanteklein[14] := 'r';
konsonanteklein[15] := 's';
konsonanteklein[16] := 't';
konsonanteklein[17] := 'v';
konsonanteklein[18] := 'w';
konsonanteklein[19] := 'x';
konsonanteklein[20] := 'y';
konsonanteklein[21] := 'z';
Meine Version :
konsonantegross : array[1..21] of string = (b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z);