Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Delphi > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 14.08.2019, 13:33   #1
Женя32
Форумчанин
 
Регистрация: 12.09.2008
Сообщений: 474
Счастье Автопереход между edit

Здравствуйте!
Приведенный ниже код позволяет автоматически переходить между Edit, но только в перед.
Подскажите пожалуйста, как можно сделать автопереход на предыдущий edit, если текущий edit уже пуст?

Код:
   if Length( (Sender as TEdit).Text ) = (Sender as TEdit).MaxLength then
  begin
     cxx := ActiveControl;
     repeat
       cxx :=  FindNextControl( cxx, true, false, false);
     until (cxx is TEdit);
     cxx.SetFocus;
  end;
Женя32 вне форума Ответить с цитированием
Старый 14.08.2019, 14:27   #2
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,040
По умолчанию

click F1
The GoForward parameter controls the direction of the search. If GoForward is true, FindNextControl searches forward through the child controls in tab order. If Go Forward is false, FindNextControl searches backward through the controls.
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Старый 14.08.2019, 17:32   #3
Женя32
Форумчанин
 
Регистрация: 12.09.2008
Сообщений: 474
По умолчанию

А как снять выделения при переходе?...
Женя32 вне форума Ответить с цитированием
Старый 14.08.2019, 17:34   #4
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,061
По умолчанию

AutoSelect:=False
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Связь между ComboBox и Edit Stepan_P Общие вопросы Delphi 11 20.05.2017 02:04
Переход между Edit стрелками brick08 Компоненты Delphi 2 12.10.2012 14:33
Переключения между Edit-ами??? FantomasRUS Общие вопросы Delphi 4 30.04.2010 13:27
Обмен данными между компонентом Edit и БД Fantom БД в Delphi 6 11.09.2008 11:52


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS