Такой вопрос - ктонибудь всерьез с ним сталкивался (с TChart) ?
Мне поможет все, кроме описаний, которые есть во всех стандартных книжках по дельфям.
Точнее:
надо уметь задавать свойства компонента не через мастер настройки серий, а програмно
у меня есть Query производящий выборку некоторого набора данных из б.д.
Query формируется тоже в рантайме
На форме имеется грид и чарт
необходимо по желанию пользователя отображать данные либо в гриде, либо на графике чарта
Проблема в том, что через мастер настройки серий настроить координаты x и y графика невозможно, т.к. в дизайнтайме квери пуст

Да забыл: датасет у Query формируется и привязывается к нему в рантайме

Делал я такое, давно правда. Вот пример функции, которая заполняет Chart из компонента Table

Код

procedure TMainFrm.ChartFill(Chart:TChart; Table:TTable; TipT:string); var Num_azs, i:integer;    Color:array [0..9] of TColor; begin        for i:=0 to 9 do begin            Chart.SeriesList.Series[i].Active:= false;            Chart.SeriesList.Series[i].Clear;        end;        i:=0;        Color[0]:=clRed;        Color[1]:=clBlack;        Color[2]:=clBlue;        Color[3]:=clYellow;        Color[4]:=clFuchsia;        Color[5]:=clAqua;        Color[6]:=clGreen;        Color[7]:=clLime;        Color[8]:=clPurple;        Color[9]:=clMaroon;        Table.First;        Num_azs := Table.FieldByName('Afs_id').AsInteger;        while not Table.Eof do begin            if Num_azs = Table.FieldByName('Afs_id').AsInteger then begin                Chart.SeriesList.Series[i].AddXY(Table.FieldByName('Data').AsDateTime, Table.FieldByName(TipT).AsInteger, '', Color[i]);                Num_azs:=Table.FieldByName('Afs_id').AsInteger;                Table.Next;            end            else begin                Chart.SeriesList.Series[i].XValues.DateTime := true;                Chart.SeriesList.Series[i].Title:='АЗС №'+IntToStr(Num_Azs);                Chart.SeriesList.Series[i].Active:=true;                Num_azs:=Table.FieldByName('Afs_id').AsInteger;                i:=i+1;            end;            if i = 10 then begin                i:=9;                break;            end;        end;        Chart.SeriesList.Series[i].XValues.DateTime := true;        Chart.SeriesList.Series[i].Title:='АЗС №'+IntToStr(Num_Azs);        Chart.SeriesList.Series[i].Active:=true; end;

Надеюсь поможет

Я так понял что у него всего два измерения, и при этом одно должно быть числовым (или датным).
Короче у меня есть таблица из трех колонок (две строковые и числовая) и их надо отбразить на графике (например, по осям названия из строчных стобцов, а на их пересечении (если такое есть в таблице) - число
Можно ли как-нибудь такое сделать ?

Никогда не пробовал. Скорее всего именно с этим компонентом такого сделать нельзя. Есть компонент TeeChart. Я с ним не работал, но видел. Там возможностей на порядок больше.

Че то вот такой код не работает

Код

while not GridDS.DataSet.EOF do      begin       Chart1.SeriesList[0].AddY(GridDS.DataSet.Fields[1].AsFloat,       GridDS.DataSet.Fields[0].AsString,clTeeColor);       GridDS.DataSet.Next;      end;      Chart1.SeriesList[0].Active:=true;     end;

По Y заполняется нормально - тем чем надо из датасета
А вот по Х ставит в качестве меток на оси 0,1,2 и т.д., хотя GridDS.DataSet.Fields[0].AsString содержит совсем другой текст
??

Т.е. вопрос такой: как програмно присвоить метки по оси иксов