Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Как создать генератор паролей на delphi 6 (https://forum.antichat.xyz/showthread.php?t=117172)

R-E-S-T 22.04.2009 14:56

Как создать генератор паролей на delphi 6
 
Как создать генератор паролей на delphi 6.Помогите пожайлуста

De-visible 22.04.2009 15:08

random + randomize....

R-E-S-T 22.04.2009 15:10

Понятон

SmanxX1 22.04.2009 15:25

Код:

function RndString(Len:integer):string; 
var
        i:integer; 
begin   
        randomize;   
        for i:=1 to Len do
                Result:=Result+Chr($30+Random($4D));    //0 - } 
end;

Как-то так.
Символы выбираются из диапазона 0x30 - 0x7d (0 - }) ASCII таблицы.

R-E-S-T 22.04.2009 15:26

точно

Jim_Di 23.04.2009 23:44

будет лучше, если ещё какие-то данные к этому делу присобачить. наапример, потом пройтись по нему простейшим шифрованием, используя xor или придумать ещё чего-нибудь позаковыристей.

можно перемешивать символы каких-либо введённых данных и потом генерировать хэш, вобщем раздолье для фантазии =)

RumShun 24.04.2009 05:22

делал такой как раз на Д6 вот исходник
_http://depositfiles.com/files/yrofsyyeh
посмотри мож пригодится


Время: 07:27