Bruteforce eines Wertes mit 32 Bit länge.
Delphi-Quellcode:
var Schlüssel, i: Integer
Schlüssel := Random($FFFFFFFF);
//
for i := 0 to $FFFFFFFF-1 do
if i = Schlüssel then
ShowMessage('Der Schlüssel ist ' + IntToStr(i));
Für "Schlüssel" kann man auch gern eine Ver-/Entschlüsselungsfunktion einsetzen.
Das mit der Zeit kannst du vergessen, denn es gibt sehr schnelle und auch sehr langsame PCs ... da kann man nichts an tempo vorhersagen.
Du kannst nur einer Entschlüsselungsfunktion bauen, welche eine bestimmte Menge an komplexeren Rechenoperationen benötigt, um etwas zu entschlüsseln.
Ich befürchte er möchte etwas mehr "Rauch" haben. Nach dem Motto "Chemie ist's wenn's knallt und stinkt"
Gruß
K-H