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

Вниз

Как узнать Sender   Найти похожие ветки 

 
Turbid ©   (2004-10-04 10:47) [0]

Имеется двумерный динамический массив батонов. Я реализовал поиск sender"а через цикл, но ведь это не рульно. Почему работет ...if Button[i,j] = Sender then... и не работает NewButton := Sender; Тоесть узнать sender это или нет получается, а вот присвоить его. Понятно, что Sender: TObject - абстрактный класс, так чего же делать?


 
Семен Сорокин ©   (2004-10-04 10:51) [1]

NewButton := TMySuperButton(Sender);
вместо TMySuperButton подставляешь нужный тип (TButton, TToolButton, TBitBtn...)
перед этим не мешает узнать а является ли Sender кнопкой:
if Sender is TMySuperButton then
...



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

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

Наверх




Память: 0.44 MB
Время: 0.037 c
4-1094205188
TankMan
2004-09-03 13:53
2004.10.17
Как определить оборудование?


1-1096541673
klerk
2004-09-30 14:54
2004.10.17
Про Excel


9-1087354116
dimodim
2004-06-16 06:48
2004.10.17
У меня проблема с аним. Актор в GlScene


14-1096287186
Василий
2004-09-27 16:13
2004.10.17
Импорт из Excel в Delphi7


14-1096109267
X9
2004-09-25 14:47
2004.10.17
NRG 2 ISO





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