Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вывод данных в DBGrid [D7, XP]


jacksotnik ©   (2011-10-13 12:02:00) 

Вобщем есть DBGrid в который выводится таблица через MyTable. Всё класно работает но вот вопрос у меня есть один столбец типа boolean я хочу чтоб в гриде отображались значения не true или false а какой либо тексто(типа true - нал, false-безнал). Можно-ли както подменить значение?


icWasya   (2011-10-14 13:53:00) [1]

Вообщето для этого есть DisplayValues

 (MyTable.FieldByName('PayType').As TBooleanField).DisplayValue:='нал;безнал';


Anatoly Podgoretsky   (2011-10-13 15:27:00) [2]

> jacksotnik  (13.10.2011 12:25:05)  [5]

Для этого надо ничего не делать.


jacksotnik   (2011-10-13 12:48:00) [3]

Спасибо всё получилось


Медвежонок Пятачок   (2011-10-13 12:46:00) [4]

Но лучше только внутри if DisplayText


jacksotnik   (2011-10-13 12:42:00) [5]

Та это я понимаю, вопрос в том как правильно обратиться к значению поля?


Inovet   (2011-10-13 12:42:00) [6]

if Sender.AsBoolean then text:='Нал';
else text:='Безнал';


Медвежонок Пятачок   (2011-10-13 12:40:00) [7]

сравнить его значение с чем нибудь


jacksotnik   (2011-10-13 12:37:00) [8]


> Лучше б значение поля проверял.

А как проверить значение поля?


Германн   (2011-10-13 12:30:00) [9]


> jacksotnik   (13.10.11 12:25) [5]
>
> Сделал так:

Лучше б значение поля проверял.


Медвежонок Пятачок   (2011-10-13 12:29:00) [10]

оно прошло по всем записям.


jacksotnik   (2011-10-13 12:25:00) [11]

Сделал так:
procedure Tfrm_klients.MyTable1korpGetText(Sender: TField; var Text: string;
 DisplayText: Boolean);
begin
if DisplayText = true then
text:='Нал';
if DisplayText = false then
text:='Безнал';
end;

Но насколько я понял оно не для каждой записи проверку условия делает. Как правильно организовать чтоб прошло по всем записям?


Плохиш   (2011-10-13 12:11:00) [12]


> jacksotnik   (13.10.11 12:04) [2]
>
> А можно поподробнее


Das Ereignis OnGetText wird ausgelöst, wenn die Feldeigenschaften DisplayText oder Text referenziert werden.

Delphi-Syntax:

property OnGetText: TFieldGetTextEvent;

C++ Syntax:

__property TFieldGetTextEvent OnGetText = {read=FOnGetText, write=FOnGetText};

Beschreibung

Mit einer OnGetText-Ereignisbehandlungsroutine können Sie Eigenschaften DisplayText und Text individuell verarbeiten. Mit OnGetText kann der Wert Value des Feldes für die Anzeige oder die Bearbeitung unterschiedlich formatiert werden. Alternativ dazu kann mit OnGetText auch etwas anderes als der Feldwert dargestellt werden.

Wenn keine OnGetText-Ereignisbehandlungsroutine vorhanden ist, entsprechen die Werte der Eigenschaften DisplayText und Text dem Wert der Eigenschaft AsString.


Медвежонок Пятачок   (2011-10-13 12:07:00) [13]

TField.OnGetText


jacksotnik   (2011-10-13 12:04:00) [14]

А можно поподробнее


Anatoly Podgoretsky   (2011-10-13 12:03:00) [15]

OnGetText


Наверх

Титульная страница Поиск, карта сайта Написать письмо