 |
|
|
 
|
|
Старый вопрос по Grid, Выделение ячейки 
| FlaGmaN |
|
|||
 Новичок Профиль Группа: Участник Сообщений: 46 Регистрация: 2.9.2006 Где: Москва Репутация: нет Всего: нет |
Уважаемые друзья!
мне необходимо сделать так, что при нажатии на ячейку в ней менялся фон и цвет(ehGrid), но есть нюанс. Снятие выделения с ячейки должно происходить по повторнуму нажатию на нее и одновременно может быть выделенно несколько ячеек. пытался вертеть код
Но ничего не вышло. P.S. У кого есть какие - либоо соображения по этому поводу прошу высказаться. |
|||
|
||||
Загрузка ...
| Alix |
|
|||
 L45  Профиль Группа: Участник Сообщений: 581 Регистрация: 4.5.2005 Где: Pskov/Spb Репутация: нет Всего: 23 |
что конкретно не вышло? цвет не изменился, не получается чтобы снималось при повторном клике или что? покажи, кстати, весь код прорисовки ячейки -------------------- Знание только тогда знание, когда оно приобретено усилиями своей мысли, а не памятью (с) Л. Толстой High tech. Low live. (с) Gardner Dozois |
|||
|
||||
| FlaGmaN |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 46 Регистрация: 2.9.2006 Где: Москва Репутация: нет Всего: нет |
В свойство ondrawdatacell компонента TJvDBGrid вставил выше написанный код, но никакой реакции от программы не последовало. На всякий случай вставил этот же код в свойство ON Drawcolumncell. результат то же.
|
|||
|
||||
| FlaGmaN |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 46 Регистрация: 2.9.2006 Где: Москва Репутация: нет Всего: нет |
Так, с выделение многих сток. я только что разобрася. option->multiselect = true;
Теперь взник вопрост при этом самом мульти селекте как сделать так чтобы данные из конкретной ячейки передавались в edit на другой форме. Я использую DeliveryForm.Edit7.Text:=cliData.qClientPhases.Fields[2].Text; но как понятно передается только одна последняя выбранная ячейка. А мне нужно сделать так чтобы до восьми значений передавалось с edit2 по edit9. Мжет кто может подсказать алгоритм или код подбросит. С уважением,FlaGmaN, |
|||
|
||||
| Alix |
|
|||
|
L45 Профиль Группа: Участник Сообщений: 581 Регистрация: 4.5.2005 Где: Pskov/Spb Репутация: нет Всего: 23 |
видимо забыл в св-вах компонента поставить DefaultDraw в false. (точного названия св-ва не помню, но вроде так) -------------------- Знание только тогда знание, когда оно приобретено усилиями своей мысли, а не памятью (с) Л. Толстой High tech. Low live. (с) Gardner Dozois |
|||
|
||||
| FlaGmaN |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 46 Регистрация: 2.9.2006 Где: Москва Репутация: нет Всего: нет |
Господа! как можно отследить что строка выбрана? и в какой процедуре это описать
|
|||
|
||||
| Alix |
|
|||
|
L45 Профиль Группа: Участник Сообщений: 581 Регистрация: 4.5.2005 Где: Pskov/Spb Репутация: нет Всего: 23 |
если используешь TClientDataSet, то это событие OnAfterScroll. Если нет, то должен быть аналог. А выделенные ячейки можно получить, по-моему, в TDBGrid.SelectedRows. -------------------- Знание только тогда знание, когда оно приобретено усилиями своей мысли, а не памятью (с) Л. Толстой High tech. Low live. (с) Gardner Dozois |
|||
|
||||
| FlaGmaN |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 46 Регистрация: 2.9.2006 Где: Москва Репутация: нет Всего: нет |
В процессе вышел следующий код
for i:=0 to ClientTaskPhases030JvDBGrid.SelectedRows.Count-1 do begin clidata.qclientphases.bookmark:= ClientTaskPhases030JvDBGrid.selectedrows; stringar:=cliData.qClientPhases.Fields[2].Text; end; error :incompatible types: "Strind"and "Tbookmarklist" Подскажите что сделать чтоб исправить ошибку Это сообщение отредактировал(а) FlaGmaN - 21.3.2008, 14:56 |
|||
|
||||
| Akella |
|
|||
 Творец Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 29 Всего: 329 |
используй выделение с Ctrl+ЛКМ
|
|||
|
||||
|
|
| Правила форума "Delphi: Базы данных и репортинг" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами Обязательно указание: 1. Базы данных (Paradox, Oracle и т.п.) 2. Способа доступа (ADO, BDE и т.д.)
FAQ раздела лежит здесь! Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема » |
[ Время генерации скрипта: 0.0554 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |