Каким компонентом лучше пользоваться ?

← →
infom © (2004-07-02 12:11) [0]

Мне нужно отобразить успеваемость студентов как в журнале
строки : Студенты
столбцы : Дисциплины

но загвостка в том что названия дисциплин очень длинные, поэтому их надо отображать вертикально в несколько строк

Как кому видится реализация этого ?
Если Кто делал уже, то каким образом ?

У меня конечно есть идея :
для списка использовать обычный грид (Quantum Grid)
а вот зоголовки отдельными Лабелами которые могут вертикально отображать текст.
Но это все громоздко и неудобно помоему.

← →
clickmaker © (2004-07-02 12:18) [1]

EhLib, EhDBGrid
Columns[i].Title.Orientation = tohVertical

← →
Семен Сорокин © (2004-07-02 12:22) [2]

> infom © (02.07.04 12:11)
У меня конечно есть идея :
для списка использовать обычный грид (Quantum Grid)
а вот зоголовки отдельными Лабелами которые могут вертикально отображать текст.
Но это все громоздко и неудобно помоему.

тогда уж проще (если не пользоваться сторонними компонентами) на OnDraw самому отрисовать что нужно через CreateFontIndirect, было как-то делал - могу код скинуть если нужно.

← →
infom © (2004-07-02 12:27) [3]

> Семен Сорокин © (02.07.04 12:22) [2]

Нужно скинь !!!

> clickmaker © (02.07.04 12:18) [1]

Я бы с удовольствием EhLib пользовалься но мне разрешено только с использованием Dev Express писать клиент

← →
Семен Сорокин © (2004-07-02 12:36) [4]

procedure TextOutAngle(var ABmp: TBitmap; ARect: TRect; const AText: string); var _lf: TLogFont; _font: HFONT; begin GetObject(ABmp.Canvas.Font.Handle, SizeOf(_lf), @_lf); _lf.lfEscapement := 90*10; _lf.lfQuality := DEFAULT_QUALITY; _font := CreateFontIndirect(_lf); try SelectObject(ABmp.Canvas.Handle, _font); ExtTextOut(ABmp.Canvas.Handle, 2, ARect.Bottom-1, ETO_CLIPPED, @ARect, @AText[1], Length(AText), nil); finally DeleteObject(_font) end end;
фонт назад не возвращаю - битмап использовался единожды.
я думаю доработаешь если надо (чтобы многострочный был и т.д.)

Попробовал восползоваться EhDBGrid
но там почему-то нет переноса слов на следующую строку в вертикальном написании заголовка
Как это сделать?

Почему-то когда вертикальное написание то переносит !

Каким компонентом лучше пользоваться ? Найти похожие ветки