Beta_cartrigesg_bd Beta v0.4
This commit is contained in:
@@ -127,11 +127,11 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
function GenerateAutomaticPassword: String;
|
function GenerateAutomaticPassword: String;
|
||||||
const
|
|
||||||
Characters = 'ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz23456789!@#_-';
|
|
||||||
var
|
var
|
||||||
I: Integer;
|
I: Integer;
|
||||||
|
Characters: String;
|
||||||
begin
|
begin
|
||||||
|
Characters := 'ABCDEFGHJKLMNPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz23456789!@#_-';
|
||||||
Result := 'Iv!';
|
Result := 'Iv!';
|
||||||
for I := 1 to 29 do
|
for I := 1 to 29 do
|
||||||
Result := Result + Characters[Random(Length(Characters)) + 1];
|
Result := Result + Characters[Random(Length(Characters)) + 1];
|
||||||
|
|||||||
Reference in New Issue
Block a user