Гость
Войти | Профиль | Очистить
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ячейки грид - жирный шрифт / 19 сообщений из 19, страница 1 из 1
25.01.2021, 19:47
    #40038795
Kulakov Oleg
Kulakov Oleg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
На форме есть grid, textbox и кнопка.
После нажатия кнопки значение textbox передается в запрос, где с использованием LIKE SELECT строится поиск в нескольких полях.
Затем результат запроса отображается в grid.
Как сделать жирным шрифт ячейки grid, которые содержат значение textbox?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2021, 09:12
    #40038865
Sergey Sizov
Sergey Sizov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Kulakov Oleg,

изучаем свойство dynamicfontbold у грида.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2021, 17:26
    #40039070
Kulakov Oleg
Kulakov Oleg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Sergey Sizov
Kulakov Oleg,

изучаем свойство dynamicfontbold у грида.

Изучил, только какое условие использовать в следующем коде?
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(условие,.t.,.f.)"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2021, 20:22
    #40039119
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Kulakov Oleg
Sergey Sizov
Kulakov Oleg,

изучаем свойство dynamicfontbold у грида.

Изучил, только какое условие использовать в следующем коде?
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(условие,.t.,.f.)"


Делаешь так чтобы условие было .t. на нужных тебе записях таблицы, которую показывает грид
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2021, 21:48
    #40039136
glamis
glamis
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Kulakov Oleg,

Проще так:
Код: vbnet
1.
ThisForm.Grid1.Column1.DynamicFontBold = "условие"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2021, 22:30
    #40039151
PaulWist
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Kulakov Oleg

Изучил, только какое условие использовать в следующем коде?
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(условие,.t.,.f.)"



В Form.Init создаешь курсор с одной записью (или добавляешь св-во формы, не суть важно), привязываешь свой TextBox.ControlSource к курсору или св-ву формы.

Определяешь условие:

Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(LIKE(MyCursor.Field, MyGridCursor.Field) ,.t.,.f.)"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 08:56
    #40039219
Sergey Sizov
Sergey Sizov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
PaulWist
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(LIKE(MyCursor.Field, MyGridCursor.Field) ,.t.,.f.)"

Вроде уже написано:
Проще так:
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "условие"


Вот чем .t.,.f. в iif отличаются от .t. и .f. возвращаемых любым логическим выражением? Зачем здесь iif()?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 09:12
    #40039223
asdor
asdor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Все приведенные варианты, хороши для одного поля.
Но ТС в самом начале, усложнил задачу.
"строится поиск в нескольких полях."
Т.е. еще надо определить в каком поле, соответственно вычислить Column
Потом что бы именно на нужных записях, выделялись нужные колонки, то же надо ряд мер предпринять)
Я бы в курсор, по которому идет работа, добавил поле int, и в зависимости от количества полей, по которому идет поиск, в котором найдено, прописывал туда его условный номер.
А может это и лишнее, и несколько - это всего одно поле)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 10:10
    #40039238
Sergey Sizov
Sergey Sizov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
asdor
Все приведенные варианты, хороши для одного поля.
Но ТС в самом начале, усложнил задачу.
"строится поиск в нескольких полях."
Т.е. еще надо определить в каком поле, соответственно вычислить Column
Потом что бы именно на нужных записях, выделялись нужные колонки, то же надо ряд мер предпринять)
Я бы в курсор, по которому идет работа, добавил поле int, и в зависимости от количества полей, по которому идет поиск, в котором найдено, прописывал туда его условный номер.
А может это и лишнее, и несколько - это всего одно поле)
В общем-то, условия прописываются/указываются для конкретных колонок и потому все эти страсти как бы сами собой решаются.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 12:06
    #40039276
PaulWist
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Sergey Sizov
PaulWist
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(LIKE(MyCursor.Field, MyGridCursor.Field) ,.t.,.f.)"

Вроде уже написано:
Проще так:
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "условие"


Вот чем .t.,.f. в iif отличаются от .t. и .f. возвращаемых любым логическим выражением? Зачем здесь iif()?

Не вcякое логическое выражение возвращает .t./.f.

