Главная страница
    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.058 c
9-1148651868
TButton
2006-05-26 17:57
2007.08.12
гравитация и её последствия


2-1184435002
Sonic90
2007-07-14 21:43
2007.08.12
Кнопка формы на панели задач


15-1184560988
de.
2007-07-16 08:43
2007.08.12
БД


2-1184226969
DINOEL
2007-07-12 11:56
2007.08.12
Проблема в передачи данных с одной формы в другую


3-1177512416
DelphiLexx
2007-04-25 18:46
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский