Глюки rxDBGrid

[alexs]

1. Если не ошибаюсь - то там всегда будет clHighlightText. Это из TCustomGrid.PrepareCanvas. Я не переопределял поведение. Насчёт нового свойства - не уверено что оно нужно. И, кстати, логичнее тогда заводить свойство SelectedFont. Если уж управлять шрифтом выделенной ячейки - то управлять полностью.
2. Для отображения символа валюты - он должен быть в UTF8. А в винде он там по умолчанию в 1251. Это старая проблема FPC. Тема уже разобрана не раз на форуме. viewtopic.php?f=5&t=8093&p=85353#p85353

[zoltanleo]

И, кстати, логичнее тогда заводить свойство SelectedFont. Если уж управлять шрифтом выделенной ячейки - то управлять полностью.

вот собственно, его-то я и искал

А сложно будет такое свойство добавить? Или есть более приоритетные задачи? Ведь PrepareCanvas - разумно сидит в секции protected

Для отображения символа валюты - он должен быть в UTF8

как-то не лежит у меня душа менять системные настройки ОСи, даже во время работы программы.

А нельзя сделать опциональное включение отображения валюты в гриде? Вдруг мне в currency-полях приспичит хранить динары или тугрики, вместо рублей? Или вывод можно подавить, задав маску где-то?

[alexs]

А сложно будет такое свойство добавить?

По мере возможности - сделаю.

как-то не лежит у меня душа менять системные настройки ОСи,

Не ОСи. Это системные настройки программы. Я в том посте прям готовую процедуру дал. Достаточно её вызвать и установить переменные.

[zoltanleo]

Я в том посте прям готовую процедуру дал. Достаточно её вызвать и установить переменные.

Поковырялся в сорцах sysinth.inc - наверное ты прав, возьму твой совет на заметку.

Пока подавил вывод CurrencyString в ячейке грида установкой RxColumn.DisplayFormat = '### ### ##0.00'. Негоже компоненту отображать то, что от него не просят

[alexs]

Я формат обычно выставляю в поле из DataSet-а. Тогда не нужно в каждом визуальном объекте выставлять формат (обычно есть связка RxDBGrid для отображения и DBEdit для редактирования данных).

[zoltanleo]

Я формат обычно выставляю в поле из DataSet-а.

я тут пока так выкрутился: выставил в меморидатасете тип поля ftFloat и и задал произвольное условие (в качестве эксперимента)

Код: Выделить всё

procedure TForm1.MDcurrGetText(Sender: TField; var aText: string;
  DisplayText: Boolean);
begin
  Application.UpdateFormatSettings:= False;

  if Sender.DataSet.RecNo mod 2 > 0
    then
      begin
        CurrencyFormat:= 2;
        ThousandSeparator:= ',';
        DecimalSeparator:= '.';
        CurrencyString:= '$';
      end
    else
      begin
        ThousandSeparator:= ' ';
        DecimalSeparator:= ',';
        CurrencyFormat:= 3;
        CurrencyString:= 'руб';
      end;

  aText:= FloatToStrF(Sender.AsFloat,ffCurrency,10,2);
end; 

Забавный получился эффект

[zoltanleo]

И, кстати, логичнее тогда заводить свойство SelectedFont. Если уж управлять шрифтом выделенной ячейки - то управлять полностью.

Я внес некоторые правки (r.6148), глянь аттач, плз

[zoltanleo]

Alex, ты живой?

[alexs]

Я внес некоторые правки (r.6148), глянь аттач, плз

Можно стандартный диф? который получается по svn diff
Сразу скажу - давай всёже я сделаю selectedFont. Можно будет не только шрифт менять, но и начертание.

Alex, ты живой?

В отпуске было хорошо

[zoltanleo]

Можно стандартный диф? который получается по svn diff

Так устроит?

Добавлено спустя 45 секунд:

давай всёже я сделаю selectedFont

тебе виднее

[alexs]

Хорошо. В принципе будет также - только будет полное управление шрифтом, а не его цветом.

[zoltanleo]

Я только "за"

[alexs]

Готово.
Новое свойство - SelectedFont.
Пример работы также прилагается.
Ревизия 6156.

[zoltanleo]

Готово

Спасибо, ночью или завтра утром опробую

Установил, проверил. Все тип-топ. Твой вариант гибче.

[kit]

Если RxColumn.Filter.Style = rxfstBoth то не показивает последнее значение фильтра в таблице