[bl4ckb1rd]

Wie im Titel schon steht: Mein erster Passwort Generator
geschrieben in Delphi.

Zum Programm:

Man kann zwischen einem 6stelligen bis zu einem 25stelligen Password auswählen. Es gibt 8 verschiedene Optionen, die die stärke des Passworts beeinflussen.

- Pw aus nur kleinen Buchstaben
- Pw aus nur großen Buchstaben
- Pw aus großen und kleinen Buchstaben
- Pw aus Zahlen und nur kleinen Buchstaben
- Pw aus Zahlen und nur großen Buchstaben
- Pw aus Zahlen und großen und kleinen Buchstaben
- Pw aus nur Zahlen

- Easy to remember Funktion

Die 'Easy to remember' Funktion generiert ein Passwort welches man einfach aussprechen kann und somit sich leichter merken kann.
Dies wurde dadurch erreicht das sich Konsonante und Vokale immer abwechseln.

Diese Funktion wird nicht unterstütz wenn der Punkt: Pw aus nur Zahlen ausgewählt wurde. (logisch oder? )

Den Code kann man sich hier anschauen: http://armag3ddon.bplaced.net/pwgensource.txt

Und das tool kann man sich hier runterladen: http://armag3ddon.bplaced.net/pwgen.zip


Bitte um ein Feedback. Also was euch gefallen hat, was nicht, was ihr gerne verbessern würdet bzw. gerne in einem verbessertem Zustand sehen möchtet

Danke schon mal im voraus!

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:

zusammenfalten · markieren

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);

Zitat von RWarnecke:

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:

zusammenfalten · markieren

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,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z);

Meine Version:
konsonantegross : string = 'bcdfghjklmnpqrstvwxyz'; Bei dir sind übrigens auch Vokale drin.

Zitat von NamenLozer:

Bei dir sind übrigens auch Vokale drin.

Bei dir auch.

Hallo,

wenn du die Datei schon nicht anhängst, so füge bitte noch die Dateigröße des Zip-Archivs zum Link hinzu, wie es in der Sparte gewünscht wird.

Grüße, Matze

Ich habs mir denken können das ich diesen block auch irgendwie kürzer machen kann^^

Ändere ich aber morgen weil ich heute keine lust mehr hab

Danke auch

hab jetzt auch noch nicht getestet und nur geguckt...

warum die ZeichenArrays als String?
1 Zeichen = Char

und wenn du mehrdimensionale Arrays verwendest, dann könntest du die Angelegenheit, mit der Groß- und Kleinschreibungs, einfacher handhaben

markieren

Delphi-Quellcode:

easyaabc : array[1..62] of char = (...);
abc : array[boolean] of array[1..26] of char = (...);
vokale : array[boolean] of array[1..5] of char = (('a', 'e', ...), ('A', 'E', ...));
konsonante : array[boolean] of array[1..21] of char = (...);

das ganze dann noch als Konstanten (siehe vorredner) wäre auch schöner ^^

z.B.

markieren

Delphi-Quellcode:

if odd(I) then begin
  pw := pw + vokaleklein[random(4)+1];
end
else
begin
  pw := pw + konsonanteklein[random(20)+1];
end;

zu
pw := pw + vokale[odd(I), random(4)+1]; oder halt nur Kleinschreibung
pw := pw + vokale[false, random(4)+1];


oder *editiertes vom vorredner anseh* mit Strings

markieren

Delphi-Quellcode:

const easyaabc = '.....';
abc : array[boolean] of string = ('...', '...');
vokale : array[boolean] of string = ('aeiou', 'AEIOU');
konsonante : array[boolean] of string = ('...', '...');

pw := pw + vokale[false][random(4)+1];

Ich weiß ja nicht, was die Funktion "easy to remember" bei dir bewirkt bzw was die bewirken soll.
Allerdings finde ich nicht, das :

Zitat:

rOmoQegIBIyapiTa8AtIfo

Einfach zu behalten ist


Du solltest ggf noch eine Funktion "in die Zwischenablage kopieren" einbauen

Zitat von BullsEye:

Allerdings finde ich nicht, das :

Zitat:

rOmoQegIBIyapiTa8AtIfo

Einfach zu behalten ist

romo qegibi yapita 8 @ ifo

geht doch?