![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите чайнику [D5]
id_privin © (2002-07-04 12:54:00)Возникла идея, но как ее реализовать не знаю - с Дельфи работаю два месяца, Профи помогите!
Хочестся в сеточке которая отображает данные из DataSet некоторые колонки как-то выделить что-бы было понятно что при нажатии на них что-то происходит (открывается другое окно, спецефичное для каждой такой колонки). Имеются идеи : помещать в ячейки этих колонок картинки, или изменить их шрифт и менять курсор при наведении на них.
Знает-ли кто-нибудь простой метод что-бы это сделать.
Спасибо.
mike kouzmine (2002-07-08 16:47:00) [1]Дефаулт драу := Фалс
62mkv (2002-07-08 09:52:00) [2]Господа ! Если у кого-нибудь работает код, написанный Кабаном, пожалуйста помогите, ибо у меня не работает в 3-м Делфи ! Может он и не должен ? хотя по хелпу судя, должен. просто на gdFixed он ниче не делает, т.е. как будто не попадает в такое состояние State. причем для любой колонки. Selected, Focused - работает нормально, а вот gdFixed ... пожалуйста выскажите свое мнения.. DefaultDrawing=false...что еще надо указать?? спасибо
Kaban (2002-07-04 14:07:00) [3]1) Курсор надо менять, обрабатывая перемещения мыши
2) В процедуре DrawColumnCell можно запихать в ячейку все, что угодно, например, Bitmap(см. в хелпе TCanvas.Draw).
id_privin (2002-07-04 14:04:00) [4]Это все хорошо, но основное это:
1) как менять курсор над отдельно взятой колонкой.
2) как в ячейку запихнуть что-нибудь кроме текста
Kaban (2002-07-04 13:37:00) [5]не считаю
Skier (2002-07-04 13:35:00) [6]>Kaban
По-моему этой код можно "заменить" через Columns Editor.
Как считаешь ?
Kaban (2002-07-04 13:32:00) [7]Предлагаю заголовок делать жирным:
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if ([gdFixed] in State)and(Column = "нужный столбец") then
with DBGrid.Canvas do
begin
Font.Style:=[fsBold];
FillRect(Rect);
TextOut(Rect.Left,Rect.Top,Column.Field.Text);
end;
end;
Что-нибудь в этом духе,
Skier (2002-07-04 13:22:00) [8]>id_privin
> Имеются идеи : ...изменить их шрифт...
Как это не ответ ?!
id_privin (2002-07-04 13:18:00) [9]Ну это я знаю.
Только это не ответ на мой вопрос.
Skier (2002-07-04 12:59:00) [10]>id_privin
У сетки есть редактор колонок.
Вызывается по правой кнопке во время дизайна.
(называется Columns Editor)