0 / 0 / 0
Регистрация: 15.10.2021
Сообщений: 8
1
Delphi 6-7

Как сделать рандом символов из строки с ограниченным количеством символов

09.11.2021, 08:13. Показов 1386. Ответов 10

Здравствуйте !
Есть много Edit.
Все строки что в них прибавляются в одну. Нужно чтобы из этой строки вытащили определенное количество символов и перемешали рандомно.Делаю генератор пароля из данных.
Проблема в том что не знаю как сделать так как random работает только с числами а мне нужно чтобы со всем и выдал нужное количество.Буду очень признательна за помощь.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.11.2021, 08:13
Ответы с готовыми решениями:

Строки. Удалить из текста все слова с нечетным количеством символов и перевернуть слова с четным количеством символов
Пример: HOW DO YOU DO → OD OD. Нашел решение на турбо паскале. Не могу понять как перевести на Си...

Как сделать конкатенацию с определенным количеством символов
Здравствуйте, подскажите, пожалуйста, как сделать канкатенацию с определенным кол-ом символов....

Удалить из текста все слова с нечетным количеством символов и перевернуть слова с четным количеством символов
удалить из текста все слова с нечетным количеством символов и перевернуть все слова с четным...

Подсчитать количество повторяющихся символов в группах с нечетным количеством символов
Дана строка, состоящая из групп нулей и единиц. Каждая группа отделяет- ся от другой одним или...

10
Модератор
8348 / 5559 / 2265
Регистрация: 21.01.2014
Сообщений: 23,855
Записей в блоге: 3
09.11.2021, 08:37 2
Цитата Сообщение от BlazeFaire Посмотреть сообщение
Все строки что в них прибавляются в одну.
Это как? Пример покажите, что ли...
Цитата Сообщение от BlazeFaire Посмотреть сообщение
так как random работает только с числами
А ничего другого и не надо: позиция символа в строке - это целое число, которое можно получить генератором случайных чисел.
0
Нарушитель
8514 / 4530 / 1047
Регистрация: 12.03.2015
Сообщений: 21,301
09.11.2021, 08:47 3
у меня есть готовая программа, написанная на лазарусе.
Сюда читай.



0
0 / 0 / 0
Регистрация: 15.10.2021
Сообщений: 8
09.11.2021, 08:48  [ТС] 4
вид на фото

код только так начала а продолжить не могу
Delphi
1
2
3
4
5
6
7
8
9
procedure TForm1.Button1Click(Sender: TObject);
var a,s,d,f,g,h:string;
begin
a:=Edit1.Text;
s:=Edit2.Text;
d:=Edit3.Text;
f:=Edit4.Text;
g:=Edit5.Text;
h:=(Edit1.Text+Edit2.Text+Edit3.Text+Edit4.Text+Edit5.Text);
просто не представляю как из этого рандомом еще и определенное количество вынести символов.
Миниатюры
Как сделать рандом символов из строки с ограниченным количеством символов  
0
0 / 0 / 0
Регистрация: 15.10.2021
Сообщений: 8
09.11.2021, 08:50  [ТС] 5
суть программы в том чтобы из данных которые введет пользователь составить пароль
Для меня тяжелая задачка
0
Нарушитель
8514 / 4530 / 1047
Регистрация: 12.03.2015
Сообщений: 21,301
09.11.2021, 09:05 6
Лучший ответ Сообщение было отмечено BlazeFaire как решение

Решение

ключевой метод из проекта выше:
Delphi
1
2
3
4
5
6
7
8
9
10
11
function TFormMain.GeneratePassword(const len: int32; const alpha: unicodestring): unicodestring;
var
  abc_len, idx: int32;
begin
  abc_len:= length(alpha);
  Assert((len > 0) and (abc_len > 0));
  SetLength(result, len);
 
  for idx:= 1 to len do
    result[idx]:= alpha[1 + random(abc_len)];
end;
1
Модератор
8348 / 5559 / 2265
Регистрация: 21.01.2014
Сообщений: 23,855
Записей в блоге: 3
09.11.2021, 09:34 7
Цитата Сообщение от BlazeFaire Посмотреть сообщение
из данных которые введет пользователь составить пароль
Да ерунда какая-то... Получается пароль, составленный только из букв... Не канает ни под один критерий сложности... Да еще и не известна длина пароля...
Сделайте уж нормальный генератор по примеру выше...
0
Нарушитель
8514 / 4530 / 1047
Регистрация: 12.03.2015
Сообщений: 21,301
09.11.2021, 09:46 8
Цитата Сообщение от D1973 Посмотреть сообщение
Да ерунда какая-то... Получается пароль, составленный только из букв... Не канает ни под один критерий сложности...
Ну ладно тебе, чо докопался? Не драматизируй.

Как сделать рандом символов из строки с ограниченным количеством символов
0
Житель Земли
2995 / 2994 / 391
Регистрация: 26.07.2011
Сообщений: 11,457
Записей в блоге: 1
09.11.2021, 10:23 9
BlazeFaire, в слове "нравиться" ошибка. Исправь, не позорься
0
0 / 0 / 0
Регистрация: 15.10.2021
Сообщений: 8
09.11.2021, 12:18  [ТС] 10
Спасибо
0
Эксперт Pascal/Delphi
4882 / 2755 / 848
Регистрация: 04.10.2012
Сообщений: 10,051
10.11.2021, 09:43 11

Не по теме:

Verevkin, Ахахаха. "Пароли для бедных". Жжешь

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.11.2021, 09:43
Помогаю со студенческими работами здесь

Подсчитайте количество повторяющихся символов в группах с нечетным количеством символов
Дана строка, состоящая из групп нулей и единиц. Каждая группа отделяется от другой одним или...

Подсчитать количество посторяющихся символов в группах с нечетным количеством символов
Дана строка, состоящая из групп нулей и единиц. Каждая группа отделяется от другой одним или...

Записать в файл все слова файла g с количеством символов >4 и < 10, в которых нет повторяющихся символов
Условие задания:&quot;Дан текстовый файл g. Создать новый файл f и записать в него все слова файла g с...

Записать в файл все слова файла g с количеством символов >4 и < 10, в которых нет повторяющихся символов
Дан текстовый файл g. Создать новый файл f и записать в него все слова файла g с количеством...

Функция перезаписывает символы строки заданным количеством символов другой строки
Программа работает. Но не совсем правильно. В конечной строке появляются непонятные символы,...

Как сделать из массива символов двумерный массив по 6 символов на строку?
ак сделать из массива символов двумерный массив по 6 символов на строку, НУ типа : дано:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru