как рисовать стрелки направления сортировки в загаловках DBGrig?

← →
AFrolov (2002-09-30 15:09) [0]

Собственно subj.
Заранее спасибо.

← →
MBo (2002-09-30 15:15) [1]

1) самое простое - к заголовку добавляй v или ^
2) Получи прямоугольник ячейки и выводи textout шрифтом Marlett
соотв. треугольнички

← →
Aristarh (2002-09-30 15:19) [2]

Я хотел сделать тоже самое. Сколько не страдал - не получилось. Сейчас использую EhLib. Там можно выводить как bitmap, так и просто 3d треугольнички маркеры. Очень удобно и интерфейс грида более красивый.

← →
AFrolov (2002-09-30 15:20) [3]

а как получить прямоугольник?

← →
Jony (2002-09-30 15:23) [4]

В EhDBGrid заголовки таблицы можно определить как кнопки и задать им стрелки в виде треугольников.

← →
MBo (2002-09-30 15:24) [5]

1) пр-к любой ячейки данного столбца, OffsetRect c учетом того, что top будет 0
2) TXGrid=class(TCustomGrid);
...
TXGrid(DBGrid1).CellRect(0,0);

← →
AFrolov (2002-09-30 16:36) [6]

Что-то не получается. Можно более подробно, если нетрудно.

← →
MBo (2002-09-30 16:47) [7]

type
TXGrid=class(TCustomGrid);
...
procedure TForm1.Button1Click(Sender: TObject);
var
R:TRect;
begin
R:=TXGrid(DBGrid1).CellRect(1,0);
DBGrid1.Canvas.Font.Name:="Marlett";
DBGrid1.Canvas.Font.Size:=14;
DBGrid1.Canvas.Brush.Style:=bsClear;
DBGrid1.Canvas.TextOut(R.Right-16,R.Top-2,#54);
end;

← →
AFrolov (2002-09-30 16:56) [8]

Большое спасибо.

← →
Vladislav (2002-10-01 12:51) [9]

А я прямо на канве грида рисую. Изображения хранятся в ImageList.
ImageList1.Draw( DBGrid1.Canvas, x, y, ImageIndex);

← →
AFrolov (2002-10-01 12:53) [10]

как рисовать стрелки направления сортировки в загаловках DBGrig? Найти похожие ветки