|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.12.2011, 00:43 | #1 |
Форумчанин
Регистрация: 08.01.2011
Сообщений: 102
|
Пароль
Здравствуйте подскажите пожалуйста как продлить код
# procedure TForm1.Button4Click(Sender: TObject); var s, v:string; begin s:=Combobox1.Text; v:=Edit1.Text; if (s='1') and (v='f') then Form2.Show; if (s='2') and (v='d') then Form3.Show; end; ..... а дальше я хочу так сделать если юзер не ввел ничего или ввел что то то не правильно то должен выскакивать шоумесадже и посылать куда подальше и форма должна закрываться??? # Причина закрытия темы подробно описана в самом первом пункте правил раздела... Там даже примеры приведены, как следует называть свою тему, а как не следует. Читаем правила раздела. Там подробно написано, как следует оформлять код и что получается, если этого не делать. Последний раз редактировалось mihali4; 04.12.2011 в 02:51. |
04.12.2011, 00:58 | #2 |
Форумчанин
Регистрация: 02.11.2011
Сообщений: 105
|
Как вариант добавить переменную логического типа и через нее, может кто поизящнее предложит.
Код:
|
04.12.2011, 00:59 | #3 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,551
|
В FormCreate такой код разместите:
Код:
E-Mail: arigato.freelance@gmail.com
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
пароль | ksen12345 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 0 | 22.03.2011 20:57 |
Access запрашивает пароль на все файлы даже если пароль не устанавливался | d_adilet | Microsoft Office Access | 1 | 11.06.2010 19:44 |
пароль( | MilenaR | Безопасность, Шифрование | 7 | 16.05.2010 11:02 |
Пароль | StudentMarat | Помощь студентам | 13 | 25.03.2010 10:40 |
Пароль) | Teen4jump | Свободное общение | 2 | 05.11.2008 21:11 |