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

Вниз

Рамка в DBGrid е.....   Найти похожие ветки 

 
garry   (2002-07-25 09:34) [0]

Господа! Наверное этот вопрос не совсем по базам данных, но компонент от туда, так что заброшу ка я его сюда. Итак, проблема в следующем. Нужно выделенную строку в dbgrid подсветить рамкой какого-нибудь яркого цвета. Именно рамкой. Это реально? Если да, то как?


 
vads   (2002-07-25 09:59) [1]

На http://www.delphikingdom.com
Есть статья "Разноцветный DBGRID" там есть решения DBGrid по на все (почти на все) случаи жизни


 
garry   (2002-07-25 10:10) [2]

То-то и оно, что на мой случай там решения нет. Покрасить ячейку дело не хитрое, а вот как рамку во круг этой ячейки сделать...


 
Black Cat   (2002-07-25 11:07) [3]

DBGrid>Options>dgRowSelect:=true

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
with dbgrid1.Canvas do
If gdSelected in state then
begin
Pen.Color:=clRed;
MoveTo(rect.Left,rect.Top);
LineTo(rect.Right,rect.Top);
MoveTo(rect.Left,rect.Bottom);
LineTo(rect.Right,rect.Bottom);
if Column.Index=0 then
begin
MoveTo(rect.Left,rect.Bottom);
LineTo(rect.Left,rect.Top);
end;
if Column.Index=DBGrid1.Columns.Count-1 then
begin
MoveTo(rect.Right,rect.Bottom);
LineTo(rect.Right,rect.Top);
end;
end;
end;

Остальное сам допишешь. Удачи!


 
jessis   (2002-07-25 11:13) [4]

Вокруг одной ячейки?


 
Black Cat   (2002-07-25 11:17) [5]

Вокруг одной ячейки как-бы ректангла хватит :)


 
garry   (2002-07-25 11:23) [6]

Класс!!! А тоже самое, только с dgRowLines=false?


 
garry   (2002-07-25 11:25) [7]

Нет, нет... Именно выделенную строку подсветить нужно. Причём, желательно, чтобы остальная сетка скрыта была.


 
Black Cat   (2002-07-25 12:08) [8]

dgRowLines=False;dgColLines=False;
а чем собственно, dgRowLines не устраивает?


 
garry   (2002-07-25 13:18) [9]

Не устраивает, вот. Ха, но если dgRowLines=False и dgColLines=False то собственно никакие линии и не показываются да же те что выделены!


 
garry   (2002-07-25 13:46) [10]

Ссорри.... Всё работает, просто я эту линию потом областью закрашивал...



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

Форум: "Базы";
Текущий архив: 2002.08.15;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.007 c
1-48114
anod
2002-08-05 12:13
2002.08.15
ListView


1-48034
V.Turecky
2002-08-03 20:09
2002.08.15
Меню.Enabled:=false???


1-48079
ZEE
2002-08-04 02:29
2002.08.15
OnPopup в MainMenu


7-48321
VID
2002-05-30 08:47
2002.08.15
Отключение винта


1-48191
Sedunov Vitaly
2002-08-02 18:41
2002.08.15
OnActivate





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