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

Вниз

DisplayFormat   Найти похожие ветки 

 
vitv ©   (2007-05-07 17:27) [0]

Создал поле. Задал DisplayFormat
#.00.
Не пашет....

Значение поля вычисляю так:

procedure TDataModule25.PodscotPravProcentGetText(Sender: TField;
 var Text: String; DisplayText: Boolean);
 var
 f:double;
begin
if DataModule25.PodscotPrav.fieldbyname("f_3").asinteger=0 then

else
begin
f:=((DataModule25.PodscotPrav.fieldbyname("f_1").asinteger)/(DataModule25.PodscotPrav.fieldbyname("f_3").asinteger)*100);
Text:=floattostr(f);
end;

procedure TDataModule25.PodscotPravProcentSetText(Sender: TField;
 const Text: String);
begin
Sender.AsString:=text;
end;


 
Правильный Вася   (2007-05-07 17:33) [1]


> Не пашет....

не сеет, не жнет
только молотит, по голове


 
sniknik ©   (2007-05-07 17:35) [2]

> Не пашет....
оно не пашет, оно сеет...  

> procedure TDataModule25.PodscotPravProcentGetText(Sender: TField;
> ...
перекрыл обработку на свою и жалуешься, что стандартное не работает? молодец! следующим шагом сам ремонтируй себе машину и жалуйся на некачественный ремонт на автосервис... (можно неустойку потребовать ;о))


 
vitv ©   (2007-05-07 17:37) [3]


> sniknik ©   (07.05.07 17:35) [2]
> > Не пашет....оно не пашет, оно сеет...  > procedure TDataModule25.
> PodscotPravProcentGetText(Sender: TField;> ...перекрыл обработку
> на свою и жалуешься, что стандартное не работает? молодец!
>  следующим шагом сам ремонтируй себе машину и жалуйся на
> некачественный ремонт на автосервис... (можно неустойку
> потребовать ;о))

Сделать его CalcField?


 
vitv ©   (2007-05-07 17:40) [4]

Или при передаче строки задать её формат?



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
2-1178790029
zero
2007-05-10 13:40
2007.05.27
Запретить добовление новой строки в DBGridEh


5-1154280091
askfor
2006-07-30 21:21
2007.05.27
проблема с desingEditor и Proxies..


1-1175164782
Пушистый зайчик
2007-03-29 14:39
2007.05.27
Печать канвы имеджа.


4-1166801041
DevilDevil
2006-12-22 18:24
2007.05.27
Быстрое Корректное перемещение Окна


2-1178874455
Marat
2007-05-11 13:07
2007.05.27
Процедура