Автор | Сообщение |
|
| |
Пост N: 319
Зарегистрирован: 17.05.05
|
|
Отправлено: 01.08.06 11:53. Заголовок: ColorBlock
Чую что торможу где то ;) Хочу в браузере раскрасить ячейки и не фига не выходит Хотя там только одно поле символьное а все остальные числовые Вообчем isnum везде дает .f. , что я не так делаю ? Ниже просто пример на скорую руку , что бы было понятно. #include "Common.ch" PROCEDURE FancyC(browse) LOCAL xValue local n:=1 local column FOR n =1 TO browse:colCount column := browse:getColumn(n) xValue := EVAL(column:block) *column:defColor:={1,2} if ISNUM( xValue) column:colorBlock:={|x| if(x>0,{5,2},{6,2})} endif NEXT RETURN если тупо написать , работает. if n==2 column:colorBlock:={|x| if(pole55>0,{5,2},{6,2})} endif
|
|
|
Новых ответов нет
[см. все]
|
|
|
| |
Пост N: 1
Зарегистрирован: 01.08.06
|
|
Отправлено: 01.08.06 12:06. Заголовок: Re:
Dima пишет: цитата: | если тупо написать , работает |
| или SELECT
|
|
|
|
| Администратор
|
Пост N: 246
Зарегистрирован: 23.05.05
|
|
Отправлено: 01.08.06 12:27. Заголовок: Re:
Поле может и числовое, а col:block нечисловой Посмотри как он у тебя формируется
|
|
|
|
| |
Пост N: 21
Зарегистрирован: 06.06.06
|
|
Отправлено: 01.08.06 13:16. Заголовок: Re:
В моем браузере цвета задаются так: For i=1 To oB:colCount() oB:getColumn(i):colorBlock:={|v| mbColor(v) } Next i Function mbColor(v,l) LOCAL cType := ValType(v), aPosColor IF Deleted() aPosColor := {5,2} ELSEIF !Empty(cSpecialCond) .AND. EVal(cSpecialCond) aPosColor := {7,2} ELSEIF !Empty(l) .AND. Eval(l) aPosColor := {5,2} ELSE DO CASE CASE cType == 'C' aPosColor := IF(v=='X',{6,2},{1,2}) CASE cType == 'D' aPosColor := {4,2} CASE cType == 'L' aPosColor := {1,2} CASE cType == 'M' aPosColor := {1,2} CASE cType == 'N' aPosColor := {3,2} ENDCASE ENDIF RETURN aPosColor
|
|
|
|
| |
Пост N: 320
Зарегистрирован: 17.05.05
|
|
Отправлено: 01.08.06 18:32. Заголовок: Re:
Pasha пишет: цитата: | Поле может и числовое, а col:block нечисловой Посмотри как он у тебя формируется |
| Да уж и начудил я там ;))))))))))) Спасибо , разобрался !!! PS Век живи , век учись.
|
|
|
|