Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];
Внизпоиск Edit-а Найти похожие ветки
← →
Vik_mix (2003-09-12 23:28) [0]Мастера , помогите пожалуйста !
Вот кусок кода :
for i:= 1 to ComponentCount do
begin
if Components[i-1] is TEdit then
with Components[i-1] as TEdit do if ( фокус ввода на этом Edit-е ) then Text:=...
end;
то есть как определить, находится ли фокус ввода на искомом Edit-е ?
Буду очень благодарен!
← →
mrcat (2003-09-12 23:31) [1]Focused ?
← →
Sam Stone (2003-09-12 23:42) [2]Если TEdit один на форме,то
if Components[i-1] is TEdit then
if TEdit(Components[i-1]).focused then TEdit(Components[i-1]).text:="Уря!!!"
← →
Vik_mix (2003-09-12 23:45) [3]Вобщем мне нужно вывести в активный Edit (т.е. в котором в данный момент мигает курсор ) некую надпись, а Edit-ов на форме куча, вот я и отбираю подходящий мне ...
← →
Vik_mix (2003-09-12 23:46) [4]Все, догнал ...
← →
Vik_mix (2003-09-12 23:57) [5]Не, всё равно не канает, прога вылетает с ошибкой!
← →
Billy (2003-09-13 00:00) [6]Попробуй
for i:=0 to ComponentCount-1
компоненты нумеруются от 0, компонента с номером ComponentCount просто не существует.
← →
mrcat (2003-09-13 00:03) [7]Vik_mix (12.09.03 23:28)
код, полностью
← →
_dima_ (2003-09-13 07:10) [8]Не, так как вы это задумали сделать не получиться, т.к для вывода некой надписи в активный Edit ты стопудовонажимаешь на какой-нибудь кнопарь и тем самым переводишь фокус на него.
Используй событие Edit OnEnter, запоминай его имя или что-то еще, и от него пляши.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c