[message]

Ребята, привет.. Мне нужно сделать словарь, а именно *.txt файл и чтоб в нём был полный перебор букв.

Вообщем задача:
Сгенерировать 5и значные символы от a-z и с использованием 0-9

Код:

aaaaa
aaaab
aaaac

и так до конца, полный перебор...

поможете?

какбы допустим тоже самое с цифрами сделать ерунда...

Код:

for i:=0 to 100000 do begin
Memo1.Lines.Add(IntToStr(i));
end;

а вот с этим, я не понимаю как...
Мне не нужен генератор, который будет рандомно мне выдовать пароли, а вот тупо от а до я сгенерировать.

[san-46]

Тупо генерируем текстовый файл:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  F : TextFile;
  A, B, C, D, E : Integer;
begin
  AssignFile(F, 'dict.txt');
  Rewrite(F);
  for E := Ord('a') to Ord('z') do
    for D := Ord('a') to Ord('z') do
      for C := Ord('a') to Ord('z') do
        for B := Ord('a') to Ord('z') do
          for A := Ord('a') to Ord('z') do
            WriteLn(F, Char(E)+Char(D)+Char(C)+Char(B)+Char(A));

  CloseFile(F);
end;

Получаем файл в 79 Мб и с более чем 11 млн. строк. Только на кой этот файл нужен? Чего с ним делать?
Использование еще и цифр, код сложнее и файл получается больше на треть.