powered by simpleCommunicator - 2.0.40     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ячейки грид - жирный шрифт
19 сообщений из 19, страница 1 из 1
Ячейки грид - жирный шрифт
    #40038795
Kulakov Oleg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
На форме есть grid, textbox и кнопка.
После нажатия кнопки значение textbox передается в запрос, где с использованием LIKE SELECT строится поиск в нескольких полях.
Затем результат запроса отображается в grid.
Как сделать жирным шрифт ячейки grid, которые содержат значение textbox?
...
Рейтинг: 0 / 0
Ячейки грид - жирный шрифт
    #40038865
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kulakov Oleg,

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

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

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

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

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


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

Проще так:
Код: vbnet
1.
ThisForm.Grid1.Column1.DynamicFontBold = "условие"
...
Рейтинг: 0 / 0
Ячейки грид - жирный шрифт
    #40039151
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
Ячейки грид - жирный шрифт
    #40039219
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
Ячейки грид - жирный шрифт
    #40039223
asdor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все приведенные варианты, хороши для одного поля.
Но ТС в самом начале, усложнил задачу.
"строится поиск в нескольких полях."
Т.е. еще надо определить в каком поле, соответственно вычислить Column
Потом что бы именно на нужных записях, выделялись нужные колонки, то же надо ряд мер предпринять)
Я бы в курсор, по которому идет работа, добавил поле int, и в зависимости от количества полей, по которому идет поиск, в котором найдено, прописывал туда его условный номер.
А может это и лишнее, и несколько - это всего одно поле)
...
Рейтинг: 0 / 0
Ячейки грид - жирный шрифт
    #40039238
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
asdor
Все приведенные варианты, хороши для одного поля.
Но ТС в самом начале, усложнил задачу.
"строится поиск в нескольких полях."
Т.е. еще надо определить в каком поле, соответственно вычислить Column
Потом что бы именно на нужных записях, выделялись нужные колонки, то же надо ряд мер предпринять)
Я бы в курсор, по которому идет работа, добавил поле int, и в зависимости от количества полей, по которому идет поиск, в котором найдено, прописывал туда его условный номер.
А может это и лишнее, и несколько - это всего одно поле)
В общем-то, условия прописываются/указываются для конкретных колонок и потому все эти страсти как бы сами собой решаются.
...
Рейтинг: 0 / 0
Ячейки грид - жирный шрифт
    #40039276
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
Ячейки грид - жирный шрифт
    #40039282
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
Ячейки грид - жирный шрифт
    #40039286
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
Ячейки грид - жирный шрифт
    #40039292
asdor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PaulWist


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

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


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

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


Ммм, какие проблемы, отвязать грид от источника, привязать к новому источнику.
...
Рейтинг: 0 / 0
Ячейки грид - жирный шрифт
    #40039298
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
Ячейки грид - жирный шрифт
    #40039340
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
Ячейки грид - жирный шрифт
    #40039814
glamis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Sergey Sizov,
я обычно пишу так:

Код: vbnet
1.
ThisForm.Grid1.Column1.DynamicFontBold = "alltrim(thisform.text1.value) $ field1"
...
Рейтинг: 0 / 0
Ячейки грид - жирный шрифт
    #40039870
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
Ячейки грид - жирный шрифт
    #40040765
Kulakov Oleg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Sergey Sizov, glamis

Этот вариант взял на вооружение.
Код: sql
1.
ThisForm.Grid1.Column1.DynamicFontBold = "thisform.text1.value $ field1"
...
Рейтинг: 0 / 0
19 сообщений из 19, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ячейки грид - жирный шрифт
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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