Текущий архив: 2006.04.16;
Скачать: CL | DM;
Вниз
Помогите разобраться с TChart ом. Найти похожие ветки
← →
Shopot © (2006-03-27 22:21) [0]Помогите!!! Дело такое: из потока TThread вывожу на 2 TChart"а
графики вертикально (перевертыши на 90). Диапазон в 2000 единиц по X (то есть по Y до поворота) рисует. А вот в 20 000 ед. отказывается. Привожу код:
procedure TMyThread.Execute;
var
alpha: Double;
begin
frmMain.Series1.Clear;
frmMain.Series2.Clear;
// Это чтобы можно было их нарисовать вертикально
frmMain.Series1.XValues.Order := loNone;
frmMain.Series1.YValues.Order := loNone; //loDescending;
frmMain.Series2.XValues.Order := loNone;
frmMain.Series2.YValues.Order := loNone; //loDescending;
alpha := 0;
while not Terminated do
begin
Sleep(5);
frmMain.Series1.AddXY(1000 * sin(alpha), alpha);
Sleep(5);
frmMain.Series2.AddXY(10000 * cos(alpha), alpha);
alpha := alpha + Pi / 10;
end;
end;
← →
Kolan © (2006-03-28 20:42) [1]1. Не работай с чартом, да и с другими виз. компенентами, в доп. пототоке. Используй для отображения главный.
2.Что значит отказывается.
3.rmMain.Series1.XValues.Order := loNone;
frmMain.Series1.YValues.Order := loNone; //loDescending;
frmMain.Series2.XValues.Order := loNone;
frmMain.Series2.YValues.Order := loNone; //loDescending;
Вот это ты используешь что бы повернуть?
Попробуй повернуть не свойствами чарта, а сделав изменения в формуле. Те выводи уже повернутое...
← →
Shopot © (2006-03-31 23:56) [2]>Kolan
>Те выводи уже повернутое...
Без установки этих свойств не получится повернуть.
И как выводить в основном потоке, вычисления же идут в TThread"е?
Страницы: 1 вся ветка
Текущий архив: 2006.04.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.047 c
