|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
20.06.2007, 21:58 | #1 |
Пользователь
Регистрация: 09.06.2007
Сообщений: 11
|
Как выпонить действия по двойному слику на созданной таблице
Создана таблица
with TabbedNotebook1 do begin myta:=TDBGrid .Create(Self ); myta .Left :=0 ; myta .Top :=36; myta .Width :=981 ; myta .Height :=465 ; myta .DataSource :=DataSource1 ; myta .Name:=NamTab; myta .Parent :=Pages.Objects[IndPag] as TWinControl ; myta .Show ; end; ..... Как выпонить действия по двойному слику на созданной таблице |
20.06.2007, 22:40 | #2 |
Форумчанин
Регистрация: 31.05.2007
Сообщений: 486
|
Добавить строку:
myta.OnDblClick = MyProcedure; и где-нибудь прописать саму процедуру, например: procedure TForm1.MyProcedure(Sender: TObject); begin .... end; Если таких таблиц создается несколько и нужно их различать внутри процедуры-обработчика, то можно использовать параметр Sender - это ссылка на таблицу по которой щелкнули мышкой. |
21.06.2007, 09:53 | #3 |
Пользователь
Регистрация: 09.06.2007
Сообщений: 11
|
Спасибо всё получилось !!
Тему можно закрыть. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Событие для динамически созданной Button | Dogmat | Помощь студентам | 8 | 24.07.2008 12:44 |
Рисование на форме созданной на WinApi | N!ckeL | Win Api | 3 | 30.04.2008 19:02 |
События, выполняемые во время работы созданной компоненты | Denager | Общие вопросы Delphi | 13 | 22.04.2008 16:48 |
Завершение действия | SunKnight | Общие вопросы Delphi | 3 | 12.02.2008 18:25 |
Срок действия программы | fluxion | Win Api | 4 | 23.01.2008 20:25 |