перевод единиц

[Ernest027]

спасибо) пошел искать эти вычисляемые поля)

где тут это надо вводить? прям в графе Y?

[Stilet]

А как ты до этого настраивал DBChart? Точно так же и сейчас.

[Ernest027]

Ось х указал поле f, а ось y поле d. Но новое поле называется d1,и dbchart ругается что его нет

with ADOQuery2 do
begin
  SQL.Clear;
  SQL.Add('insert into Vibration2 select f,a,v,d from Vibration');
  ExecSQL;
  SQL.Add('select * from Vibration2 order by f');
  Open;
end;

каждую строку вставляет дважды, как сделать чтобы правильно вставлял?

ВО! Я в бд создал еще три поля: a1,v1,d1. И теперь при вставке из буфера таблицу в поля a,v,d нужно вставить по условию

select Vibration.*, case when (select max(d) from Vibration)>999 then d/1000 else d end as MyField from Vibration

полученные значения в a1,v1,d1.
спасибо.

[Stilet]

Ось х указал поле f, а ось y поле d. Но новое поле называется d1,и dbchart ругается что его нет

Фуфуфуфуфухххх....
Тебе нужно было:
1) Открыть один раз такой запрос в дизайне
2) Запомнить в ADOQuery список полей (это в его свойстве Fields делается)
3) После уже Чарт будет брать имена полей не из набора, а из запомненого списка.
Ладно. И так сойдет.

[Ernest027]

я уже ничего не пойму
даже это код не работает

select Vibration.*, case when (select max(d) from Vibration)>999 then d/1000 else d end as MyField from Vibration

хотя до этого работал.
а по поводу ваших последних советов я вообще в тупике. Посмотрите пожалуйста, что я не так делаю? привел таблицу которую нужно вставить и пример БД (не саму БД) где показана структура. Буду рад помощи.
Спасибо.

[Ernest027]

Подскажите где почитать как запоминать поля.

[Ernest027]

Stilet, как запомнить поля?

[Stilet]

Учиться смотрю ты не спешишь )
Ладно. Растолкую. В виде Манги.
Итак
1) Кидаешь на форму TDBChart, TADOQuery
2) Настраиваешь подключение к базе. Компоненты связываешь.
3) В Акцессе самом создаешь такой запрос, и даешь ему имя "Запрос1":
01.jpg
Сразу предупреждаю: Запрос писал с потолка, просто акцесс плохо помню.

4) Далее в Делфи открываешь свойство SQL для компонента ADOQuery прямо в дизайне в Инспекторе Объектов. Пишешь:
02.jpg

5) Тут же в инспекторе выставляешь свойство Active в True, чтоб открыть запрос предварительно.

6) Настраиваешь DBChart. Поскольку запрос уже открыт, то поля в нем появятся в DBChart без проблем:
03.jpg
Обрати внимание - В списке полей появилось вычисляемое поле d2, которое в запросе в Акцессе прописано с элементами условия, как тебе надо.

7) Тут же в инспекторе выставляешь свойство Active в False, чтоб закрыть тестовый наш запрос.

Фсе! Больше ничего не надо. Деактивируешь ADOQuery, и в коде уже можно будет писать:

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Open
end;

Т.е. Открывать этот запрос. Поскольку в дизайне все поля уже настроены (взяты из предварительно "протестированного" запроса) будет у тебя и график и таблица с нужными полями.

Так понятнее?

[Ernest027]

Спасибо Вам огромное. Делаю как Вы сказали, но БД sql server у меня.
В sql server выбираю свою таблицу и нажимаю создать запрос.

select Vibration.*, case when (select max (d) from Vibration)>999 and (select max (d) from Vibration)<999999 then d/1000 
when (select max (d) from Vibration)>999999 and (select max (d) from Vibration)<999999999 then d/1000000
when (select max (d) from Vibration)>999999999 then d/1000000000
else d end as d1,
case when (select max (a) from Vibration)>999 and (select max (a) from Vibration)<999999 then a/1000
when (select max (a) from Vibration)>999999 and (select max (a) from Vibration)<999999999 then a/1000000
when (select max (a) from Vibration)>999999999 then a/1000000000
else a end as a1 from Vibration order by f

обзываю его Запрос1.
в adoquery пишу

select * from [Запрос1]

при попытке свойство active перевести в true пишет недопустимое имя объекта "Запрос1"

[Stilet]

Ах ты... Объегорил. А я всерьез поверил что приложенная БД слепок настоящей...
А раз так, вот тебе в качестве мести: https://msdn.microsoft.com/ru-ru/lib...ql.120%29.aspx
Удачного разбора полетов.