|
|
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
zinpub, Вот этот кодик мне покрасил итоги по участкам. По цеху, наверное, не красит, потому что цех столбцом левее и как заголовок строки не воспринимается. Буду дальше извращаться. Огромное спасибо за рекомендации! :-) procedure TForm.PivotGridStylesGetContentStyle( Sender: TcxCustomPivotGrid; ACell: TcxPivotGridDataCellViewInfo; var AStyle: TcxStyle); var i: integer; begin if (AnsiPos('Всего по цеху',VartoStr(ACell.Row.Value)) > 0) or (AnsiPos('Всего по участку',VartoStr(ACell.Row.Value)) > 0) then AStyle := Style_Itogi; end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.11.2019, 14:31 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
Jane CHER zinpub, Вот этот кодик мне покрасил итоги по участкам. По цеху, наверное, не красит, потому что цех столбцом левее и как заголовок строки не воспринимается. Буду дальше извращаться. Огромное спасибо за рекомендации! :-) procedure TForm.PivotGridStylesGetContentStyle( Sender: TcxCustomPivotGrid; ACell: TcxPivotGridDataCellViewInfo; var AStyle: TcxStyle); var i: integer; begin showmessage(VartoStr(ACell.Row.Value)); if (AnsiPos('Всего по цеху',VartoStr(ACell.Row.Value)) > 0) or (AnsiPos('Всего по участку',VartoStr(ACell.Row.Value)) > 0) then AStyle := Style_Itogi; end; по ACell можно получить RecNo ... А из DataController.Values[x,y] значение любого столбца для строки ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.11.2019, 14:33 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
zinpub, Спасибо, попробую. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2019, 06:37 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
zinpub по ACell можно получить RecNo ... Стесняюсь спросить - КАК? :-) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2019, 07:49 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
Jane CHER, См. ACell.Row.Index ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2019, 10:06 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
ёёёёё, Пробовала вроде так - вылетает к бесу с out of bounds. Еще попробую. Пасиба. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.11.2019, 06:05 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
На нужную колонку так и не смогла выйти, обошлась костылем (в той же колонке в итогах по цеху пустые значения). procedure TForm.PivotGridStylesGetContentStyle( Sender: TcxCustomPivotGrid; ACell: TcxPivotGridDataCellViewInfo; var AStyle: TcxStyle); begin if (VartoStr(ACell.Row.Value)='') or (AnsiPos('Всего по участку',VartoStr(ACell.Row.Value)) > 0) then AStyle := Style_Itogi; end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.12.2019, 09:27 |
|
||
|
Каким методом покрасить строку в cxDBPivotGrid
|
|||
|---|---|---|---|
|
#18+
zinpub ёёёёё пропущено... Ну ё. Код: pascal 1. 2. 3. 4. 5. 6. 7. 8. Тогда суммы считаются самим Pivot'ом А это пригодилось в другом месте, пасиба. :-) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.01.2020, 07:25 |
|
||
|
|

start [/forum/topic.php?fid=58&gotonew=1&tid=2038707]: |
0ms |
get settings: |
8ms |
get forum list: |
18ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
139ms |
get topic data: |
9ms |
get first new msg: |
5ms |
get forum data: |
2ms |
get page messages: |
40ms |
get tp. blocked users: |
1ms |
| others: | 210ms |
| total: | 438ms |

| 0 / 0 |
