Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> если в поле ввода нет курсора, то... 
V
    Опции темы
valerchi
Дата 25.3.2011, 23:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 163
Регистрация: 27.5.2008
Где: Геническ

Репутация: нет
Всего: нет



Подскажите, пожалуйста как правильно написать. Мне нужно написать условие типа: 
если в поле ввода нет курсора, то...
Я писал так: if memo1.setfocus= false then...
но ничего не получается.


PM MAIL   Вверх
northener
Дата 26.3.2011, 00:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1361
Регистрация: 2.9.2010

Репутация: 12
Всего: 20



Например так:
Код

  if ActiveControl <> Memo1 then Memo1.SetFocus;



--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
valerchi
Дата 26.3.2011, 00:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 163
Регистрация: 27.5.2008
Где: Геническ

Репутация: нет
Всего: нет



Цитата(northener @ 26.3.2011,  00:16)
Например так:
Код

  if ActiveControl <> Memo1 then Memo1.SetFocus;

Не получается. Сделал так: 
Код

if ActiveControl <> Memo1.SetFocus then... 
 Мне не нужно, чтобы setfocus был в поле memo1.

Добавлено через 7 минут и 9 секунд
Может что-то неправильно делаю... У меня условие выполняется в процедуре keypress. и я хочу поставить условие, что если курсор находится в любом поле, кроме memo1, то допустимы все вводы символов (в любое поле кроме memo1)

Добавлено через 11 минут и 34 секунды
Так вроде бы правильно: 
Код

if ActiveControl <> Memo1 then....

Пошагово проверяю, условие = true а после условия (then ) ничего не выполняется ничего не пойму....

Добавлено через 14 минут и 50 секунд
Всё, спасибо, разобрался
PM MAIL   Вверх
northener
Дата 26.3.2011, 01:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1361
Регистрация: 2.9.2010

Репутация: 12
Всего: 20



Цитата(valerchi @  26.3.2011,  00:23 Найти цитируемый пост)
Может что-то неправильно делаю... У меня условие выполняется в процедуре keypress. и я хочу поставить условие, что если курсор находится в любом поле, кроме memo1, то допустимы все вводы символов (в любое поле кроме memo1)

Хм. А использовать событие TMemo.OnKeyPress религия запрещает?
Именно в обработчике этого события для данного контрола и положено запрещать ввод некоторых символов.
Хм2. Хотелось бы глянуть на эту "процедуру keypress". smile 

Это сообщение отредактировал(а) northener - 26.3.2011, 01:42


--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0586 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.