Строки ввода (TEdit) в Delphi

Строки ввода (TEdit) в DelphiС помощью строк ввода мы постоянно будем получать от пользователя различ­ную информацию. Давайте попробуем написать несколько программ с использова­нием этого компонента, чтобы понять все тонкости работы с ним.

 

Создайте новый проект. Установите в окне формы два компонента TEdit и одну кнопку. У вас должно получиться нечто похожее на рис. 7.5.

Давайте очистим у обоих компонентов TEdit свойство Text. Это свойство отвечает за содержимое строки ввода. Мы просто очи­стим, чтобы после запуска программы обе строки ввода были пустыми.

 

Теперь создайте для кнопки обработчик события onclick. Мы это уже делали, поэто­му у вас не должно быть с этим проблем. Кстати, если дважды щелкнуть по кнопке или по компоненту на форме, то Delphi автоматически создаст этот обработчик со­бытия. Ну а если он уже создан, то просто перенесет вас в то место, где написан код этого обработчика.

Итак, создайте обработчик и напишите в нем: 

 

 

По нажатии кнопки мы копируем содержимое свойства Text компонента Edit2 в свойство Text компонента Editi. Попробуйте запустить программу. Теперь вве­дите в первую строку ввода какой-нибудь текст, а потом нажмите кнопку. Во вто­рой строке ввода появится тот же текст.

 

Давайте немного улучшим пример. Теперь измените у первой строки ввода свойствоPasswordcharна звездочку "*". Запустите программу и попробуйте ввести в эту строку текст. Вместо текста будут появляться звездочки, как при вводе пароля в какой-нибудь программе. Именно таким образом делаются строки ввода паролей.


Попробуйте нажать на кнопку, и во вторую строку ввода перенесется текст, кото­рый вы вводили.

 

Теперь сделаем проверку на ввод пароля. Найдите в процедуре обработчик со­бытия onclick для кнопки и напишите там следующее:

 

Теперь попробуйте запустить программу. Если вы введете в первую строку вво­да слово password и нажмете кнопку, то во второй строке появится надпись пароль верный, иначе будет надпись Пароль неверный.

dle

Помоги проекту! Расскажи друзьям об этом сайте: