[govorun]

Кинул на форму ADOQuery, в String list editor написал
SELECT SUM(AAA) FROM BBB WHERE [CCC]=100
Подключчил - работает.

Пытаюсь добавить туда же еще две аналогичные строчки:
SELECT SUM(AAA) FROM BBB WHERE [CCC]=200
SELECT SUM(AAA) FROM BBB WHERE [CCC]=300

Вопрос: как разделить (чем) разделить эти три строки, чтобы запрос работал. Ставил в конце строк '+', ';' , еще чета пытался ставить - не работает.

Идея взята у "POLI-SMEN" в теме

http://www.delphisources.ru/forum/sh...ad.php?t=25317

Или в String list editor так делать нельзя?

[M.A.D.M.A.N.]

Код:

select ...
union all
select ...

По идее правильно было бы так:

Код:

SELECT SUM(AAA) FROM BBB WHERE [CCC]=100 or [CCC]=200 or [CCC]=300

[govorun]

Сообщение от M.A.D.M.A.N.

Код:

select ...
union all
select ...

По идее правильно было бы так:

Код:

SELECT SUM(AAA) FROM BBB WHERE [CCC]=100 or [CCC]=200 or [CCC]=300

Должны вычисляться 3 разных значения, которые потом размещу в 3 разных Editа. Информация будет отображаться на форме как статистика.

[M.A.D.M.A.N.]

Вроде бы так можно.

Код:

select (SELECT SUM(AAA) FROM BBB WHERE [CCC]=100) as FOO, 
(SELECT SUM(AAA) FROM BBB WHERE [CCC]=200) as BAR,
(SELECT SUM(AAA) FROM BBB WHERE [CCC]=300) as BAZ from faketable

[govorun]

Помучался и сделел отдельные ADOQuery.
Возникла другая беда.
Результат запроса вывожу в Edit
Edit1.Text := FloatToStr(ADOQuery1.Fields[0].AsFloat);

Если вычисленное значение 15,54 то в Editе показывает 15,54
Если вычисленное число 15,00 то в Editе показывает 15 без нолей.
Как исправить, чтоб целое число показывалось с двумя нолями.

В базе (Access) свойство поля - с плавающей точкой
DispleyFormat и Editformat везде стоят ,0.00

[poli-smen]

Сообщение от govorun

Помучался и сделел отдельные ADOQuery.

Почему в одном ADOQuery не получилось?

Сообщение от govorun

Возникла другая беда.
Результат запроса вывожу в Edit
Edit1.Text := FloatToStr(ADOQuery1.Fields[0].AsFloat);

Если вычисленное значение 15,54 то в Editе показывает 15,54
Если вычисленное число 15,00 то в Editе показывает 15 без нолей.
Как исправить, чтоб целое число показывалось с двумя нолями.

Либо при выводе в TEdit используй функции форматирования (Format, FloatToStrF), либо вместо TEdit используй TMaskEdit.

Сообщение от govorun

В базе (Access) свойство поля - с плавающей точкой
DispleyFormat и Editformat везде стоят ,0.00

Это форматирование говорит только о том как числа будут отображаться в самом Access'e. Само же число кроме собственно числа естественно не содержит никакого форматирования. Например если скопировать это число в Excel, то оно будет отображаться в том формате как указано в ячейке Excel, а не в Access. Если скопировать в калькулятор, то будет отображаться так, как принято в калькуляторе, а не в Access'е. Ну и т.д.

[govorun]

Сообщение от poli-smen

Почему в одном ADOQuery не получилось?

Либо при выводе в TEdit используй функции форматирования (Format, FloatToStrF), либо вместо TEdit используй TMaskEdit.

Это форматирование говорит только о том как числа будут отображаться в самом Access'e. Само же число кроме собственно числа естественно не содержит никакого форматирования. Например если скопировать это число в Excel, то оно будет отображаться в том формате как указано в ячейке Excel, а не в Access. Если скопировать в калькулятор, то будет отображаться так, как принято в калькуляторе, а не в Access'е. Ну и т.д.

Писал выше - не смог разделить строки.
Пробую с TMaskEdit, тоже пока не получается маску установить

[poli-smen]

Сообщение от govorun

Писал выше - не смог разделить строки.

Я же в другой теме уже писал как разделять строки:

PHP код:

SELECT
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300) 


Если же нужно не по столбцам, а по записям (т.е. не по горизонтали, а по вертикали), то используй UNION как здесь выше предлагал M.A.D.M.A.N.

Сообщение от govorun

Пробую с TMaskEdit, тоже пока не получается маску установить

Наверное в твоём случае TMaskEdit не сильно подойдёт. Делай через функции форматирования Format или FloatToStrF.

[govorun]

Уже понял, пытаюсь разобраться с FloatToStrF

Написал вот так

Edit3.Text := FloatToStrf(ADOQuery3.Fields[0].AsFloat,ffNumber,12,2);

Вроде работает

Сообщение от poli-smen

Я же в другой теме уже писал как разделять строки:

PHP код:

SELECT
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300) 


Если же нужно не по столбцам, а по записям (т.е. не по горизонтали, а по вертикали), то используй UNION как здесь выше предлагал M.A.D.M.A.N.

Я писал в ADOQuery в String list editor вот это:
SELECT
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300)

и получал ошибку вроде "нет входной таблицы" или синтаксис или еще чего...
Идея мне очень понравилась, но реализовать ее цивилизованным способом я не смог. (ТЕМА ДЛЯ НАЧИНАЮЩИХ). Как говорится если не можеш перелезть через забор попробуй его обойди или сделай подкоп
Может я не то и не туда писал?