Репо:

Код: sql
1.
2.
?null=null
?IIF(null=null, .t., .f.)



PS особенности реализации iif
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 12:16
    #40039282
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Понаписали столько что ТС наверно в шоке что спросил )))

Читаем ТЗ
Kulakov Oleg
Затем результат запроса отображается в grid.

Если так, то в запрос добавить поле is_mark
Код: sql
1.
select .F. as is_mark, ... into cursor my_cursor readwrite


затем на нужных записях ставить
Код: sql
1.
repl in my_cursor is_mark with .T.


а в гриде
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "my_cursor.is_mark"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 12:23
    #40039286
PaulWist
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Dima T
Понаписали столько что ТС наверно в шоке что спросил )))

Читаем ТЗ
Kulakov Oleg
Затем результат запроса отображается в grid.

Если так, то в запрос добавить поле is_mark
Код: sql
1.
select .F. as is_mark, ... into cursor my_cursor readwrite


затем на нужных записях ставить
Код: sql
1.
repl in my_cursor is_mark with .T.


а в гриде
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "my_cursor.is_mark"



Добавим шока :)

Зачем делать replace, когда можно вычислить is_mark в самом select-e :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 12:44
    #40039292
asdor
asdor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
PaulWist


Зачем делать replace, когда можно вычислить is_mark в самом select-e :)

Тут не понятно когда он делает выборку.
До нажатия на кнопку что то есть?
Если нет, то конечно, все разрулить на уровне выборки
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 12:46
    #40039294
PaulWist
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
asdor
PaulWist


Зачем делать replace, когда можно вычислить is_mark в самом select-e :)

Тут не понятно когда он делает выборку.
До нажатия на кнопку что то есть?
Если нет, то конечно, все разрулить на уровне выборки


Ммм, какие проблемы, отвязать грид от источника, привязать к новому источнику.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 12:56
    #40039298
Kulakov Oleg
Kulakov Oleg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Всем привет!
Шока нет. Как всегда потом дошло, что задачу подробно не описал.
В таблице иммеются три поля MEMO.
В общем решил проблему следующим образом.
Код: sql
1.
2.
3.
4.
ThisForm.Grid1.Column1.DynamicFontBold = "iff(at(alltrim(thisform.text1.value,field1))>0,.t.,.f.)"
ThisForm.Grid1.Column2.DynamicFontBold = "iff(at(alltrim(thisform.text1.value,field2))>0,.t.,.f.)"
...
...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2021, 13:55
    #40039340
Sergey Sizov
Sergey Sizov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Код: sql
1.
2.
ThisForm.Grid1.Column1.DynamicFontBold = "at(alltrim(thisform.text1.value,field1))>0"
ThisForm.Grid1.Column2.DynamicFontBold = "at(alltrim(thisform.text1.value,field2))>0"


Неужто хуже читается/понимается?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2021, 09:06
    #40039814
glamis
glamis
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Sergey Sizov,
я обычно пишу так:

Код: vbnet
1.
ThisForm.Grid1.Column1.DynamicFontBold = "alltrim(thisform.text1.value) $ field1"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2021, 12:33
    #40039870
Sergey Sizov
Sergey Sizov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
glamis
я обычно пишу так:

Код: vbnet
1.
ThisForm.Grid1.Column1.DynamicFontBold = "alltrim(thisform.text1.value) $ field1"

А я вот так:
Код: vbnet
1.
ThisForm.Grid1.Column1.DynamicFontBold = "thisform.text1.value $ field1"


То есть не использую alltrim(). Совсем. Для полей ввода. Ибо пробелы удаляются самими полем ввода. Правильно настроенным.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.02.2021, 06:31
    #40040765
Kulakov Oleg
Kulakov Oleg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ячейки грид - жирный шрифт
Sergey Sizov, glamis

Этот вариант взял на вооружение.
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "thisform.text1.value $ field1"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ячейки грид - жирный шрифт / 19 сообщений из 19, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 149ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1581480]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 29ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 57ms
get tp. blocked users:
 1ms
others: 14ms
total:  149ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]