Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2006.10.01;
Скачать: [xml.tar.bz2];

Вниз

Как передать фокус в миди-форму после TComboBox в главной форме   Найти похожие ветки 

 
incm ©   (2006-08-15 19:03) [0]

Есть главная миди-форма, на ней TToolBar, на нем TComboBox.
После использования комбо-бокса надо передать фокус в вершнюю дочернюю миди-форму.
Вызов в OnChange ActiveMDIChild.SetFocus - не помогает, фокус остается у комбо-бокса.


 
incm ©   (2006-08-16 11:15) [1]

Так что никто не знает ?


 
Dell3r ©   (2006-08-16 11:25) [2]

А ты попробуй передать фокус не ActiveMDIChild, а компоненту на этой форме.


 
Loginov Dmitry ©   (2006-08-16 22:55) [3]

А какому компоненту на дочерней форме ты пытаешся передать фокус?
(просто есть компонены (со свойством Handle), которым нельзя передать фокус даже после щелчка мышкой (глюк такой)).


 
incm ©   (2006-08-17 13:35) [4]

Компонент TfrxPreview. Он на форме один, больше там ничего нет.
У компонента есть процедура SetFocus. Когда этот компонент размещен на главной форме - все работает. Но если он на одной из форм миди приложения, комбо-бокс остается с фокусом после вызова SetFocus у TfrxPreview на активной дочерней миди-форме.


 
Loginov Dmitry ©   (2006-08-17 15:39) [5]

в событии OnSelect ComboBox"a:

Form2.Perform(WM_SETFOCUS, 0, 0);
Form2.ActiveControl := Form2.frxPreview;


 
incm ©   (2006-08-17 17:31) [6]

Loginov Dmitry

Огромное спасибо! Помогло.

Я делал Form2.SetFocus. Но эффекта не было.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2006.10.01;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.018 c
2-1157970086
Layner
2006-09-11 14:21
2006.10.01
Как узнать ширину/длину 2х мерного массива?


15-1157995079
Pazitron_Brain
2006-09-11 21:17
2006.10.01
Разархивировать скрипт на сервере


3-1154085258
Ega23
2006-07-28 15:14
2006.10.01
Настройка ADOConnection


2-1157788881
_ERIC_
2006-09-09 12:01
2006.10.01
Обновление TWebBrowser


2-1158090558
aivar
2006-09-12 23:49
2006.10.01
Что такое контрольные суммы файлов и счем их едят! Спасибо!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский