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

Вниз

вопрос.   Найти похожие ветки 

 
oleg_teacher ©   (2007-06-06 17:48) [0]

На форме есть два компонента мемо.
В контекстном меню прописаны пункты вызова диалога изменения размера шрифта (пункт1) и цвета шрифта (пункт2).
Как сделать так, чтобы настройки применялись только к тому мемо, в котором был вызов контекстного меню.


 
Bora_ru ©   (2007-06-06 17:52) [1]

На том мемо, на котором находится фокус


 
clickmaker ©   (2007-06-06 18:03) [2]

http://delphimaster.net/view/1-1181129428/&web=1

может, хватит уже из пустого в порожнее переливать?


 
oleg_teacher ©   (2007-06-06 18:04) [3]

тоесть использовать свойство Focused
if memo1.Focused then ...
на 2 компонента это пройдет.
а если 122 компонента то очень много строчек кода нужно писать
а нельзя ли както упростить?


 
Плохиш ©   (2007-06-06 18:07) [4]

Кто просил настю личико показать? Любуйтесь теперь на это ...


 
sniknik ©   (2007-06-06 18:10) [5]

> а нельзя ли както упростить?
if ActiveControl is TMemo then
 TMemo (ActiveControl ).Focused


 
Плохиш ©   (2007-06-06 18:23) [6]

PopUpMenu знает по ком его вызвали и радостно желающим об этом сообщает...


 
Bora_ru ©   (2007-06-06 18:33) [7]

Браво Плохиш!



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

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

Наверх




Память: 0.45 MB
Время: 0.041 c
15-1184662508
boriskb
2007-07-17 12:55
2007.08.12
А ты годишься в учителя новейшей истории?


2-1184647927
Knob
2007-07-17 08:52
2007.08.12
Регулировка звука


2-1184611472
bagos
2007-07-16 22:44
2007.08.12
chart


2-1184649833
Kolan
2007-07-17 09:23
2007.08.12
Записи в DBGrid e странным образом исчезают.


2-1184326468
Квэнди
2007-07-13 15:34
2007.08.12
MediaPlayer и TCPServer





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский