Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 10.08.2015
Сообщений: 47
1

Delphi Form

12.08.2015, 11:44. Показов 1062. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
У меня есть проект,который я создал и хочу создать форму,которая при нажатии для открытия моей программы выскакивала и на ней был edit и туда я мог ввести пароль.Проблема у меня заключается в том,что как создать форму,чтобы она выскакивала при нажатии на открытии другой формы(моего проекта) и чтобы цифры,которые я буду вводить заменялись звёздочками.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.08.2015, 11:44
Ответы с готовыми решениями:

Delphi Form
procedure TForm2.Button1Click(Sender: TObject); var a:string; begin a:='1111'; if Edit1.Text=a...

Delphi - Image -> Form
Скажите пожалуйста, как добавть картинку (image) на Form в Delphi!? Мне нужно именно загрузить...

Delphi создать Package и там Form
Здравствуйте ребята. В проекте может будет несколько форма и exe файле размер увеличивается . Я...

Shaped form для delphi 2010
Нашел компонент shaped form, но он для делфи 7, есть ли такой же для делфи 2010. Данный компоненто...

2
5872 / 4600 / 1448
Регистрация: 14.04.2014
Сообщений: 20,413
Записей в блоге: 20
12.08.2015, 12:45 2
Лучший ответ Сообщение было отмечено elekt как решение

Решение

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
unit MainFormUnit;
 
interface
uses LoginFormUnit;
type
  TMainForm=class(TForm)
  ...
  end;
 
...
procedure TMainForm.FormCreate(Sender:TObject);
var f:TFLoginForm;
  loginOK:boolean;
begin
  f:=TFLoginForm.Create(NIL);
  loginOK := False;
  try
    f.EditPassword.PasswordChar:='*';
    if f.ShowModal() = mrOk then
       loginOK :=(f.EditPassword.text=MySecretPassword) and (f.EditLogin.text=MyBestLogin);
  finally
    f.free;
  end;
  if not LoginOk then
  begin
    showMessage('Вход запрещен');
    application.Terminate;
  end
end;
0
0 / 0 / 0
Регистрация: 10.08.2015
Сообщений: 47
12.08.2015, 12:52  [ТС] 3
Спасибо
0
12.08.2015, 12:52
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
12.08.2015, 12:52
Помогаю со студенческими работами здесь

Form.Hide ; Form.Close ; Form.Show
Здравствуйте. Вот интересует один вопрос, в чём различие между Form1.Close; Form2.Show и...

Delphi 10.2 – пропало наполовину окошко «show form positioner»
Доброе время суток форумчане, 1 Делаю программу (прог 1), и вот задумал сделать позиционирование...

Delphi - Dynamic Skin Form. Не могу изменить размер шрифта
Не могу изменить размер шрифта у кнопки spSkinButton1. Я изменяю у него font/size, компилирую а он...

Определение и удаление количества повторяющихся слов в строке (Delphi, form)
Здравствуйте, нужно срочно написать программу (в виде формы) Задача состоит в следующем: В строке...

Не могу понять в чем ошибка (VLC Form app) turbo delphi
Добрый день не могли бы помочь исправить ошибки в программе, вот коды: Unit4.pas(45): E2010...

Delphi xe7 multi-device Form , хэндлы окон и работа с ними
Писал прогу для послания нажатий клавиш в неактивое окно в delphi xe4. По аналогии стал писать...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Как работать с Kafka в Go (Golang)
bytestream 22.01.2025
Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки событий и интеграции микросервисов. Эта система, изначально. . .
Как использовать RabbitMQ в Go (Golang)
bytestream 22.01.2025
RabbitMQ представляет собой надежный и широко используемый брокер сообщений, который играет ключевую роль в построении современных распределенных систем и микросервисной архитектуры. В основе работы. . .
Как преобразовать список списков в простой список в Python
bytestream 22.01.2025
При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .
Что такое GUID / UUID и как их создать
bytestream 22.01.2025
В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .
Как добавить пустую директорию в репозиторий Git
bytestream 22.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с ситуацией, когда необходимо сохранить пустую директорию в репозитории. Данная задача может показаться простой на первый. . .
Как валидировать адрес email в JavaScript
bytestream 22.01.2025
JavaScript, как основной язык веб-разработки, предоставляет разработчикам множество инструментов для реализации эффективной валидации email-адресов. От простых встроенных решений до сложных. . .
Как заменить все вхождения подстроки в JavaScript
bytestream 22.01.2025
Строки в JavaScript представляют собой неизменяемые последовательности символов, что делает их обработку особенно интересной с точки зрения оптимизации и выбора правильного подхода к решению задач. . . .
Управление версиями пакетов в Node.js. В чем разница между тильдой (~) и кареткой (^) в package.json
bytestream 22.01.2025
В современной разработке программного обеспечения управление версиями пакетов играет ключевую роль в обеспечении стабильности и надежности проектов. Node. js, как одна из самых популярных платформ для. . .
Аутентификация на сайте с помощью формы
bytestream 21.01.2025
В современном цифровом мире безопасная аутентификация становится краеугольным камнем защиты веб-приложений и пользовательских данных. Каждый день миллионы людей используют различные онлайн-сервисы,. . .
Как получить индекс в цикле for в Python
bytestream 21.01.2025
При работе с коллекциями данных в Python часто возникает необходимость не только получить доступ к элементам последовательности, но и знать их позицию в процессе итерации. Индексация в циклах. . .
Как определить адрес, из которого локальный репозиторий Git был клонирован
bytestream 21.01.2025
В современной разработке программного обеспечения система контроля версий Git стала неотъемлемой частью рабочего процесса. При работе с Git разработчики часто сталкиваются с необходимостью. . .
Какая разница между операторами == и === в сравнениях в JavaScript
bytestream 21.01.2025
В мире веб-разработки JavaScript занимает особое место как динамический язык программирования, предоставляющий разработчикам широкий набор инструментов для создания интерактивных веб-приложений. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru