Forum: Programmieren allgemein
by Fritz01,
26. Mai 2006
Hallo himitsu,
na, ganz so einfach ist es doch nicht, hab es probiert!
Da kommen die Fehlermeldungen wie MD5Print, MD5, MD5String usw unbekannte Bezeichner! Habe den ges. Generator mit ins Progr. gebaut, damit waren die Fehlermeldungen weg.
Vielleicht geht das auch einfacher, hierzu wäre ich um einen Tipp dankbar.
Nach außen ist das aber nicht zu erkennen!! Es ist halt ein Eingabeformular,...
Forum: Programmieren allgemein
by Fritz01,
24. Mai 2006
Algo, Verschlüsselung mit MD5 von Fichtner.
Benutzername eingeben, key wird erzeugt, kann wie folgt getestet werden.
procedure TMainForm.ButtonTestClick(Sender: TObject);
begin
if EdtBenKey.Text = MD5Print(MD5.MD5String(EdtBenName.Text)) then begin
{ Key OK }
showMessage ('Key ist OK');
end
Forum: Programmieren allgemein
by Fritz01,
24. Mai 2006
Hallo Klaus01,
ja der Generator läuft. Es wird ein Key erzeugt und kann, wie oben beschrieben gestestet werden.
Jetzt möchte ich gerne erreichen, daß ein Programm mit diesem Key und dem entsprechenden Benutzernamen aktiviert werden kann. Eingabe, Vergleich, Programm freischalten (oder auch nicht)
Key und BenName sollte nur einmalig, beim 1. Programmstart erforderlich sein.
Wie geht das?...
Forum: Programmieren allgemein
by Fritz01,
24. Mai 2006
Hallo,
zum Thema KeyGenerator wurde ja schon viel geschrieben.
Beim Test funktioniert so
if EdtBenKey.Text = MD5Print(MD5.MD5String(EdtBenName.Text)) then begin
{ mach was, wenn die Nummer richtig ist }
showMessage ('Key ist OK');
end
else