Главная страница
    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.045 c
2-1184349062
RIMED
2007-07-13 21:51
2007.08.12
весь текст в буфер


2-1184337631
Kolan
2007-07-13 18:40
2007.08.12
TPageControl в TScrolBox е какие есть варианты реализации?


2-1184443004
opoloXAI
2007-07-14 23:56
2007.08.12
Рабочая папка приложения.


15-1184343965
SkySpeed
2007-07-13 20:26
2007.08.12
Объясните плиз работу 2-х ядерного процессора...


15-1183600174
oldman
2007-07-05 05:49
2007.08.12
Олимпиаде в России быть!!!





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