Главная страница
    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.047 c
2-1184574350
Romikremind
2007-07-16 12:25
2007.08.12
Открытие БД Access


2-1184610269
Knob
2007-07-16 22:24
2007.08.12
Как добавить в список


1-1180427774
alexander_nt
2007-05-29 12:36
2007.08.12
Скопировать содержимое TWebBrowser


2-1184230213
viper75
2007-07-12 12:50
2007.08.12
создание объекта в потоке


6-1167768922
Moonglow
2007-01-02 23:15
2007.08.12
CrtSock





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