My Visual Database — TTableGrid - отображение данных и типы полей

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Wed, 01 Nov 2017 06:35:21 +0000

Спасибо, Дмитрий! Подправил форматирование,

TNxNumberColumn(frmMain.tgrDetail.Columns[3]).FormatMask := '#,##0.00; ; ';

и теперь всё выглядит великолепно, как я и хотел: ненулевые значения выводятся в денежном формате, а вместо нулевых - пустышки

Re: TTableGrid - отображение данных и типы полей

null@example.com (DriveSoft) — Tue, 31 Oct 2017 19:04:29 +0000

Применить необходимое форматирование для колонки можно так

procedure Form1_TableGrid1_OnChange (Sender: string);
begin
   if Form1.TableGrid1.Columns[3] is TNxNumberColumn then
    begin
        TNxNumberColumn(Form1.TableGrid1.Columns[3]).FormatMask := '#,##0.00';
        TNxNumberColumn(Form1.TableGrid1.Columns[3]).Footer.FormatMask := '#,##0.00';
    end;
end;

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Tue, 31 Oct 2017 13:12:57 +0000

А вообще - печалька: не получается нормально отобразить бухгалтерскую информацию. Для вычисляемых полей (выделены красным), даже если их кастовать в REAL,

( 
cast(
 (select sum(summ) from docDetail
  where docDetail.id_doc = doc.id) AS REAL)
)

не получается отобразить денежный формат:

внизу обычные поля с типом "ДЕНЬГИ"

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Tue, 31 Oct 2017 06:21:16 +0000

Видимо, это из разряда "хотелок" : "Отображать нулевые значения как пустую строку". Именно отображать, потому что, если "пустышки" будут в наборе данных, то не будет работать функция SUM().

У стандартного компонента TDBGrid есть два замечательных события,

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
  Field: TField; State: TGridDrawState);

обработчики на которые легко справляются с подобными задачами по изменению способа отображения ячеек таблицы. Планируется ли что-либо подобное для TTableGrid ?

P.S. Почитал про типы данных SQLite http://xbb.uz/db/Tipy-dannyh-v-SQLite-versii-3 , теперь многое становится понятным в поведении визуальных компонентов, в частности - возможность в одной колонке отображать данные различных типов.

Re: TTableGrid - отображение данных и типы полей

null@example.com (DriveSoft) — Mon, 30 Oct 2017 21:04:48 +0000

Нужны вместо нулей пустышки? Или пустышки вместо нулей? )

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Mon, 30 Oct 2017 20:22:51 +0000

Вместо нулей - пустышки:

Re: TTableGrid - отображение данных и типы полей

null@example.com (DriveSoft) — Mon, 30 Oct 2017 18:05:13 +0000

Однако, хотелось бы иметь такой результат:

что конкретно?

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Mon, 30 Oct 2017 17:46:02 +0000

Дмитрий, спасибо за вариант с CAST, сумма отображается верно!

Однако, хотелось бы иметь такой результат:

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Mon, 30 Oct 2017 17:32:50 +0000

Про нулевые значения: первоначальные настройки вычисляемых полей были такими:

(
select cast( amount as REAL) from docDetail as dd
left join doc on doc.id = docDetail.id_doc
left join docType on docType.id = doc.id_docType
where docType.isIncrement and (dd.id = docDetail.id)
)

а результат очень странный:

Если первая запись содержала null, то данные начинали отображаться, как текст ( 100.45 ), а сумма не считалась.

Хотя так правильней, пришлось заменять пустые строки нулями, хотя это перегружает экран. Вопрос был в том, можно ли как-нибудь избавиться от нулей, но чтобы отображение и суммирование работало корректно?

Re: TTableGrid - отображение данных и типы полей

null@example.com (DriveSoft) — Mon, 30 Oct 2017 16:30:37 +0000

попробуйте так

(
CAST(
    ifnull((            
        select amount from docDetail as dd
        left join doc on doc.id = docDetail.id_doc
        left join docType on docType.id = doc.id_docType
        where docType.isIncrement and (dd.id = docDetail.id)
        ),0) AS REAL
    )
)

2. Про нулевые значения не понял

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Mon, 30 Oct 2017 08:50:18 +0000

Изначально я хотел использовать вычисляемые поля без отображения нулей

(            
select amount from docDetail as dd
left join doc on doc.id = docDetail.id_doc
left join docType on docType.id = doc.id_docType
where docType.isIncrement and (dd.id = docDetail.id)
)

но тогда не работает автоматическое вычисление итогов:

а числа с плавающей запятой отображаются, как строки, если первая ячейка в колонке пустая.

Вопросы:
1. Можно ли как-то явно определить желаемый формат отображения данных в колонке?
2. Можно ли подавить отображение нулевых значений в выбранной колонке?

Re: TTableGrid - отображение данных и типы полей

null@example.com (k245) — Mon, 30 Oct 2017 08:41:51 +0000

Меняем сортировку в детальной части и меняется формат отображения:

TTableGrid - отображение данных и типы полей

null@example.com (k245) — Mon, 30 Oct 2017 08:40:30 +0000

Обратил внимание, что формат отображения данных в таблице зависит от того, какую информацию содержит 1-я строка выборки. Пример с отображением количества

Тип данных - вещественное число
Вычисляемое поле Приход:

(ifnull((            
select amount from docDetail as dd
left join doc on doc.id = docDetail.id_doc
left join docType on docType.id = doc.id_docType
where docType.isIncrement and (dd.id = docDetail.id)
),0 ))

Вычисляемое поле Расход:

(ifnull((      
select amount from docDetail as dd
left join doc on doc.id = docDetail.id_doc
left join docType on docType.id = doc.id_docType
where not docType.isIncrement and (dd.id = docDetail.id)
),0))

Если первое число ноль, то вся колонка отображается, как целые числа