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

Вниз

Узнать какой объект создал событие   Найти похожие ветки 

 
Алексей   (2004-10-09 23:49) [0]

Подскажите, пожалуйста, как узнать по Sender-у имя объекта, который создал событие и получить доступ к его полям, например содержимое поля text.


 
Юрий Зотов ©   (2004-10-10 01:03) [1]

type
 TFriendControl = class(TControl);
...

if Sender is TControl then
 with TFriendControl(Sender) do
 begin
   Text := "Привет";
   ...
 end
else
 if Sender is TComponent then
 with TComponent(Sender) do
 begin
   ShowMessage(Name);
   ...
 end;



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

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

Наверх





Память: 0.44 MB
Время: 0.079 c
1-1097091748
bloodman
2004-10-06 23:42
2004.10.24
Как найти TtreeNode по AbsoluteIndex в дереве??


1-1097215738
Девушка
2004-10-08 10:08
2004.10.24
Abstact error


1-1097248945
DelphiLexx
2004-10-08 19:22
2004.10.24
TComponentEditor


3-1095941523
Snip
2004-09-23 16:12
2004.10.24
Динамическое создание компонетов TIBDatabase и TIBTransation


1-1097412808
Loaders
2004-10-10 16:53
2004.10.24
TToolBar и TToolButton под XP





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