Регистрация Главная Сообщество
Сообщения за день Справка Регистрация

Наличие символов

-

Вопросы и ответы, обсуждения

- Ваши вопросы по Pascal/Delphi только в данном разделе

Ответ
 
Опции темы
Старый 07.07.2012, 16:30   #1
 Разведчик
Аватар для MrMoney
 
MrMoney никому не известный тип
Регистрация: 30.12.2010
Сообщений: 2
Популярность: 12
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
 
По умолчанию Наличие символов

Подскажите:
Есть пустая форма edit1 и кнопка button
Дак вот если нажать на Button то из формы edit1 отправиться информация(т.е. даже если форма будет пустая)
Как зделать чтобы проверялось наличие символа "@"
Если символ присутсвует,то инфа отправляеться,если символа нет,выдавалась ошибка
  Ответить с цитированием
Старый 07.07.2012, 16:59   #2
Заблокирован
 Пехотинец
Аватар для Skrillex3
 
Skrillex3 душа компанииSkrillex3 душа компанииSkrillex3 душа компанииSkrillex3 душа компанииSkrillex3 душа компанииSkrillex3 душа компанииSkrillex3 душа компанииSkrillex3 душа компании
Регистрация: 23.03.2012
Сообщений: 83
Популярность: 908
Сказал(а) спасибо: 102
Поблагодарили 144 раз(а) в 61 сообщениях
Отправить сообщение для Skrillex3 с помощью Skype™
 
По умолчанию Re: Наличие символов

если я правильно тебя понял ,то
Цитата:
if (Edit1.text='@') then отправка информации else Showmessage('Error!');

  Ответить с цитированием
Старый 07.07.2012, 17:20   #3
 Разведчик
Аватар для MrMoney
 
MrMoney никому не известный тип
Регистрация: 30.12.2010
Сообщений: 2
Популярность: 12
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
 
По умолчанию Re: Наличие символов

Да ты правильно понял...только если так зделать вылазит окошко с ошибкой,и при закрытии окошка,данные всё равно отправляються

И в окошке ошибки,в названии пишеться project1

Последний раз редактировалось MrMoney; 07.07.2012 в 17:23.
  Ответить с цитированием
Старый 07.07.2012, 17:55   #4
 Пехотинец
Аватар для Zo_Om4eG
 
Zo_Om4eG на правильном пути
Регистрация: 20.12.2010
Сообщений: 58
Популярность: 50
Сказал(а) спасибо: 22
Поблагодарили 36 раз(а) в 15 сообщениях
Отправить сообщение для Zo_Om4eG с помощью Skype™
 
По умолчанию Re: Наличие символов

MrMoney,
Цитата:
if Pos('@', edit1.text) <> 0
then
begin
Отправка данных...
end
else
ShowMessage('Error');

  Ответить с цитированием
Старый 07.07.2012, 18:04   #5
 Разведчик
Аватар для MrMoney
 
MrMoney никому не известный тип
Регистрация: 30.12.2010
Сообщений: 2
Популярность: 12
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
 
По умолчанию Re: Наличие символов

Цитата:
Сообщение от Zo_Om4eGПосмотреть сообщение
MrMoney,

Опять же повторюсь,если нету символа "@" то вылазит ошибка,и при закрытии формы ошибки,данные всё равно отправляються...
Мне нужно чтобы если символа "@" нету в форме edit1 появлялась форма ошибки,и прекращался цикл отправки

И как изменить название формы ошибки?
  Ответить с цитированием
Старый 07.07.2012, 18:26   #6
 Пехотинец
Аватар для Zo_Om4eG
 
Zo_Om4eG на правильном пути
Регистрация: 20.12.2010
Сообщений: 58
Популярность: 50
Сказал(а) спасибо: 22
Поблагодарили 36 раз(а) в 15 сообщениях
Отправить сообщение для Zo_Om4eG с помощью Skype™
 
По умолчанию Re: Наличие символов

MrMoney, Дай код цикла отправки. Или попробуй так:
Цитата:
if Pos('@', edit1.text) <> 0
then
begin
...
end
else
begin
ShowMessage('Error');
Break;
end;

  Ответить с цитированием
Ответ


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Помогите!] Нужны ники (без символов) DOremix Общение и обсуждение 12 01.02.2012 20:08
Распознаватель символов robin_90 Общение и обсуждение Perfect World 2 05.11.2011 18:18
использование символов BTO Общение и обсуждение, архив Point Blank 0 09.11.2010 19:30

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 22:00.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net