[poli-smen]

Сообщение от govorun

Я писал в ADOQuery в String list editor вот это:
SELECT
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300)

и получал ошибку вроде "нет входной таблицы" или синтаксис или еще чего...
Идея мне очень понравилась, но реализовать ее цивилизованным способом я не смог. (ТЕМА ДЛЯ НАЧИНАЮЩИХ). Как говорится если не можеш перелезть через забор попробуй его обойди или сделай подкоп
Может я не то и не туда писал?

Этот запрос я проверял на MS SQL Server'е - он нормально работал. Сейчас попробовал в Access'е - не работает.
M.A.D.M.A.N. оказался прав - Access зачем-то требует явного указания какой-либо "левой" таблицы для этого запроса, да ещё и выводит одинаковых записей в количестве равном как у этой "левой" таблицы.
Вобщем вот так должно работать (для непустой таблицы):

PHP код:

SELECT TOP 1
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300) FROM Таблица 


[govorun]

Сообщение от poli-smen

Этот запрос я проверял на MS SQL Server'е - он нормально работал. Сейчас попробовал в Access'е - не работает.
M.A.D.M.A.N. оказался прав - Access зачем-то требует явного указания какой-либо "левой" таблицы для этого запроса, да ещё и выводит одинаковых записей в количестве равном как у этой "левой" таблицы.
Вобщем вот так должно работать (для непустой таблицы):

PHP код:

SELECT TOP 1
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300) FROM Таблица 


А это останется в силе?
Edit3.Text := FloatToStrf(ADOQuery3.Fields[0].AsFloat,ffNumber,12,2);
Edit3.Text := FloatToStrf(ADOQuery3.Fields[1].AsFloat,ffNumber,12,2);
Edit3.Text := FloatToStrf(ADOQuery3.Fields[2].AsFloat,ffNumber,12,2);
я имею ввиду 0, 1, 2 (это номера строк ?)

[poli-smen]

Сообщение от govorun

А это останется в силе?
Edit3.Text := FloatToStrf(ADOQuery3.Fields[0].AsFloat,ffNumber,12,2);
Edit3.Text := FloatToStrf(ADOQuery3.Fields[1].AsFloat,ffNumber,12,2);
Edit3.Text := FloatToStrf(ADOQuery3.Fields[2].AsFloat,ffNumber,12,2);
я имею ввиду 0, 1, 2 (это номера строк ?)

Нет. Это номера полей (т.е. колонок).
Вообще не все провайдеры гарантируют, что в результате вернутся поля в том порядке в котором были перечислены в запросе, поэтому для надёжности лучше их именовать прямо в запросе и потом обращаться к ним по именам.

Пример запроса:

PHP код:

SELECT TOP 1
(SELECT SUM(Поле2) AS Sum100 FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) AS Sum200 FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) AS Sum300 FROM Таблица WHERE Поле1 = 300) FROM Таблица 


И потом в программе:

Код:

Edit1.Text := FloatToStrF(ADOQuery3.FieldByName('Sum100').AsFloat, ffNumber, 12, 2);
Edit2.Text := FloatToStrF(ADOQuery3.FieldByName('Sum200').AsFloat, ffNumber, 12, 2);
Edit3.Text := FloatToStrF(ADOQuery3.FieldByName('Sum300').AsFloat, ffNumber, 12, 2);

[govorun]

Сообщение от poli-smen

Нет. Это номера полей (т.е. колонок).

Пример запроса:

PHP код:

SELECT TOP 1
(SELECT SUM(Поле2) AS Sum100 FROM Таблица WHERE Поле1 = 100),
(SELECT SUM(Поле2) AS Sum200 FROM Таблица WHERE Поле1 = 200),
(SELECT SUM(Поле2) AS Sum300 FROM Таблица WHERE Поле1 = 300) FROM Таблица 


И потом в программе:

Код:

Edit1.Text := FloatToStrF(ADOQuery3.FieldByName('Sum100').AsFloat, ffNumber, 12, 2);
Edit2.Text := FloatToStrF(ADOQuery3.FieldByName('Sum200').AsFloat, ffNumber, 12, 2);
Edit3.Text := FloatToStrF(ADOQuery3.FieldByName('Sum300').AsFloat, ffNumber, 12, 2);

Попробовал, компилируется. Но при попытке программы обратиться к форме, на которой это дело размещено, пишет, что поле 'SUM100' не найдено. И я почему-то согласен с программой. Возможно этот способ хорош когда расчетные данные заносятся в какую-то таблицу с полями типа 'SUM100'. У меня данные просто расчитываются и показываются при обращении к форме.
Идея хорошая. Но, пока строю забор из ADOQuery.

[poli-smen]

Сообщение от govorun

Попробовал, компилируется. Но при попытке программы обратиться к форме, на которой это дело размещено, пишет, что поле 'SUM100' не найдено.

Тьфуты. Это просто я не в том месте поставил именования полей.
Вот правильный запрос:

PHP код:

SELECT TOP 1 
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100) AS Sum100,
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200) AS Sum200,
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300) AS Sum300 FROM Таблица 


[govorun]

Сообщение от poli-smen

Тьфуты. Это просто я не в том месте поставил именования полей.
Вот правильный запрос:

PHP код:

SELECT TOP 1 
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 100) AS Sum100,
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 200) AS Sum200,
(SELECT SUM(Поле2) FROM Таблица WHERE Поле1 = 300) AS Sum300 FROM Таблица 


Ну вот, совсем другое дело....
Почет и уважуха....