Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];




Вниз

В DBGrid 


Jony   (2002-01-23 12:13) [0]

Помню, что в обработчике TField.OnSetText, но что конкретно чему присваивать. Помогите примерчиком. Ни в конференции ни в FAQ ничего не нашел (а встречал в свое время, но не зафиксировал).



kengura   (2002-01-23 12:21) [1]

Надо обрабатывать событие OnGetTex. Вот, например:
procedure TForm1.Table1Field1(Sender: TField; var Text: OpenString; DisplayText: boolean);
begin
if DisplayText then
Text := " ";
end;



Jony   (2002-01-23 12:43) [2]

Что-то я не допонял. Она же всю информацию "глушит", а мне нужно только ячейки с "0".



kengura   (2002-01-23 12:49) [3]

Тю, забыл.
if DisplayText then
if Table1Field1.Value = 0 then Text := " ";



Jony   (2002-01-23 12:56) [4]

Все равно забиваются все ячейки, независимо от имеющейся в них информации. А вроде все правильно.



kengura   (2002-01-23 13:01) [5]

Еще одна поправка :)
if DisplayText then begin
if Table1Field1.Value = 0 then
Text := " "
else
Text := Table1Field1.AsString;



Jony   (2002-01-23 13:03) [6]

Спасибо большое, до этого я уже и сам додумался.




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.014 c
1-57146           Loxly                 2002-02-03 19:57  2002.02.18  
Создание формы приводит к ее появлению


1-57101           Song                  2002-02-02 10:19  2002.02.18  
Как получить иконку зарегистрированного расширения для несуществующего файла?


6-57160           Danko                 2001-11-27 21:46  2002.02.18  
String Grid


3-56999           dougine               2002-01-22 12:01  2002.02.18  
Программное создание DBF


1-57134           чайничек              2002-02-03 13:07  2002.02.18  
Как