Исходники Delphi

Привет, Гость! | Выход

Список пользователей

Изменить сведения

Читать ЛС ()

Отправить ЛС

Добро пожаловать на наш портал

На нашем сайте ежедневно публикуются десятки качественных и свежих материалов, которые Вы можете скачать абсолютно бесплатно. Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Стартовая Избранное Главная Контакты Карта сайта
 
Правообладателям RSS 2.0 О сайте Добавить новость Контакты Правила

Меню

Не доступно

Не доступно

Опрос

Оцените мой сайт

Проголосовало: 118
Другие опросы

Результаты опроса

 Главная » 2013 » Апрель » 19 » Проверяем введен ли текст в эдит
14:34
Проверяем введен ли текст в эдит
Проверяем введен ли текст в эдит



Код

procedure TForm1.Button1Click(Sender: TObject);
begin //начало
if edit1.Text <> '' then form2.show //Если поле не пустое, вызываем форму 2
else // в противном случаи
showmessage('введите свое имя'); // выводим сообщение
end; // Конец

end.
Категория: Работа с текстом | Просмотров: 1434 | Добавил: Reif | Рейтинг: 0.0/0
Всего комментариев: 0
Ваше Имя:
Ваш E-Mail:
Код:


Название блока

Здесь html код

Категории

Для новачка [25]
Графика, оформление [14]
Аудио [5]
Видео [1]
Интернет и сети [15]
Работа с текстом [10]
Локальные диски [5]
Математические приложения [4]
Многопоточные приложения [3]
Многооконные приложения [2]
Базы Данных [5]
Ini/Dll/ выгрузка и загрузка [4]
Защита, Безопасность [1]
Информеры Progress|Statusbar [2]
Разное [13]
Видеоуроки [4]
FAQ по делфи [1]
Книги Delphi [1]
Дополнения|Компоненты|Кнопки [2]

Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код
 
Исходники Delphi
Сделать бесплатный сайт с uCoz |