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

Вниз

Проблема с DBGrid   Найти похожие ветки 

 
Юля   (2002-10-30 14:16) [0]

Помогите пожалуйста, у меня проблема с DBGrid. Мне надо сделать множественный выбор, но я не хочу пользоваться мультиселектом,т.к. нужно держать ctrl, а я бы хотела сделать либо галочку, либо выделение цветом по двойному нажатию мышки.


 
Aristarh   (2002-10-30 14:34) [1]

IMHO
Вряд ли у тебя что-то получится, по крайней мере без особых извращений. Свойство DBGrid1.SelectedRows Read Only. У меня используется ctrl.


 
Юля   (2002-10-30 14:50) [2]

а если поизвращаться, то каким образом?
хотя бы с подсветкой подскажите как сделать? типа - выделить строку красным цветом по двойному нажатию?


 
Григорий Ситнин   (2002-10-30 14:52) [3]

Хм... Перекрывать DrawCell с DblClick"ом и хранить список "кликнутых" строк отдельно?


 
Юля   (2002-10-30 14:53) [4]

или хотя бы ячеечку по двойному нажатию?


 
Romkin   (2002-10-30 14:55) [5]

Поле сделать дополнительное, в нем признак и хранить, а на OnDrawCell рисовать строку красным цветом, на OnDblClick - менять значение поля (и перерисовывать)


 
Aristarh   (2002-10-30 14:56) [6]

>Юля

см. еще раз Григорий Ситнин © (30.10.02 14:52).
Классная идея. Только в таком случае они на самом деле выделены не будут.


 
gek   (2002-10-30 15:00) [7]

> Aristarh © (30.10.02 14:56)
Будут будут...


 
Юля   (2002-10-30 15:06) [8]

спасибо усе попробую:)


 
Aristarh   (2002-10-30 15:09) [9]

>gek © (30.10.02 15:00)

цветом - да.


 
Юля   (2002-10-30 15:25) [10]

а поподробнее как перекрывать напиши плиз:)


 
Юля   (2002-10-30 15:27) [11]

а поподробнее как перекрывать напишите плиз:)


 
Aristarh   (2002-10-30 15:39) [12]

В object inspector:
DefaultDrawing = false

В св-ве OnDrawColumnCell:
(кусок из моей проги, разберешься)

with DBGrid1.Canvas do
begin
if (CATV.quDolg.FieldByName("DisconnectDate").AsDateTime <> 0) and not (gdSelected in State)
then begin
Brush.Color := clRed;
FillRect(Rect);
if (Column.Field.DataType=ftString) or (Column.Field.DataType=ftDateTime)
then TextOut(Rect.Left+2, Rect.Top+2, Column.Field.Text)
else TextOut(Rect.Right-TextWidth(Column.Field.Text)-3, Rect.Top+2, Column.Field.Text);
end
else DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end; // with


 
Юля   (2002-10-31 07:49) [13]

> Aristarh © (30.10.02 15:39)
большое спасибо!



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

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

Наверх





Память: 0.46 MB
Время: 0.008 c
1-33974
bobby
2002-11-01 14:36
2002.11.11
проблема


1-33952
Romych
2002-11-01 10:46
2002.11.11
Kulix


1-34100
Ghost!
2002-10-30 22:00
2002.11.11
сложный вопрос


1-33996
Salvator
2002-10-28 22:41
2002.11.11
Работа через Delphi с Word


3-33916
danilka
2002-10-21 08:36
2002.11.11
Орокол 8.1.7 + Дельфи 5, хранимые процедуры в пакетах





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