Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Повторное открытие форм https://www.cyberforum.ru/ delphi-beginners/ thread2045066.html
Доброго времени суток. Прошу помощи. Вопрос в следующем: Есть основная Form1, на ней есть MainMenu1 с 10 TMenuItem N1 ... N10. При нажатии на каждый из них открывается новая форма, вот пример. ...
Delphi Поиск наименьшего числа матрицы, его номера ячейки и столбца
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, ComCtrls, StdCtrls; type TForm1 = class(TForm)
Как перенести делфи приложение для десктопов в Web Delphi
Собственно рад любой инфе, в частности по требованиям для такого переноса.
Delphi Определить максимальное количество подряд идущих единиц в двоичном числе Разработать алгоритм, определяющий максимальное количество подряд идущих единиц в двоичном числе. прошу помощи https://www.cyberforum.ru/ delphi-beginners/ thread2044911.html
Delphi Создать приложение https://www.cyberforum.ru/ delphi-beginners/ thread2044899.html
создать приложение позволяющее тестировать студентов(тест состоит из 5 вопросов). Перед тестированием студент должен ввести фамилию. На итоговой форме выводятся результаты тестирования всех студентов...
Не могу достучаться до нужного типа в списке (TList) Delphi
Доброго времени суток! Ситуация следующая: - есть несколько созданных типов class TPoint(TObject); class TLine(TPoint); class TCircle(TPoint); - так же есть дженерик TList в который надо...
Delphi Вывод содержимого StringGrid
Добрый день. по нажатию на ячейку нужно что бы выводилось сообщение с текстом содержимым. ShowMessage(StringGrid1.Cells);
Delphi Поиск слова в richedit Здравствуйте ! Помогите пожалуйста с программой, никак не могу реализовать следующее: ввести слово в edit, далее поиск введённого слова в компоненте richedit и подсветка найденного слова(слов) любым... https://www.cyberforum.ru/ delphi-beginners/ thread2044774.html
Delphi Добавление текста в DBGrid1 https://www.cyberforum.ru/ delphi-beginners/ thread2044757.html
Как через (например Edit1) добавить в DBGrid1 текст? с учетом того что на форме нет ничего больше, и DataSource свойство пусто? Имеется введу без базы данных Добавлено через 11 минут имеется...
Delphi RxRichEdit выравнивание текста и картинки Доброго дня установил компоненты rxlib разместил у себя на форме объект rxrichedit в свойствах поменял свойство Alignment сделал по центру но когда загружаю и текст и картинку то выравнивание не... https://www.cyberforum.ru/ delphi-beginners/ thread2044706.html
494 / 396 / 260
Регистрация: 05.04.2013
Сообщений: 1,763
27.09.2017, 07:56 0

Генератор паролей

27.09.2017, 07:56. Показов 1108. Ответов 15
Метки (Все метки)

Ответ

Цитата Сообщение от qwertehok Посмотреть сообщение
первые 3 - можно было взять любое случайное трехзначное число (100-999)
я думаю это ограничит условие, в смысле в условии не сказано что первые два символа не должны быть нулями, что если Random(1000) выдаст число 8? нужно StringOfChar'нуть до 008. Или чтобы не юзать эту функцию, просто написать цикл как у D1973
Delphi
1
2
for i := 1 to 3 do
   s := s + IntToStr(RandomRange(0, 10));
Добавлено через 4 минуты
кроме того, думаю, это даст более случайное число 0-999, например вероятность того что выпадет 0 (добиваем его до трех нулей 000 через функцию StringOfChar) более высокая, чем если выпадет три нуля подряд через цикл по одному символу

Вернуться к обсуждению:
Генератор паролей
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.09.2017, 07:56
Готовые ответы и решения:

Генератор паролей
Здравствуйте!Как написать генератор паролей с разделителем? Если можно с примерами. Требования:...

Генератор паролей
Начал писать генератор паролей, смотрел видео по нему, всё точь в точь так же написано.Код: unit...

Генератор паролей
Здравствуйте! Мне нужно создать генератор паролей, где {b}_{1} - {b}_{2} - произвольные большие...

Генератор паролей
На курсовую надо создать генератор паролей... я в Delphi дуб дубом... помогите!!! Напишите как это...

15
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.