
Нужно вывести диаграмму средних баллов учащихся из базы Firebird 2.5
Выборка проходит, диаграмма строится, но... От DbChartSource пришлось отказаться ввиду ну о-о-о-о-очень тормознутости оного

Серии строю в лоб
- Код: Выделить всё
.........
datasource1.DataSet.First;
for i := 1 to datasource1.DataSet.RecordCount do
begin
f := datasource1.DataSet.FieldByName('FAM').AsString; // фамилия !!!!!
otm := datasource1.DataSet.FieldByName(rg + s).AsFloat; // средний балл
Chart5BarSeries1.AddXY(i, otm, FloatToStrF(otm, fffixed, 2, 2), col); // отрисовка
datasource1.DataSet.Next;
end;
получаю
Нужно вместо порядковых номеров учащихся (ось Х) вставить их фамилии (переменная f). Как? И желательно фамилии на 90 градусов повернуть
Lazarus 1.1 r39305 FPC 2.6.1 i386-win32-win32/win64
Да, вместо значений диаграмм фамилии прекрасно выводятся, но "хочется странного" (с)Стругацкие



