Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.01.22;
Скачать: CL | DM;

Вниз

Вывод данных в DBGrid   Найти похожие ветки 

 
jacksotnik   (2011-10-13 12:02) [0]

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


 
Anatoly Podgoretsky ©   (2011-10-13 12:03) [1]

OnGetText


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

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


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

TField.OnGetText


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


> 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.


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

Сделал так:
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:29) [6]

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


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


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

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


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


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

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


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

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


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

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


 
Inovet ©   (2011-10-13 12:42) [11]

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


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

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


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

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


 
Anatoly Podgoretsky ©   (2011-10-13 15:27) [14]

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

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


 
icWasya ©   (2011-10-14 13:53) [15]

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

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



Страницы: 1 вся ветка

Текущий архив: 2012.01.22;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.006 c
2-1318398757
TeteriN
2011-10-12 09:52
2012.01.22
Косвенное обращение к объектам


4-1243546594
imprezident
2009-05-29 01:36
2012.01.22
Работа с компонентами стороннего приложения


9-1173859594
GameProger
2007-03-14 11:06
2012.01.22
Создание ShareWare игр в делфи


2-1318332506
серый
2011-10-11 15:28
2012.01.22
Из DBGrid в TStringGrid


15-1317761204
Делфиец
2011-10-05 00:46
2012.01.22
А что за кайф быть мастером делфи?