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

Вниз

Кнопка в stringgrid   Найти похожие ветки 

 
Oleg_   (2005-07-20 12:36) [0]

Для правильной прорисовки кнопок в ячейках грида при прокрутке я назначил button.parent:=stringgrid
но после этого нажатие на кнопку перестало работать с методом формы.

кто сталкивался, подскажите в чем дело
спасибо


 
Oleg_   (2005-07-20 13:16) [1]

Выяснил что дело в обработке сообщений гридом и обошел через mouseup


 
MBo ©   (2005-07-20 13:16) [2]

дело в том, что StringGrid не пересылает сообщения WM_COMMAND своим деткам, кроме inplaceedit.
Так что выхода по меньшей мере три:

1. Делать родителем кнопок форму (при этом кнопки должн быть выше грида, например, созданы динамически позднее его)

2. Написать наследника StringGrid, сделав

Procedure WMCommand( var msg: TWMCommand ); message WM_COMMAND;

...
If EditorMode and ( msg.Ctl = InplaceEdit.Handle ) Then
   inherited
 Else
   If msg.Ctl <> 0 Then
     msg.result :=
       SendMessage( msg.ctl, CN_COMMAND,
                    TMessage(msg).wparam,
                    TMessage(msg).lparam );

(P.Below)

3. Перекрыть оконную процедуру грида, сделав по приходу WM_COMMAND такую же пересылку



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

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

Наверх




Память: 0.45 MB
Время: 0.032 c
1-1121639447
murtix
2005-07-18 02:30
2005.08.07
Массив в длл и обратно


3-1119522193
Sirus
2005-06-23 14:23
2005.08.07
Что быстрее? DBF или Firebird?


3-1120213163
leonidus
2005-07-01 14:19
2005.08.07
ЧуднОй пример в Delphi 6 для работы с ADO


14-1120682822
GanibalLector
2005-07-07 00:47
2005.08.07
Что это ?


3-1119874036
bigcrush
2005-06-27 16:07
2005.08.07
Запрос удаления повторяющихся данных на SQL





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