|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.07.2008, 12:47 | #1 |
Участник клуба
Регистрация: 29.01.2008
Сообщений: 1,039
|
Регистры
Я хочу чтобы по нажатию кнопки проверялся текст в Edit,
Вот код: if Edit1.Text = 'hi' then .... Но процедура не будет выполнена если текст будет к примеру таким Hi hI как это исправить? |
25.07.2008, 13:28 | #2 |
Реанимируюсь...
Участник клуба
Регистрация: 19.07.2007
Сообщений: 1,445
|
Манжосов Денис , ну так приведи всё к одному регистру.
Функция LowerCase - Изменяет символы верхнего регистра в строке в строчные буквы http://delphibasics.ru/LowerCase.php
Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живёте.
Правила форума => Правила раздела => Для общего развития => Помощь студентам => Перед тем, как создавать тему, скачайте себе... P.S.: форум не песочница (с)
название статьи на сайте MS: "Отмена принудительного отключения автоматического запуска в реестре Windows" |
27.07.2008, 11:41 | #3 |
Форумчанин
Регистрация: 31.05.2007
Сообщений: 266
|
s:=LowerCase(Edit1.Text);
или UpperCase, только в верхние |
27.07.2008, 13:21 | #4 |
Старожил
Регистрация: 22.05.2007
Сообщений: 9,065
|
у эдита есть свойство какое-то я уже не помню названия, но в общем там можно указать чтобы все символы вводились в Upper или Lower регистре. соответственно если это устраивает, никаких преобразований делать не прийдется
|
27.07.2008, 14:06 | #5 |
Старожил
Регистрация: 06.08.2007
Сообщений: 2,183
|
Используя CompareText:
Код:
|
27.07.2008, 18:05 | #6 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,551
|
Вместо UpperCase и LowerCase лучше использовать AnsiUpperCase и AnsiLowerCase. Иначе не будет работать с русскими буквами.
E-Mail: arigato.freelance@gmail.com
|
28.07.2008, 09:29 | #7 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
28.07.2008, 10:41 | #8 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,551
|
UpperCase реализован руками, причем кривыми.
А AnsiUpperCase использует функцию CharUpperBuff из user32.dll Хотя, на счет скорости не уверен, т.к. не тестировал. E-Mail: arigato.freelance@gmail.com
|
28.07.2008, 12:48 | #9 |
Участник клуба
Регистрация: 29.01.2008
Сообщений: 1,039
|
AnsiLowerCase помогло, и работает нормально.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Регистры символов | rexec | Microsoft Office Excel | 11 | 02.02.2009 13:15 |
Регистры | RealSHELS | Общие вопросы Delphi | 3 | 28.03.2008 18:56 |
Регистры | Elm0 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 13 | 10.02.2008 19:49 |